<%
dim classid
classid = saferequest("classid", 0)
if classid = "" then
classid = 2
end If
dim aid
aid=saferequest("id",0)
if aid="" then
response.Write "有错误，请返回首页"
response.End()
end If
sqll="Select * From article_info where unid="&aid&""
Set rsd = Server.CreateObject("adodb.recordset")
rsd.Open sqll,conn,1,1
if rsd.eof then
response.Write "有错误，请返回首页"
response.End()
else
dim bid
bid=rsd("classid")
end if
%>
中国力学学会学术大会’2009 - 閲戝疂鎼忓畼鏂筧pp涓嬭浇鎸囧崡