ASP300源码

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

下载地址

下载地址已转移到新版网站，请点击左上角-首页，在新版网站搜索此套源码的标题进行下载。