atom_js.asp

发布时间:2022-04-17 发布网站:脚本宝典
脚本宝典收集整理的这篇文章主要介绍了atom_js.asp脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。
复制代码 代码如下:

<%&nbsp;                    
' I converted some of your example found on http://www.ITeam5.net/francesco/atom/ over to jscript. 
' Feel free to use it and keep up the good work.
' Tyson Kopczynski
' tyson@cco.COM


           function atom(strURL)
          {
           VAR objXML = new ActiveXObject("msxML2.DOMDocument.3.0");
           objXML.async = false;
           objXML.setPRoPErty("ServerHTTPRequest", true);
           objXML.validateOnParse = true;
           objXML.preserveWhiteSpace = false;

           if (!objXML.load(strURL))
            {
             var array = new Array();

             Response.Write("<P>ERROR<br>code: " + objXML.parseError.errorCode)
             Response.Write("<br>Linea/Col: " + objXML.parseError.line & "/" + objXML.parseError.linepos)
             Response.Write("</P>")

             return(array)
            }
           else
            {
             var objnodelist = objXML.getelementsbytagname("entry");
             var arrDicts = new Array(objNodeList.length);

             for (var i=0; i<objNodeList.length; i++
              {
               arrDicts[i] = new ActiveXObject("Scripting.Dictionary");

               arrDicts[i].Item("issued") = objNodeList[i].getElementsByTagName("issued")[0].FirstChild.nodeValue
               arrDicts[i].Item("id") = objNodeList[i].getElementsByTagName("id")[0].firstChild.nodeValue
               arrDicts[i].Item("link") = objNodeList[i].getElementsByTagName("link")[1].getAttribute("href")
               arrDicts[i].Item("author") = objNodeList[i].getElementsByTagName("author")[0].xml
               arrDicts[i].Item("title") = objNodeList[i].getElementsByTagName("title")[0].firstChild.nodeValue
               arrDicts[i].Item("content") = objNodeList[i].getElementsByTagName("content")[0].xml
              }
             return(arrDicts) 
            }
           }

         var blogURL = "http://taosage-net.bLOGspot.com/atom.xml";
         var blogItems = atom(blogURL);

         Response.Write("<strong>")
         Response.Write("<a href='" + blogItems[0].Item("link") + "'>" + blogItems[0].Item("title") + "</a>")
         Response.Write("</strong>")

         Response.Write("<table width='100%' cellspacing='0' cellpadding='0'>")
         Response.Write("<tr>")
         Response.Write("<td width='10' rowspan='2'>&nbsp;</td>")
         Response.Write("<td>" + blogItems[0].Item("content") + "<br></td>")
            Response.Write("</tr>")
         Response.Write("<tr>")
         Response.Write("<td>posted by " + blogItems[0].Item("author") + " @ " + blogItems[0].Item("issued") + "</td>")
         Response.Write("</tr>")
         Response.Write("</table>")
        %>


脚本宝典总结

以上是脚本宝典为你收集整理的atom_js.asp全部内容,希望文章能够帮你解决atom_js.asp所遇到的问题。

如果觉得脚本宝典网站内容还不错,欢迎将脚本宝典推荐好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: