如何對(duì)用戶進(jìn)行授權(quán)？
authenticate.asp
<%
Dim URL
URL = Request.QueryString
' 獲得URL.
%>
<html>
<body>
<FORM METHOD=POST ACTION="/validate.asp">
<INPUT TYPE=HIDDEN NAME="URL" VALUE="<%=URL%>">
' 將URL保存到一個(gè)隱藏變量中.
用戶名:
<INPUT TYPE=TEXT NAME="txtName">
口令:
<INPUT TYPE=PASSWORD NAME="txtPassword">
<INPUT TYPE=SUBMIT>
</FORM>
</body></html>
再用validate.asp文件獲取傳遞給它的信息，從數(shù)據(jù)庫(kù)中讀取用戶名和口令，以判斷是否給用戶授權(quán)。
validate.asp
<%
Dim strUserName, strPassword
strUserName = Request.form("txtName")
strPassword = Request.form("txtPassword")
' 從表單中讀取用戶名和口令.
' 建立數(shù)據(jù)庫(kù)連接...
Dim strSQL
strSQL = "select * from ValidUsers WHERE UserName = " & _
strUserName & " AND Password = " & _
strPassword
' 進(jìn)行SQL查詢.
Dim rs
Set rs = Conn.Execute(strSQL)
If rs.EOF Then
' 如果recordset不為空, 則用戶名有效.
Session("bolAuthenticated") = True
' 將bolAuthenticated 設(shè)為True.
Response.Redirect Request.form("URL")
' 將用戶傳遞到來(lái)過(guò)的URL.
Else
Response.Redirect "/notvalidated.asp
End If
%>
[1]
相關(guān)文章
如何使用表單發(fā)送電子郵件？...2006-11-11
怎樣給文件加密最安全？...2006-11-11
如何實(shí)現(xiàn)文件上傳并自動(dòng)歸類功能？
如何實(shí)現(xiàn)文件上傳并自動(dòng)歸類功能？...2006-11-11
如何獲知文件被改動(dòng)的情況？...2006-11-11
如何編寫一個(gè)創(chuàng)建FTP站點(diǎn)的函數(shù)？
如何編寫一個(gè)創(chuàng)建FTP站點(diǎn)的函數(shù)？...2006-11-11
如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼？
如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼？...2006-11-11
如何遍歷目錄及目錄下的文件？...2006-11-11
如何計(jì)算下載一個(gè)文件需要多長(zhǎng)時(shí)間？
如何計(jì)算下載一個(gè)文件需要多長(zhǎng)時(shí)間？...2006-11-11
如何顯示一個(gè)文本文件？...2006-11-11
這篇文章主要為大家介紹了字節(jié)跳動(dòng)解決SLA治理難題的了解，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪2022-05-05