login.asp
来自「次项目为基于ASP模式的图书管理系统」· ASP 代码 · 共 26 行
ASP
26 行
<html>
<head>
<title>新建网页 1</title>
</head>
<%
name=trim(request("name1"))
passwd=trim(request("passwd1"))
on error resume next
sqlstr="select * from 读者信息表 where 读者编号='" & name & "' and 电话号码='" & passwd & "'"
set conn=Server.createobject("adodb.connection")
conn.open("dsn=book1")
set recordset=Conn.Execute(sqlstr)
if recordset.eof=true then
response.redirect("index.asp?message=信息有误")
else
session("name")=name
session("passwd")=passwd
response.redirect("frame.asp")
end if
%>
<body>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?