如何对用户进行授权？

网络编程 2024/10/6 佚名

3 2 1

authenticate.asp
<%
Dim URL
URL = Request.QueryString

' 获得URL.
%>

<html>
<body>
<FORM METHOD=POST ACTION="/validate.asp">
<INPUT TYPE=HIDDEN NAME="URL" VALUE="<%=URL%>">
' 将URL保存到一个隐藏变量中.
用户名:
<INPUT TYPE=TEXT NAME="txtName">
口令:
<INPUT TYPE=PASSWORD NAME="txtPassword">

<INPUT TYPE=SUBMIT>
</FORM>
</body></html>
再用validate.asp文件获取传递给它的信息，从数据库中读取用户名和口令，以判断是否给用户授权。

validate.asp
<%
Dim strUserName, strPassword
strUserName = Request.form("txtName")
strPassword = Request.form("txtPassword")
' 从表单中读取用户名和口令.

' 建立数据库连接...

Dim strSQL
strSQL = "select * from ValidUsers WHERE UserName = " & _
strUserName & " AND Password = " & _
strPassword

' 进行SQL查询.

Dim rs
Set rs = Conn.Execute(strSQL)

If rs.EOF Then

' 如果recordset不为空, 则用户名有效.
Session("bolAuthenticated") = True

' 将bolAuthenticated 设为True.

Response.Redirect Request.form("URL")

' 将用户传递到来过的URL.
Else
Response.Redirect "/notvalidated.asp

' 否则用户无权访问,将用户传递到一个错误提示页面.
End If
%>

[1]

|如何|何对|对用|用户|户进|进行|行授|授权|权？|？|

标签：

|如何|何对|对用|用户|户进|进行|行授|授权|权？|？|

免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com

评论“如何对用户进行授权？”

如何对用户进行授权？

暂无“如何对用户进行授权？”评论...

《魔兽世界》大逃杀！60人新游玩模式《强袭风暴》3月21日上线

暴雪近日发布了《魔兽世界》10.2.6 更新内容，新游玩模式《强袭风暴》即将于3月21 日在亚服上线，届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。

艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕，并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时，他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中，玩家将会进入一个全新的海盗主题大逃杀式限时活动，其中包含极高的风险和史诗级的奖励。
《强袭风暴》不是普通的战场，作为一个独立于主游戏之外的活动，玩家可以用大逃杀的风格来体验《魔兽世界》，不分职业、不分装备（除了你在赛局中捡到的），光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式，玩家在加入海盗主题的预赛大厅区域前，可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹，《巨龙崛起》和《魔兽世界：巫妖王之怒经典版》的玩家都可以获得奖励。

更新动态

2024年10月06日

如何对用户进行授权？

|如何|何对|对用|用户|户进|进行|行授|授权|权？|？|

如何更好地保护我的网页？

如何用拦截表单的方法上传图片？

评论“如何对用户进行授权？”

《魔兽世界》大逃杀！60人新游玩模式《强袭风暴》3月21日上线

更新动态

友情链接