摘要: '//1、输入url目标网页地址,返回值getHTTPPage是目标网页的html代码 Function getHTTPPage(url) url=cstr(url) dim Http set Http=server.createobject("MSXML2.ServerXMLHTTP") ' Response.write url ' Response.end Call Http.setTimeo... 阅读全文
posted @ 2011-08-04 16:51 ybq155 阅读(551) 评论(0) 推荐(0) 编辑