config.asp

ASP源程序采用天空软件小偷中心核件制成

<%
function classname(cid)
set rst=server.createobject("adodb.recordset")
sql = "select * from Aclass where classid="&cid
rst.open sql,conn,1,1
classname=rst("class")
response.write classname
rst.close
end function
function nclass(nid)
set rst=server.createobject("adodb.recordset")
sql = "select * from Anclass where nclassid="&nid
rst.open sql,conn,1,1
nclass=rst("nclass")
response.write nclass
rst.close
end function
%>