谁帮注释这个小偷程序？

来源：百度知道编辑：UC知道时间：2024/05/29 01:14:57

我不怎么会ASP，这也是别人写的，谁帮注释这个小偷程序，要详细一点！
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<% Response.ContentType="text/vnd.wap.wml; charset=UTF-8" %>
<%
'---------------------------------------------------------------------------------------------------
dim page,pt1,pt2,pt3,phoneW,phoneH,rand,Mode2,Mode3
rand=request.QueryString("rand")
page=request.QueryString("page")
pt1=request.Form("pt1")
pt2=request.Form("pt2")
pt3=request.Form("pt3")
phoneW=request.Form("phoneW")
phoneH=request.Form("phoneH")
Mode2=request.Form("Mode2")
Mode3=request.Form("Mode3")
'---------------------------------------------------------------------------------------------------
On Error Resume Next
Server.ScriptTimeOut=9999999
Function getHTTPPage(Path)
t = GetBody(Path)
getHTTPPa

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<% Response.ContentType="text/vnd.wap.wml; charset=UTF-8" %>
<%
'**************参数定义**************
dim page,pt1,pt2,pt3,phoneW,phoneH,rand,Mode2,Mode3
rand=request.QueryString("rand")
page=request.QueryString("page")
pt1=request.Form("pt1")
pt2=request.Form("pt2")
pt3=request.Form("pt3")
phoneW=request.Form("phoneW")
phoneH=request.Form("phoneH")
Mode2=request.Form("Mode2")
Mode3=request.Form("Mode3")

'**************跳过错误**************
On Error Resume Next
'**************页面最大响应时间**************
Server.ScriptTimeOut=9999999

'**************函数gethttppage(传入网址) 返回页面输出代码-string**************
Function getHTTPPage(Path)
t = GetBody(Path)
getHTTPPage=BytesToBstr(t,"utf-8"

请帮我注释这个程序，好吗? 高手帮我注释一下这个VF小程序帮我把这个程序加上注释谢谢了谁帮我注释一下这个javasrcipt？请帮我看看如何写这个小偷程序帮忙注释一下这个程序有人能帮我注释一下这个程序吗？程序比较短那位高手能帮我注释一下这个VB小程序？？？帮我解决个C语言的问题，急急急，这个时钟程序谁帮我用中文注释的详细点。。。谢谢求这个c++程序的详细注释!!