• 分类

  • 重置

如何远程读取数据库页面?

    <%
    Set HttpObj = Server.CreateObject(“AspHTTP.Conn”)
    dim docnum
    docnum = 101
    do while docnum <> 111
    Response.Write docnum
    HTTPObj.Url = “http://www.intels.net/date.asp?songID=”&docnum
    HttpObj.RequestMethod = “GET”
    strResult = HTTPObj.GetURL
    Response.Write strResult
    docnum=docnum + 1
    Response.Write “<br>”
    loop
    %>