📄 iamno_lx.asp
字号:
<!--#include file="conn.asp"-->
<%
if session("username")="" then
response.redirect "relogin.asp"
end if
%><html>
<%
username=request.cookies("username")
kcid=request("kcid")
chapter=request("chapter")
sql1="SELECT * from tbistest where username='"&username&"' and kao=0 and kcid="&kcid&" and chapter="&chapter
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2
do while not rs1.eof
rs1("istest")=0
rs1.update
rs1.movenext
loop
sqldel1="SELECT uans,userdata.isread,userdata.tmid from tbtk,userdata where username='"&username&"' and tbtk.tmid=userdata.tmid and kao=0 and kcid="&kcid&" and chapter="&chapter&" order by userdata.tmid "
set rsdel1=server.createobject("adodb.recordset")
rsdel1.open sqldel1,conn,3,2
do while not rsdel1.eof
if rsdel1("isread")=1 then
sqldel2="SELECT * from userdataread where username='"&username&"' and tmid="&rsdel1("tmid")&" and paperno=0 order by readid "
set rsdel2=server.createobject("adodb.recordset")
rsdel2.open sqldel2,conn,3,2
do while not rsdel2.eof
rsdel2("ruans")=""
rsdel2.update
rsdel2.movenext
loop
end if
rsdel1("uans")=""
rsdel1.update
rsdel1.movenext
loop
response.redirect "selecttype.asp?kcid="&kcid&"&chapter="&chapter
%> ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -