您的位置:首页 > 理论基础 > 计算机网络

ASPHTTP使用范例

2004-08-09 13:38 387 查看
简单实例:
 使用这个组件十分简单
 1.创建对象
 2.设定一些属性
 3.调用GetUrl方法

 下面是vbscript使用AspHTTP的示例代码

 Set HttpObj = Server.CreateObject("AspHTTP.Conn")
 HttpObj.Url = "http://www.myfinancialpage.com/qrtresults.html"
 strResult = HttpObj.GetURL
 变量strResult现在包含一个字符串从http://www.myfinancialpage.com/qrtresults.html
 GET获得的文档结果

 实例:获得GIF文件
 <%
 rem This demo pulls a GIF image from www.microsoft.com
 Server.ScriptTimeout = 240
 Set HttpObj = Server.CreateObject("AspHTTP.Conn")
 HttpObj.Url = "http://www.microsoft.com/library/images/gifs/toolbar/write.gif"
 HttpObj.FollowRedirects = false
 HttpObj.RequestMethod = "GET"
 HttpObj.UserAgent = "Mozilla/2.0 (compatible; MSIE 3.0B; Windows NT)"
 HttpObj.SaveFileTo = "c:/write.gif"
 HttpObj.GetURL
 Response.Write "<hr><h3>Headers Received</h3><pre>" & HttpObj.Headers & "</pre>"
 %>

 实例:处理和显示URL包含的HREF
 <html>
 <body>
 <%
 Server.ScriptTimeout = 240
 Set HttpObj = Server.CreateObject("AspHTTP.Conn")
 HttpObj.Url = "http://www.genusa.com/asp/tools.html"
 HttpObj.RequestMethod = "GET"
 HttpObj.UserAgent = "Mozilla/2.0 (compatible; MSIE 3.0B; Windows NT)"
 strResult = HttpObj.GetURL
 Response.Write "<h2>A HREF List</h2>"
 varHREFArray = HttpObj.GetHREFs
 intHREFArrayLimit = UBound(varHREFArray) -1
 For I = 0 to intHREFArrayLimit
  Response.Write varHREFArray(I) & "" & VBCrLF
 Next
 %>
 </body>
 </html>
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: