这些天真是忙死了，好不容易可以稍微抽点儿时间出来学习学习，改了一下那个习作——BlogAnywhere 熟悉webservice和FLASH V2组件的使用 现在这个版本是： 功能和界面方面都还不完善，也不知道这个东西有用没，它是单向的信息同步，感觉有点儿象股市跟踪一样，不过这个是要通过用户点击触发，不过可以考虑一下滚动新闻式。 现在整个互连网的WEB都在朝XML方向靠，XML让互连网的信息更通畅，另外webservice不仅仅只局限于存在与Internet上，还有其他的载体，相信以后的发展会不错的。最近在看点儿XML,webservice的书。 言归正传这次比上一版本改进的地方是： ·去掉了外部的登陆管理模式（不安全） ·把收藏夹的管理（包括对每个条目的添加，删除与修改）内置入此BLOG的后台管理后台管理预览： 使用的是ASP动态生成XML，并入库。 ASP中的主体函数 sub WriteXML() Dim objDom,objRoot,objPI,objField,Title,Url,Author Set objDom = Server.CreateObject("Microsoft.XMLDOM") objDom.preserveWhiteSpace = True Set objRoot = objDom.createElement("bloganywhere") objDom.appendChild objRoot dim BlogsList set BlogsList=Conn.Execute("select * from **** ORDER BY Blogs_ID DESC") SQLQueryNums=SQLQueryNums+1 while not BlogsList.Eof Set objField = objDom.createElement("i") Set Title = objDom.createAttribute("n") Title.Text = BlogsList("Blogs_Title") objField.setAttributeNode Title Set Url = objDom.createAttribute("f") Url.Text = BlogsList("Blogs_URL") objField.setAttributeNode Url Set Author = objDom.createAttribute("a") Author.Text = BlogsList("Blogs_Author") objField.setAttributeNode Author objRoot.appendChild objField BlogsList.movenext wend Set objPI = objDom.createProcessingInstruction("xml","version='1.0'") objDom.insertBefore objPI, objDom.childNodes(0) objDom.Save Server.MapPath("bloganywhere.xml") end sub 生成的XML文件地址：http://www.playria.com/work/RSSAnywhere/bloganywhere.xml 预览： <!--l version="1.0"--> - <bloganywhere></bloganywhere> FLASH里的处理与前一版本的区别是： ·上一版是直接在FLASH的comboBOX里加入相关的BLOG信息后然后发布的，缺乏移植性，修改困难，不实用。 ·这版在FLASH里加入了XMLconnector组件与外部的XML连接，并绑定comboBOX组件作为容器来显示可选择的条目。 FLASH里的AS： fscommand("showmenu", "false"); this.conn.trigger(); //引用webservice类 import mx.services.*; //变量属性设定 headline_txt.html = true; url_txt.html = true; //設定wsdl服務地方 var wsdlURL = "http://www.webservicex.net/RssToHTML.asmx?WSDL "; ws = new WebService(wsdlURL); //新建对象调用publice free wsdl--RSSTOHTML 小优 = new Object(); 小优.change = function(evt) { //调用RSSTOHTML的GetHTML操作，参数为RSSURL。这里是：blog_cb.selectedItem.data callback = ws.GetHTML(blog_cb.selectedItem.data); //服务成功传回消息 callback.onResult = function(result) { //在下面的textarea里显示结果 headline_txt.text = result; //给按钮赋予对应的GETURL操作参数 goto.onPress = function() { //使用STRING方法获取所选择的BLOG的URL的字符串 //查找BLOG域名，一般形如："http://theweburl/rss.asp"的域名加上前面的"http://"前缀字符数大于15，所以这里设为15 //使用indexOf方法查找 my_str = blog_cb.selectedItem.data; num = my_str.indexOf("/", 15); trace(num); //将查找到的字符串赋给新STRING，方便调用 url_str = my_str.substr(0, num+1); trace(url_str); getURL(url_str, "_blank"); }; }; //服務失敗傳回訊息 callback.onFault = function(fault) { for (i in fault) { trace(i+" : "+fault); } }; }; //comboBox的事件监听 blog_cb.addEventListener("change", 小优);