%
On Error Resume Next
class_id_=request.querystring("c1")
class_id_=replace(class_id_,"<","《",1,-1)
class_id_=replace(class_id_,">","》",1,-1)
class_id_=replace(class_id_,"/","/",1,-1)
class_id_=replace(class_id_,"'","‘",1,-1)
class_id_=replace(class_id_,"&","%",1,-1)
class1_id_=request.querystring("c2")
class1_id_=replace(class1_id_,"<","《",1,-1)
class1_id_=replace(class1_id_,">","》",1,-1)
class1_id_=replace(class1_id_,"/","/",1,-1)
class1_id_=replace(class1_id_,"'","‘",1,-1)
class1_id_=replace(class1_id_,"&","%",1,-1)
class2_id_=request.querystring("c3")
class2_id_=replace(class2_id_,"<","《",1,-1)
class2_id_=replace(class2_id_,">","》",1,-1)
class2_id_=replace(class2_id_,"/","/",1,-1)
class2_id_=replace(class2_id_,"'","‘",1,-1)
class2_id_=replace(class2_id_,"&","%",1,-1)
class3_id_=request.querystring("c4")
class3_id_=replace(class3_id_,"<","《",1,-1)
class3_id_=replace(class3_id_,">","》",1,-1)
class3_id_=replace(class3_id_,"/","/",1,-1)
class3_id_=replace(class3_id_,"'","‘",1,-1)
class3_id_=replace(class3_id_,"&","%",1,-1)
filename=request.querystring("f")
filename=replace(filename,"<","《",1,-1)
filename=replace(filename,">","》",1,-1)
filename=replace(filename,"/","/",1,-1)
filename=replace(filename,"'","‘",1,-1)
filename=replace(filename,"&","%",1,-1)
set fs=server.createobject("scripting.filesystemobject")
set conn = server.createobject("adodb.connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("../../web.mdb")
dir=request.servervariables("APPL_PHYSICAL_PATH")
title="重庆统计信息网首页"
if class_id_<>eof then
set rs=conn.execute("select class,title,date_a,owner from main where class_id='"&class_id_&"' and filename='"&filename&"'")
class_n_=rs("class")
ob_p=dir&class_id_&"\"
' title=title&" > "&class_n_&""
title=title&" > "&class_n_
end if
if class1_id_<>eof then
set rs=conn.execute("select class1,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and filename='"&filename&"'")
class1_n_=rs("class1")
ob_p=ob_p&class1_id_&"\"
' title=title&">"&class1_n_&""
title=title&" > "&class1_n_
end if
if class2_id_<>eof then
set rs=conn.execute("select class2,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and class2_id='"&class2_id_&"' and filename='"&filename&"'")
class2_n_=rs("class2")
ob_p=ob_p&class2_id_&"\"
' title=title&">"&class2_n_&""
title=title&" > "&class2_n_
end if
if class3_id_<>eof then
set rs=conn.execute("select class3,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and class2_id='"&class2_id_&"' and class3_id='"&class3_id_&"' and filename='"&filename&"'")
class3_n_=rs("class3")
ob_p=ob_p&class3_id_&"\"
' title=title&">"&class3_n_&""
title=title&" > "&class3_n_
end if
filename1=rs("title")
time_=rs("date_a")
title=title&" > 正文"
ob_p=ob_p&filename
set a=fs.opentextfile(""&ob_p&"")
txt=a.readall
txt=cstr(txt)
a.close
%>