<%
dim rs,sql, rs1
dim classid
dim classname
if request("classid")<>"" then
classid=request("classid")
else
classid=0
end if
set rs = server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")
sql="select * from Aclass where classID="&cstr(classid)
rs.open sql,conn,1,1
if not rs.eof then
classname=rs("class")
end if
rs.close
%>
武汉张鸿民骨伤专科医院
