于振海网——于振海的个人博客搜索

asp抓取网页内容自己显示并实时最新内容

发布时间:2011年11月23日  更新时间:2024年6月18日
作者:未知  文章ID:526  浏览:

    以下代码为asp获取https://www.yuzhenhai.com/index.html网页的内容。
    需要注意的是服务器有时读取缓存内容,这样就造成了读取的内容不是最新的。可以在网页地址后面加上日期时间参数,保证获取的内容是最新的。
    html后面加参数不影响html显示,对于GetPage()函数来说,好比是一个新网页,所以是实时抓取,不从缓存读取。

<%
response.write GetPage("https://www.yuzhenhai.com/index.html?time=" & date & "-" & time)

Function GetPage(MyUrl)
dim objXmlHttp
set objXmlHttp = Server.CreateObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",MyUrl,false
objXmlHttp.send()
GetPage = bBytesToBstr(objXmlHttp.responseBody)
set objXmlHttp = nothing
end Function

Function bBytesToBstr(body)
dim objstream
set objstream = CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = "GB2312"
bBytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
end Function

%>

发表评论  挑错  文章投稿  联系我
  • 上一篇:asp获得来路域名301跳转
  • 下一篇:电子是如何被“称”出来的?
  • 【推荐文章】

  • 辛弃疾《清平乐·题上卢桥》创作背景、赏析

    【原文】 清平乐① 题上卢桥② 辛弃疾 清泉犇快,不管青山碍③。千里盘盘平世界,更...

  • 苏轼《澄迈驿通潮阁二首》赏析

    【原文】 澄迈驿通潮阁二首① 苏轼 (一) 倦客愁闻归路遥, 眼明飞阁俯长桥。 贪看...

  • 如何写好议论文——论题:奋斗

    【论题阐述】 奋斗 一词的本义就是指为了目标去努力行动。在现代社会中,面临着很大...

  • 如何写好日记之每日生活新鲜事

    【原文】 如何写好日记之每日生活新鲜事 每一天,我们身边都会发生大大小小的事,它...

  • 海王星上为什么风暴不断

    在我们的心目中,风暴多起源于太阳的热力:阳光使大气和海水受热,造成空气对流而刮...

  • 站成一棵树

    父亲是在李阳出事的第二天赶回村庄的。 事情也不算大,李阳打了同学。李阳以前也打同...

  • 【最新文章】

  • 白居易《江楼夕望招客》赏析
  • 姜夔《点绛唇·丁未冬过吴松作》赏析
  • 辛弃疾《清平乐·题上卢桥》创作背景、赏析
  • 陶渊明《答庞参军》赏析
  • 苏轼《澄迈驿通潮阁二首》赏析
  • 垃圾分类的作文素材
  • 如何写作文——一次奇特的比赛(想象作文)
  • 如何培养孩子独自人格,让他学会承担自己的人
  • 如何写好议论文——论题:奋斗
  • 如何写好作文之写人篇
  • 如何写好作文之叙事篇
  • 如何写好作文之写景篇
  • 如何写好日记之今天我来画美景
  • 如何写好日记之每日生活新鲜事
  • 如何写好日记之斑斓校园每一天