' 感谢大家使用 诚心志远 认证登陆类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