用密码保护页面 (II)
2018-09-06 12:06
英文原文
现在我们创建查询语句,可以验证在表单中输入的内容是否与数据库中的内容相一致。
<%@ Language=VBScript %>
<% Response.Buffer = True %>
<% Session(allow) = True %>
<%
UserName = Request.Form(username)
Password = Request.Form(password)
grab the form contents
MyConn.Open your connection string here
SQL = Select * From tblLogin
Set RS = MyConn.Execute(SQL)
If UserName = RS(UserName) AND Password = RS(Password) Then
if there is a match then show the page
%>
Put the contents of your page here.
<%
Else
Response.Redirect asp
RS.Close
MyConn.Close
Set RS = Nothing
Set MyConn = Nothing
End If
%>
if there was no match then make the visitor try again to login.
把含上述代码的文件命名为login.asp
上一篇:基于ASP的站内多值搜索
下一篇:UTF-8编码第12页