新书推介：《语义网技术体系》
作者：瞿裕忠，胡伟，程龚
   XML论坛     W3CHINA.ORG讨论区     >>计算机科学论坛<<     SOAChina论坛     Blog     开放翻译计划     新浪微博  
 
  • 首页
  • 登录
  • 注册
  • 软件下载
  • 资料下载
  • 核心成员
  • 帮助
    		•   Add to Google

    >> XML网站展示，XML源代码，XML编程示例。 本版仅接受原创、转贴、网站展示，具体的技术交流请前往各相关版块。
    [返回] 计算机科学论坛 → XML.ORG.CN讨论区 - XML技术 → 『 XML源码及示例(仅原创和转载) 』 → 求:ASP远程读取RSS列表源码 ◇查看新帖 ◇ 用户列表 ◇

      发表一个新主题  发表一个新投票  回复主题  (订阅本版) 您是本帖的第 4585 个阅读者浏览上一篇主题  刷新本主题   树形显示贴子　浏览下一篇主题
     * 贴子主题： 求:ASP远程读取RSS列表源码 举报  打印  推荐  IE收藏夹 
       本主题类别:     
     uumeme 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：3
      积分：66
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给uumeme发送一个短消息 把uumeme加入好友 查看uumeme的个人资料 搜索uumeme在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看uumeme的博客楼主
    发贴心情 求:ASP远程读取RSS列表源码

    最近公司要用ASP做一个项目，远程读取“DONEWS”网站的RSS，地址为：
    http://www.donews.com/rss.xml
    要求：
    1。ASP远程读取XML文件
    2。在网页上显示出该XML文件的部分内容，如：只显示<title><link>的内容
    3。只显示最新的10条新闻

       收藏   分享  
    顶(0)
      




    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/9 15:15:00
     
     adolfty 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：7
      积分：90
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给adolfty发送一个短消息 把adolfty加入好友 查看adolfty的个人资料 搜索adolfty在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看adolfty的博客第2楼
    发贴心情 
    代码如下:

    <html>
    <head>
    <title>远程读取XML文件</title>
    <style type="text/css">
       p {font-size:12px;}
       p.font {font-size:14px;}
       p.indent {text-indent:24px;}
       b {font-size:12px;font-weight:bold;}
       small {font-size:12px;}
       
    </style>
    </head>

    <body>
    <script language="JavaScript">
       var xmlDoc=new ActiveXObject("Microsoft.xmlDOM");
       xmlDoc.async=false;
       xmlDoc.load("http://www.donews.com/rss.xml");
       //xmlDoc.loadxml("<description>品格</description>");

       var root=xmlDoc.documentElement;
        var number=root.selectNodes("channel/item").length;

      if(number<=10)
         alert("对不起,该新闻条数已经少于要显示的新闻条数!");  
      else
       {
          document.writeln("<p align='center' class='font'>"+root.childNodes(0).childNodes(0).text+"<p>");     
          document.writeln("<p class='indent'>"+root.childNodes(0).childNodes(1).text+"</p>");
          document.writeln("<p class='indent'>"+root.childNodes(0).childNodes(2).text+"</p>");
         for(var i=0;i<10;i++)
      {
       document.writeln("<b>"+root.childNodes(0).childNodes(5+i).childNodes(0).text+"</b><br/><br/>");
    document.writeln("<small>"+root.childNodes(0).childNodes(5+i).childNodes(4).text+"&nbsp;&nbsp;&nbsp;&nbsp;"+root.childNodes(0).childNodes(5+i).childNodes(3).text+"</small><br/>");
    document.writeln("<small><a href='"+root.childNodes(0).childNodes(5+i).childNodes(1).text+"'>"+root.childNodes(0).childNodes(5+i).childNodes(1).text+"</a></small><br/><br/>");
    document.writeln("<p class='indent'>"+root.selectNodes("channel/item/description")(i).text+"</p><br/><br/>");
       }
      }
    </script>
    </body>
    </html>

    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/10 13:14:00
     
     uumeme 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：3
      积分：66
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给uumeme发送一个短消息 把uumeme加入好友 查看uumeme的个人资料 搜索uumeme在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看uumeme的博客第3楼
    发贴心情 
    发现一个问题：
    在本地机上测试没有问题
    但是传到服务器上后不能正常显示


    [此贴子已经被作者于2005-4-11 14:06:30编辑过]
    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/11 10:50:00
     
     uumeme 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：3
      积分：66
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给uumeme发送一个短消息 把uumeme加入好友 查看uumeme的个人资料 搜索uumeme在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看uumeme的博客第4楼
    发贴心情 
    但是如果要全部用ASP实现呢？
    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/11 12:45:00
     
     adolfty 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：7
      积分：90
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给adolfty发送一个短消息 把adolfty加入好友 查看adolfty的个人资料 搜索adolfty在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看adolfty的博客第5楼
    发贴心情 
    谢谢这位朋友的提醒，的确在本地测试一切都很好，放到服务器都出问题了。
    这是我的疏忽.
    下面是改正后的源代码，应该符合你的要求了吧?

    <% @language="VBScript"%>
    <html>
    <head>
    <title>远程读取XML文件</title>
    <meta http-equiv="Content-Type" content="text/html;charset=gb2312">
    <style type="text/css">
       p {font-size:12px;}
       p.font {font-size:14px;}
       p.indent {text-indent:24px;}
       b {font-size:12px;font-weight:bold;}
       small {font-size:12px;}
       
    </style>
    </head>

    <body>
    <%
    dim xmlDoc
    dim root
    dim number

    Set http=Server.CreateObject("Microsoft.XMLHTTP")
    http.Open "GET","http://www.donews.com/rss.xml",False
    http.send

    Set xmlDoc=Server.CreateObject("Microsoft.XMLDOM")
    xmlDoc.Async=False
    xmlDoc.ValidateOnParse=False
    xmlDoc.Load(http.ResponseXML)

    set root=xmlDoc.documentElement
    number=root.selectNodes("channel/item").length

    if number<=10 then
    %>
      <script language="vbscipt">
        msgbox "对不起,该新闻条数已经少于要显示的新闻条数!"
      </script>
    <%
      else
          response.write "<p align='center' class='font'>" & root.childNodes(0).childNodes(0).text & "<p>"     
          response.write "<p class='indent'>" & root.childNodes(0).childNodes(1).text & "</p>"
          response.write "<p class='indent'>" & root.childNodes(0).childNodes(2).text & "</p>"

       for i=0 to 9
       response.write "<b>" & root.childNodes(0).childNodes(5+i).childNodes(0).text & "</b><br/><br/>"
    response.write "<small>" & root.childNodes(0).childNodes(5+i).childNodes(4).text & root.childNodes(0).childNodes(5+i).childNodes(3).text & "</small><br/>"
    response.write "<small><a href='" & root.childNodes(0).childNodes(5+i).childNodes(1).text & "'>" & root.childNodes(0).childNodes(5+i).childNodes(1).text & "</a></small><br/><br/>"
    response.write "<p class='indent'>" & root.selectNodes("channel/item/description")(i).text & "</p><br/><br/>"
      next
      end if
    %>
    </body>
    </html>

    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/12 10:45:00
     
     uumeme 帅哥哟，离线，有人找我吗？
      
      
      等级：大一新生
      文章：3
      积分：66
      门派：XML.ORG.CN
      注册：2005/4/9

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给uumeme发送一个短消息 把uumeme加入好友 查看uumeme的个人资料 搜索uumeme在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看uumeme的博客第6楼
    发贴心情 
    谢谢这位大哥,你是好人!
    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/13 10:19:00
     
     huayicai 帅哥哟，离线，有人找我吗？
      
      
      等级：大一(猛啃高等数学)
      文章：15
      积分：116
      门派：XML.ORG.CN
      注册：2004/8/15

    姓名：(无权查看)
    城市：(无权查看)
    院校：(无权查看)
    给huayicai发送一个短消息 把huayicai加入好友 查看huayicai的个人资料 搜索huayicai在『 XML源码及示例(仅原创和转载) 』的所有贴子 引用回复这个贴子 回复这个贴子 查看huayicai的博客第7楼
    发贴心情 
    Set http=Server.CreateObject("Microsoft.XMLHTTP")
    http.Open "GET","http://www.donews.com/rss.xml",False
    http.send

    请问为什么用相对路径就会出现错误？？
    http.Open "GET","rss.xml",False

    点击查看用户来源及管理<br>发贴IP：*.*.*.* 2005/4/26 15:49:00
     
     GoogleAdSense
      
      
      等级：大一新生
      文章：1
      积分：50
      门派：无门无派
      院校：未填写
      注册：2007-01-01
    给Google AdSense发送一个短消息 把Google AdSense加入好友 查看Google AdSense的个人资料 搜索Google AdSense在『 XML源码及示例(仅原创和转载) 』的所有贴子 访问Google AdSense的主页 引用回复这个贴子 回复这个贴子 查看Google AdSense的博客广告
    2025/7/30 13:10:51

    本主题贴数7，分页： [1]

    管理选项： 修改tag | 锁定 | 解锁 | 提升 | 删除 | 移动 | 固顶 | 总固顶 | 奖励 | 惩罚 | 发布公告
    W3C Contributing Supporter! W 3 C h i n a ( since 2003 ) 旗 下 站 点
    苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
    		 78.125ms