亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > ASP > 正文

atom2rss.asp

2024-05-04 10:58:47
字體：大 中 小
來源：轉載
供稿：網友
復制代碼 代碼如下:

<%
' atom2rss.asp
' Author: Francesco Passantino
' Email: francesco@iteam5.net
' Blog: www.iteam5.net/blog
' Start date: 17 Sep 2004


Sub atom2rss(URL)
Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0")
objXML.async = false
objXML.setProperty "ServerHTTPRequest", True
objXML.validateOnParse = true
objXML.preserveWhiteSpace = false

If Not objXML.Load(URL) Then

Response.write "<P>ERROR<br>code: " & _
objXML.parseError.errorCode & _
"<br>Linea/Col: " & _
objXML.parseError.line & "/" & _
objXML.parseError.linepos & "</P>"

Else

rsstitle="iteam5.net/blog"
rssdescription="Blog sulle novit?del settore Information & Communication Technologies"
rsslink="http://www.iteam5.net/blog"
rsslanguage="it"

xml= "<?xml version=""1.0"" encoding=""UTF-8""?><rss version=""0.91""><channel><title>"&server.htmlencode(rsstitle)&"</title><description>"&server.htmlencode(rssdescription)&"</description><link>"&server.htmlencode(rsslink)&"</link><language>"&server.htmlencode(rsslanguage)&"</language>"

Set objNodeList = objXML.getElementsByTagName("entry")
For Each objNode In objNodeList
    For Each objNode2 In objNode.childNodes

    Select Case objNode2.nodeName
    Case "issued"
    strdate= left(objNode2.firstChild.nodevalue,10)
    Case "link"
    strURL = objNode2.GetAttribute("href")
    Case "title"
    strTitle = objNode2.firstChild.nodevalue

    'instead of Case "content"
    Case "summary"

    strDescription = objNode2.firstChild.data
    For Each objNode3 In objNode2.childNodes
        Select Case objNode3.nodeName
            Case "div"
            StrDescription = objNode3.text
            For Each objNode4 In objNode3.childNodes
            Select Case objNode4.nodeName
                Case "a"
                linkable=objNode4.firstChild.text
                htmlink=" <a href='"& _
                objNode4.GetAttribute("href")&"'>"& _
                linkable&"</a>"
                StrDescription = replace(StrDescription,linkable,htmlink)
            end select
            next
        end select
    next
    End Select
Next

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
奇米成人av国产一区二区三区| 亚洲精品久久久久久久久久久久久| 日本不卡高字幕在线2019| 欧美精品一二区| 久久亚洲一区二区三区四区五区高| 久久夜色精品国产| 蜜臀久久99精品久久久久久宅男| 欧美午夜视频在线观看| 日韩精品在线播放| 亚洲专区国产精品| 亚洲专区国产精品| 国产精品第三页| 97在线视频一区| 亚洲free性xxxx护士hd| 欧美视频不卡中文| 久久综合免费视频影院| 欧美性猛交xxxx乱大交极品| 国产精品日韩专区| 成人福利在线观看| 国产亚洲欧美日韩精品| 91av在线播放| 成人黄色在线免费| 亚洲欧洲午夜一线一品| 青草成人免费视频| 亚洲加勒比久久88色综合| 国产精品日韩一区| 亚洲色图狂野欧美| 久久大大胆人体| 久久精品国产亚洲精品2020| 91九色视频在线| 国产精品久久久久91| 久久久久久网址| 国产在线久久久| 91成人天堂久久成人| 久久影视免费观看| 欧美黑人一级爽快片淫片高清| 欧美激情综合亚洲一二区| 中文字幕国产亚洲2019| 国产亚洲综合久久| 午夜精品一区二区三区av| 97久久精品人搡人人玩| 国产日韩一区在线| 中文字幕一区二区三区电影| 精品久久久久久国产91| 57pao成人国产永久免费| 日韩欧美第一页| 欧美精品在线看| 中文国产成人精品| 欧美日韩国产一中文字不卡| 欧美精品手机在线| 欧美国产视频日韩| 奇米影视亚洲狠狠色| 欧美一级在线播放| 色无极亚洲影院| 亚洲免费中文字幕| 91豆花精品一区| 国产精品久久久久久久久久小说| 亚洲aaa激情| 亚洲精品电影久久久| 亚洲天堂av图片| 日韩电影免费观看在线| 久久全球大尺度高清视频| 精品无人区乱码1区2区3区在线| 久久精品国产久精国产思思| 中文在线不卡视频| 中文字幕亚洲字幕| 97精品久久久中文字幕免费| 亚洲区在线播放| 久久久999精品视频| 日韩av手机在线观看| 亚洲国产精品久久久久久| 免费91麻豆精品国产自产在线观看| 欧美日韩免费区域视频在线观看| 国产欧美日韩精品丝袜高跟鞋| 国产三级精品网站| 久久久精品国产网站| 欧美一区二区大胆人体摄影专业网站| 亚洲国产小视频在线观看| 中文字幕自拍vr一区二区三区| 日韩av综合网站| 久久久精品在线| 久久久999精品免费| 亚洲欧美成人一区二区在线电影| 国产成人综合一区二区三区| 成人有码在线播放| 国产欧美日韩精品在线观看| 97碰在线观看| 97人洗澡人人免费公开视频碰碰碰| 国产成人涩涩涩视频在线观看| 91理论片午午论夜理片久久| 欧美最猛性xxxx| 国产在线精品成人一区二区三区| 91亚洲精品久久久久久久久久久久| 久久久97精品| 国产欧美韩国高清| 欧美精品情趣视频| 韩国欧美亚洲国产| 亚洲欧美在线免费观看| 韩国美女主播一区| 欧美成人精品在线视频| 九九视频直播综合网| 国产精品成人一区二区| 俺去了亚洲欧美日韩| 日本在线精品视频| 超碰91人人草人人干| 亚洲第一精品自拍| 日韩在线欧美在线国产在线| 日韩精品在线免费观看| 亚洲xxxx在线| 国产精品扒开腿做| 欧美在线欧美在线| 欧美又大又硬又粗bbbbb| 亚洲色图第一页| 国产精品扒开腿做爽爽爽男男| 日韩免费中文字幕| 久久国产精品视频| 欧美国产日韩中文字幕在线| 国产成人一区二区在线| 久久久久久久久中文字幕| 尤物yw午夜国产精品视频| 亚洲性69xxxbbb| 国产成人精品a视频一区www| 亚洲区一区二区| 成人羞羞国产免费| 欧美日韩一区二区免费在线观看| 国产成人精品网站| 亚洲成人在线网| 美女视频黄免费的亚洲男人天堂| 亚洲天堂av高清| 日韩亚洲综合在线| 欧美激情一级精品国产| 亚洲一区二区三区在线视频| 国产91精品久久久| 亚洲毛片在线免费观看| 国产精品视频区| 日韩精品中文字幕有码专区| 91av在线不卡| 国产精品国内视频| 中文字幕一区二区三区电影| 91欧美精品成人综合在线观看| 欧美人在线视频| 日韩在线国产精品| 日韩性生活视频| 97精品国产aⅴ7777| 亚洲色图欧美制服丝袜另类第一页| 中文字幕亚洲欧美日韩在线不卡| 久久夜色撩人精品| 久久久精品国产一区二区| 亚洲成人中文字幕| 欧美日韩国产va另类| 亚洲一区国产精品| 色无极影院亚洲| 在线播放国产精品| 92看片淫黄大片欧美看国产片| 亚洲美女性生活视频| 久久频这里精品99香蕉| 国产欧美一区二区三区在线| 国产亚洲精品一区二555| 日韩视频免费大全中文字幕| 久久99精品国产99久久6尤物| 久久色在线播放| 国产精品视频白浆免费视频| 久久精品国产96久久久香蕉| 亚洲 日韩 国产第一|