以下為引用的內容: function findobject(fname,initvalue)...{ var xmlhttp = new activexobject("microsoft.xmlhttp"); xmlhttp.open("post","searchmx.jsp?findobject="+fname+"&initvalue="+initvalue,false);//注意修改jsp頁面 xmlhttp.send(); document.getelementbyid(fname).innerhtml=bytes2bstr(xmlhttp.responsebody); //bytes2bstr函數在bytetostr.js中 } 其次為bytetostr.js,這是vbscript,這個不需要修改任何內容,他的主要功能就是讀取數據轉換字符串用的。 function bytes2bstr(vin) dim i strreturn = "" for i = 1 to lenb(vin) thischarcode = ascb(midb(vin,i,1)) if thischarcode < &h80 then strreturn = strreturn & chr(thischarcode) else nextcharcode = ascb(midb(vin,i+1,1)) strreturn = strreturn & chr(clng(thischarcode) * &h100 + cint(nextcharcode)) i = i + 1 end if next bytes2bstr = strreturn end function |