flash cs3 與asp後台資料互動代碼

asp教程寫的，需要在iis環境下測試。在ied環境下硬整肯定是沒有效果的(把後台拿來直接乾的朋友點多，哈哈，所以提前說一下。 )

asp代碼

代碼:

<%@language="vbscrīpt" codepage="65001"%>
<%
dim a,b,ans
a=cint(request.form("a"))
b=cint(request.form("b"))
ans=a+b
response.write("<?xml version=""1.0"" encoding=""utf-8""?>")
response.contenttype = "text/xml"
response.write("<math>")
response.write("<a>"&a&"</a>")
response.write("<b>"&b&"</b>")
response.write("<ans>"&ans&"</ans>")
response.write("</math>")
response.end()
%>

flash代碼

代碼:

//----------------------urlrequest--------------------
var send_urlrequest:urlrequest =new urlrequest();
send_urlrequest.url="flash023.asp";
send_urlrequest.method=urlrequestmethod.post ;
//----------------------data載體---------------------
var data_urlvariables:urlvariables =new urlvariables;
data_urlvariables["a"]=26;
data_urlvariables["b"]=100;
send_urlrequest.data=data_urlvariables;
//-----------------------xml------------------------
var load_xml:xml;
//----------------------urlloader--------------------
var handler_loader:urlloader =new urlloader;
handler_loader.addeventlistener(event.complete ,onloadcompletehandler);
function onloadcompletehandler(_evt:event):void {
load_xml=xml(_evt.target.data);
show_txt.text =load_xml;
show_txt.appendtext("其中返回的得數是："+load_xml.ans);
}
try {
handler_loader.load(send_urlrequest);
} catch (_err:error) {
trace(_err);
}
//--------------------建立一個用於顯示的textfield----------------
var show_txt:textfield =new textfield;
show_txt.multiline =show_txt.wordwrap =true;
show_txt.width =show_txt.height =400;
show_txt.x=75;
addchild(show_txt);