ks12.asp

来自「考试系统asp环境下开发,access数据库」· ASP 代码 · 共 16 行

<!-- #include file="conn.asp" -->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from kstype where id="&request.form("typeid")
rs.open sql,conn,1,1
if not rs.eof then
response.cookies("kstypeid")=rs("id")
kstype=trim(rs("kstype"))
kk=trim(rs("kk"))
kstime=trim(rs("kstime"))
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>