| 广告招租，e-mail:yesize@hotmail.com
|
|
广告招租，e-mail:yesize@hotmail.com
简单实例：
使用这个组件十分简单
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) & <br> & VBCrLF
Next
%>
</body>
</html>
版权说明：作品来源于网上，版权归作者所有，如果无意中侵犯了您的版权，请来信告知，本站将在3个工作日内删除。yesize@hotmail.com |
|
 热门小游戏分类 |
|
|
|
加入最爱
