易截截图软件、单文件、免安装、纯绿色、仅160KB

用asp读取xml时清除缓存的问题与解决办法

前段时间给客户做了几个网页,客户要求在自己的网站中显示自己在新浪博客里的文章,作为网站的一部分。这样的情况可以解决,主要可以通过博客中的 XML来实现,通过用asp来读取博客中XML,将博客中的标题、发布时间等信息显示在网站中。但是在使用的过程中,出现了一个问题:当博客中添加文章后,在网页中读取博客中的XML后进行更新,但是却没有及时更新,查询了很多信息,发现是网站没有及时更新XML数据而造成的。如何解决?先是尝试清除网站的缓存,设置网站中的HTTP头:Cache-Control和值:no-cache。设置后进行测试,发现效果不好,主要问题是这样的设置只是清除了网站内所包含的图片,文本等缓存,没有更新XML缓存,所以没有解决前面的问题。
 
       无奈只能再查找,所幸在CSDN中看到一篇文章,介绍清除缓存的好办法是改变思路,不是清除内容,而是强行加载要更新的内容。主要思路是在打开的路径中添加随机数,因为在iis中访问不同的路径时,内容是强行加载的,没有调用缓存。有了这个思路,改动程序就比较方便了。具体代码如下:
<%
dim xmlDoc
dim http
dim bitem
dim bi
dim title
dim link
dim pubdate
dim days
dim months
dim NM
dim xmlseed
dim conn,strconn,rs
dim ReadSinaRss
Randomize '增加随机数初始化语句
'原本的赋值语句为:xmlseed="http://blog.sina.com.cn/rss /adsbaby.xml",修改后为:
xmlseed="http://blog.sina.com.cn/rss/adsbaby.xml?tmp="&int(rnd*1000)
’注意:在URL地址中,最后增加”?xxx=number“这种形式对浏览内容不会影响,是让浏览地址内容重新加载的一种比较好的办法
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET",xmlseed,False
http.send
Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.Async=False
xmlDoc.ValidateOnParse=False
xmlDoc.Load(http.ResponseXML)
Set bitem=xmlDoc.getElementsByTagName("item")
if bitem.Length>=0 then
ReadSinaRss="<table width=100% cellpadding=0 cellspacing=0>"
For bi=0 To (bitem.Length-1)
 if bi<=5 then
 
  Set pubdate=bitem.Item(bi).getElementsByTagName("pubDate")
  Set title=bitem.Item


相关文档:

HTML、SHTML、DHTML、XHTML、XML区别


HTML - Hyper Text Mark-up Language - 超文本标记语言
     HTML-超文本标记语言,是WWW的描述语言。设计HTML语言的目的是为了能把存放在一台电脑中的文本或图形与另一台电脑中的文本或图形方便地联系在一起,形成有机的整体,人们不用考虑具体信息是在当前电脑上还是在网络的其它电脑上。我们只 ......

C#删除XML结点的简单例子

接上一篇
删除原genre属性,删除leixing=love的所有结点。
1 原xml文件 bookstore.xml
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
  <book genre="love" ISBN="1234123">
    <title>who am i </title>
    <author>who</aut ......

C#显示XML元素内容的简单例子

接上一篇
显示所有结点的内容
1 原xml文件 bookstore.xml
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
  <book ISBN="1234123">
    <title>who am i </title>
    <author>who</author>
    <price> ......

精品代码 用asp创建数据库

在网上看到很多这方面的代码,但是有些是不能用,有些是垃圾代码太多,我简单的修改了一下现在与大家共享一下。
<%
Option Explicit
dim databasename '定义数据库名称
databasename="database.mdb"    '数据库名称
dim databasepath '定义数据库存放路径 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号