保卫萝卜2苹果版
219.5M · 2025-11-04
<%
Set HttpObj = Server.CreateObject("AspHTTP.Conn")
dim docnum
docnum = 101
do while docnum <> 111
Response.Write docnum
HTTPObj.Url = "http://www.*i*n*tels.net/date.asp?songID="&docnum
HttpObj.RequestMethod = "GET"
strResult = HTTPObj.GetURL
Response.Write strResult
docnum=docnum + 1
Response.Write "<br>"
loop
%>
