viewdatedo.asp

来自「个人备忘系统一个不错的备忘软件.专供刚学ASP的人学习. 代码简单易懂 m」· ASP 代码 · 共 22 行

<!--#include file="conn.asp"-->
<%
id=cint(request.QueryString("id"))
set rs=server.CreateObject("adodb.recordset")
cmd="select * from riji where id="&id
rs.open cmd,conn,1,3
if rs.eof then
response.write("<script>alert('非法提交！');window.location.href('writedate.asp')</script>")
response.end
end if
dim psw
psw=rs("password")
if psw<>"" then
session("id")=id
response.redirect("viewdate.asp")
else
session("id")=id
response.redirect("readdate.asp")
'response.end
end if
%>