'------------------------------------------------------------------------------------------------------------
' 感谢大家使用 诚心志远 认证登陆类1.0
' 此类 采用IIS认证 403 HTTP头协议 BASE64 编码 用此类更简单的完善 登陆验证过程
' 可以支持登陆定义转向 错误消息 集成 MD5加密
' 作者可以给予技术帮助~需要就请联系
' 本类 可以随便传播 修改,但请保留此 注释 信息。
' 版权信息 请您尊重作者的心血~切误删除修改
' 版权所有 诚心志远 QQ 317375717 http://www.26211.com
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' 建立类 类对象 ylwnet
' 类函数建立 set yl= new ylwnet
' 调用类 类对象 函数 check
' 函数检查 yl.check "usersess","你自己传递ID参数","你自己传递密码参数",32,"index.asp","请输入后台登陆密码"
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' 类对象 函数说明 yl.check(SESSION对象,帐户ID,帐户密码,传递密码 MD5加密 16 32 位方式,成功跳转URL,错误的消息)
'------------------------------------------------------------------------------------------------------------
'建立类
'set yl= new ylwnet
'yl.check "user","11","6512bd43d9caa6e02c990b0a82652dca",32,"ylcheck.asp","请输入后台登陆密码"
'--------------------------------------------------
''
'-------验证类----------在你的其他页面里加入此代码就可以验证服务 ----------------
''-----if session("user")<>"true" then '判断是否有此验证值
''-----response.redirect"login.asp" '跳转到登陆验证页
''-----response.End()
''-----end if
游客
非常好 2009-11-22