asp读取QQ的rss之xml数据 -- [ASP]─ 深山工作室提供网络投票系统|微信公众号投票|微信公众号小程序|抖音小程序|百度小程序|微信公众号开发|企业网站建设

asp读取QQ的rss之xml数据

网络 2009/8/5 20:35:15 深山行者字体:大中小浏览 7190

以下为详细代码

Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", url, False
xml.Send

Set xmlDom = server.createObject("microsoft.xmldom")
xmlDom.async=False
xmlDom.ValidateOnParse=false
xmlDom.load(xml.responseXML)

if xmlDom.ReadyState>2 Then  
set oItem=xmlDom.getElementsByTagName("item")

%>
<table width="550" border="0" cellspacing="0" cellpadding="6">
  <tr>
    <td width="20%" height="25" align="center"><a href="index.asp">QQ新闻聚合</a></td>
    <td width="20%" align="center"><a href="163.asp">163新闻聚合</a></td>
    <td width="20%" align="center">&nbsp;</td>
    <td width="20%" align="center">&nbsp;</td>
    <td width="20%" align="center">&nbsp;</td>
  </tr>
</table>
<table width="550" border="0" cellpadding="3" cellspacing="1" bgcolor="#ECEFF4">
 <%
for i=0 to oItem.length-1
word=oItem(i).childNodes(0).text
title=oItem(i).childNodes.item(0).text
Link=oItem(i).childNodes.item(1).text
pubdate=oItem(i).childNodes.item(4).text
%> 
<tr>
    <td height="24" bgcolor="#FFFFFF">·<a href="<%=link%>" target="_blank"><font style="font-size:14px;" color="#003366"><%=word%>  </font><font color="#999999">(<%=pubdate%>)</font></a></td>
</tr>
<%
next
end if
%>
</table>

前一页:asp读取163的rss之xml数据

后一页:asp正则表达式详细

相关阅读: table表格详解,了解表格不为人知的属性,标准化你的表格; 中国签证行业领导者--亿诚出国签证网; 服务器iis配置.mp4视频格式播放(网页播放.mp4有声音但没有图像画面); 深山旅行社管理系统开源吗？; '禁止站外提交页面和数据; div中的图片链接居中的问题; 旅行社网站模板8; 在图片未知尺寸情况下，利用CSS把图片垂直居中于div中心(2)

更多信息>>栏目类别选择: 百度小程序开发; 微信小程序开发; 微信公众号开发; uni-app; asp函数库; ASP; DIV+CSS; HTML; python

更多>>同类信息: ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明; asp显示随机密码; 通过阿里云服务接口获得ip地址详细信息; iis点开后任务栏上有显示，但是窗口看不到的解决办法; RSA加密解密插件; 微软Encoder加密解密函数

更多>>最新添加文章: dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT; Android移动端自动化测试：使用UIAutomatorViewer与Selenium定位元素; 抖音直播音挂载小雪花懂车帝小程序; javascript获取浏览器指纹可以用来做投票; 火狐Mozilla Firefox出现：无法载入您的Firefox配置文件它可能已经丢失或是无法访问问题解决集合处理办法; 在Android、iOS、Windows、MacOS中微信小程序的文件存放路径; python通过代码修改pip下载源让下载库飞起; python里面requests.post返回的res.text还有其它的吗

更多>>随机抽取信息: 深山旅行社网站管理系统 v1.8; 利用fso判断文件是否存在; innerHTML动态改变ID的CSS样式表; uni-app自定义组件调用; ASP汉字转拼音，支持自定义特殊词语; 网页小键盘/软键盘

更多标签热门标签

单选留言板模版代码翻页站长动画放大产品闭合优化滚动条数组渐隐版权 skype csss 右击 Margin加倍常用搜索引擎 asp dw 访问量深山行者例子文件类型屏幕百度 letter-spacing 字节数论坛技巧比例 JavaScript实现文本框提示效果右击失效左右 vb 转换简易 getElementById 浮动对象缓冲 margin 幻灯 shift jpg PSD 网页制作绝对管用的iis安装包下载 ul 提示