ASPHTTP使用范例

最新推荐文章于 2021-10-02 23:01:14 发布

lxklz

最新推荐文章于 2021-10-02 23:01:14 发布

阅读量1.1k

点赞数

分类专栏： ASP 文章标签： vbscript windows image html 文档 url

本文链接：https://blog.csdn.net/liuxingke/article/details/69236

版权

ASP 专栏收录该内容

6 篇文章 0 订阅

订阅专栏

简单实例：
　使用这个组件十分简单
　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>