<%dim sp,area,fileyear,cid
MaxPerPage=20
'FileName="Admin_ArticleManage.asp"
filename="list.asp"
keyword=trim(request("keyword"))
ClassID=Trim(request("CID"))
sp=Trim(request("sp"))
strField=trim(request("Field"))
area=trim(request("area"))
fileyear=trim(request("fileyear"))
if keyword<>"" then
keyword=ReplaceBadChar(keyword)
end if
if classid<>"" then
ClassID=CLng(ClassID)
end if
if sp<>"" then
sp=CLng(sp)
else
sp=0
end if
if fileyear<>"" then
fileyear=CLng(fileyear)
end if
if ClassID<>"" then
set tClass=conn.execute("select ClassName,RootID,ParentID,Depth,ParentPath From tbl_ArticleClass where ClassID=" & ClassID)
if tClass.bof and tClass.eof then
response.write "
找不到指定的栏目
"
else
ClassName=tClass(0)
RootID=tClass(1)
ParentID=tClass(2)
Depth=tClass(3)
ParentPath=tClass(4)
end if
end if
%>
济南人事编制信息网
