返回你的登陆页面即可
<%
dim sid:sid=session("id")
IF sid="" Then
Response.Redirect "登陆页面的URL地址"
End IF
flagxz=0
randomize
set rss=conn.execute("select top 1 * from report where 学生id="&session("id")&" and (是否补考=False or 补考成绩<>0) order by id desc ")
if rss.eof then
qi=1
else
qi=rss("id")+1
end if
set rss=conn.execute("select top 1 * from report where 学生id="&session("id")&" and (是否补考=True and 补考成绩=0) order by id desc ")
if not rss.eof then
qi=rss("id")
end if
set rss=conn.execute("select top 1 * from test order by id desc")
if rss.eof then
%>
<%
dim sid:sid=session("id")
IF sid="" Then
Response.Redirect "登陆页面的URL地址"
End IF
flagxz=0
randomize
set rss=conn.execute("select top 1 * from report where 学生id="&session("id")&" and (是否补考=False or 补考成绩<>0) order by id desc ")
if rss.eof then
qi=1
else
qi=rss("id")+1
end if
set rss=conn.execute("select top 1 * from report where 学生id="&session("id")&" and (是否补考=True and 补考成绩=0) order by id desc ")
if not rss.eof then
qi=rss("id")
end if
set rss=conn.execute("select top 1 * from test order by id desc")
if rss.eof then
%>