asp记录来路网址,并在提交用户名和密码时记录到文件1.txt代码怎么写?

asp记录来路网址到1.txt,并在提交用户名和密码时记录到文件1.txt代码怎么写?提交之后返回另一个页面,谢谢... asp记录来路网址到1.txt,并在提交用户名和密码时记录到文件1.txt代码怎么写?
提交之后返回另一个页面,谢谢
展开
 我来答
缘的轨迹
2009-11-07 · 超过32用户采纳过TA的回答
知道答主
回答量:103
采纳率:33%
帮助的人:68.5万
展开全部
<%
'获取IP
Function GetIP()
Dim ip:ip=""
ip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If ip="" Then
ip=Request.ServerVariables("REMOTE_ADDR")
End If
GetIP=ip
End Function

'参 数: 生成文件路径
'作 用: 生成一个指定文件
'Function SaveHtml(path)
Function SaveHtml(path)
Dim objStream
Set objStream = Server.CreateObject("ADODB"+"."+"Stream")
With objStream
.Type = 2
.Open
.Charset = "utf-8"
.Position = objStream.Size
.WriteText=Result
.SaveToFile Server.MapPath(path),2
.Close
End With
Set objStream = Nothing
End Function

在用户名及密码验证页
Dim Result:Result=GetIP
SaveHtml("1.txt")'最好把1.txt改成用户名+时间,如admin_091106.txt
%>
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式