若为DW8自生成代码,将代码(Replace(Request.Form("password"),"'","''"))改为md5(Replace(Request.Form("password"),"'","''"))如下
:
'========================================================= MM_rsUser.Source = MM_rsUser.Source & " FROM tAdmin WHERE fUserName='" & Replace(MM_valUsername,"'","''") &"' AND
fPassword='" & md5(Replace(Request.Form("password"),"'","''")) & "'"
'=========================================================
修改密码
1. 将deep_md5.asp拷贝到相应目录下
2. 在相应位置输入如下
'=========================================================
<!--#include file="路径/deep_md5.asp" -->
'=========================================================
3.在更新页找到:
'=========================================================
' set the form values
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(MM_i 1) = CStr(Request.Form(MM_fields(MM_i)))
Next
'=========================================================
4.将代码CStr(Request.Form(MM_fields(MM_i)))改为CStr(md5(Request.Form(MM_fields(MM_i)))),如下:
'========================================================
' set the form values
For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2
MM_fields(MM_i 1) = CStr(md5(Request.Form(MM_fields(MM_i))))
Next
'========================================================

评论加载中…
![]() |