請(qǐng)教高手幫忙給改一下，不勝感激！這是say.asp頁(yè)面的內(nèi)容：<% dim F,T,sC,cL,E,W,nCResponse.ContentType="text/xml"F=Request.Form ("F")T=Request.Form ("T")sC=Request.Form ("sC")cL=Request.Form ("cL")E=Request.Form("E")nC=request.Form("nC")rem 開(kāi)始不文明詞語(yǔ)和禁止詞匯的過(guò)濾for i=0 to ubound(filarray)sC=Replace(sC,filarray(i),"#%^$*@#")nextfor i=0 to ubound(forbidword)sC=Replace(sC,forbidword(i),"#%^$*@#")nextif Request.ServerVariables("REQUEST_METHOD")="POST" thensC="<F>"&trim(F)&"</F><T>"&trim(T)&"</T><E>"&E&"</E><sC>"&trim(sC)&"</sC><cL>"&trim(cL)&"</cL><nC>"&nC&"</nC>"else Response.Endend ifdim c_talkinfo,c_Lid,c_Ip,c_Lid2,newLid,c_name,i,ubnumApplication.Lockc_talkinfo=Application("c_roomtalkinfo"&cstr(session("c_userroomid")))c_Lid=Application("c_roomLid"&cstr(session("c_userroomid")))+1Application("c_roomLid"&cstr(session("c_userroomid")))=c_Lidubnum=ubound(c_talkinfo)
1 回答
慕俠2389804
TA貢獻(xiàn)1719條經(jīng)驗(yàn) 獲得超6個(gè)贊
在本地電腦上測(cè)試的是正常的?
總的意思是:前臺(tái)post數(shù)據(jù)，后臺(tái)生成xml,然后前臺(tái)ajax調(diào)用xml更新頁(yè)面
這里只是前臺(tái)代碼，沒(méi)有后臺(tái)say.asp代碼.
sendMsg()使用ajax.post方法提交數(shù)據(jù)
body=bytes2BSTR(oSend.responseBody);
oDom.loadXML(body);
oDom.parseError.errorCode //說(shuō)明body不是一個(gè)標(biāo)準(zhǔn)的格式的xml數(shù)據(jù).
問(wèn)題出在后臺(tái)生成的xml數(shù)據(jù)上.仔細(xì)檢查后臺(tái)say.asp返回的數(shù)據(jù).
///////////////////////////
sC="<F>"&trim(F)&"</F><T>"&trim(T)&"</T><E>"&E&"</E><sC>"&trim(sC)&"</sC><cL>"&trim(cL)&"</cL><nC>"&nC&"</nC>"
我估計(jì)say.asp的代碼沒(méi)有貼完吧，
關(guān)鍵是生成xml數(shù)據(jù),關(guān)于asp動(dòng)態(tài)生成xml數(shù)據(jù)，網(wǎng)上有許多例子.
with reponse
.write "<?xml version="1.0" encoding="utf-8"?>"
.write "<root>"
.write sC
.write "</root>"
end with
建議你查查xml標(biāo)準(zhǔn)格式.
應(yīng)該是asp生成xml格式錯(cuò)誤，這需要你自己多測(cè)試.
var oDom=new ActiveXObject("Microsoft.XMLDOM");
oDom.async=false;
body=bytes2BSTR(oSend.responseBody);
alert(body) //利用alert,檢查body是否為格式正確的xml
oDom.loadXML(body);
添加回答
舉報(bào)
0/150
提交
取消