从flash传到ASP保存XML数据

　　原本是想不通过ASP来保存XML数据的.但是经过几天的努力还是没有研究出来.
所以无奈只能是借用ASP才能把XML数据保存起来
如果哪位能够把XML数据直接保存起来而不通过ASP的.麻烦分享一下啊.先谢了.

<%
dim lname,ladd
lname=request.form("lname")
ladd=request.form("ladd")
Set xml=Server.CreateObject("Microsoft.XMLDOM")’创建一个对象用来对XML文件的操作.
xml.Async=False
xml.ValidateOnParse=False
xml.Load(server.mapPath("my.xml"))’加载xml文件
        ’Set item=xml.getElementsByTagName("link")
’response.write item.Length’以上两句用来测试用的.
Set mxml=Server.CreateObject("Microsoft.XMLDOM")
set root=xml.documentElement’取得加载进来的XNL文件的根节点,这步很得要的.
        set newNode=mxml.createNode ("element", "link", "")’创建一个新节点newNode,并命为为link
     root.appendChild(newNode) ’在上面得到的加载进来的XML文件的根节点后追加一个新建的节点newNode,
        Set objname = mxml.createAttribute("name")’为新建的节点创建属性项
         objname.Text = lname’为新建属性项添加属性值
   newNode.setAttributeNode objname’把新建的属性添加到新建节点newNode里面去.
Set objadd = mxml.createAttribute("address")
         objadd.Text = ladd
   newNode.setAttributeNode objadd’同上
xml.save(server.mapPath("my.xml"))
’保存XML文件,注意这里,尽可能地使用Server.MapPath()来表示存储在服务器上的文件而不要用静态绝对路径
response.write ("staut=ok")
Set xml=Nothing
Set mxml=Nothing
%>

flash
放一个下拉列表cb,一个按钮去场景中.
然后在第一帧写上:

System.useCodepage = true;
var myArray = new Array();
var myXML = new XML();
myXML.ignoreWhite = true;
myXML.onLoad = function(success) {
if (success) {
for (var i = 0; i<this.firstChild.childNodes.length; i++) {
   var Node = this.firstChild.childNodes[i];
   myArray.push({name:Node.attributes.name, address:Node.attributes.address});//把XML节点的属性值放到数组里面去.
   cb.addItem({data:myArray[i].address, label:myArray[i].name});//为下拉列表赋值.
}
}
};
myXML.load("my.xml");//加载XML文件
var cbL = new Object();
cbL.change = function(evt_obj) {
var item_obj = cb.selectedItem;
myName.text = item_obj.label;
linkt.text = item_obj.data;
getURL(item_obj.data, "_blank");
};
cb.addEventListener("change", cbL);
stop();

//这上面的语句还有疑问的话.请跟贴.
在按钮上的代码为:

on (click) {
_root.gotoAndStop(2);
}

第二帧没有代码:
就在场景中放两个文本框分别命名为:lname;ladd
一个提交按钮,按钮上的代码为:

on (click) {
_global.lname = _root.lname.text;
_global.ladd = _root.ladd.text;
_root.gotoAndStop(3);
}

第三帧:

//如果对上面的语句不懂的话.请看我前面的两篇日志.如果还是不懂的话.再发问吧.
第四帧放个写着出错提示的文本框。