原创力文档- 1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
- 2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
WebService的方法
WebService的方法
几种调用WebService的方法2007-08-27 19:231． 在JavaScript中调用WebService
script language=javascript
function PostRequestData(URL,data){
var xmlhttp = new ActiveXObject(Microsoft.XMLHTTP);
xmlhttp.Open(POST,URL, false);
xmlhttp.SetRequestHeader (Content-Type,text/xml; charset=utf-8);
xmlhttp.SetRequestHeader (SOAPAction,/myService/test/isNumner);
try {
xmlhttp.Send(data);
var result = xmlhttp.status;
}
catch(ex) {
return(0 + ex.description + | + ex.number);
}
if(result==200) {
return(1 + xmlhttp.responseText);
}
xmlhttp = null;
}
function loadit(value){
var url = http://localhost/myService/test.asmx;
var data ;
var r;
data = ?xml version=1.0 encoding=utf-8?;
data = data + soap:Envelope xmlns:xsi=/2001/XMLSchema-instance xmlns:xsd=/2001/XMLSchema xmlns:soap=/soap/envelope/;
data = data + soap:Body;
data = data + isNumner xmlns=/myService/test;
data = data + str+value+/str;
data = data + /isNumner;
data = data + /soap:Body;
data = data + /soap:Envelope;
r=PostRequestData(url,data);
document.write(r);
}
loadit(5);
/script
还可以使用微软的htc组件来实现，可以到这里下载:
/workshop/author/webservice/webservice.htc
script language=javascript
function timer(){
service.useService(http://localhost/myService/test.asmx?WSDL,test);
service.test.callService(callback,isNumner,gdh);
}
function callback(res){
if (!res.error)
time.innerText=res.value;
}
/script
div id=service style=behavior:url(webservice.htc)/div
span id=time/span
2. 在Asp中
%@LANGUAGE=VBSCRIPT CODEPAGE=936%
%
Dim strxml
Dim str
定义soap消息
strxml = ?xml version=1.0 encoding=tf-8?
strxml = strxml soap:Envelope xmlns:xsi=/2001/XMLSchema-instance xmlns:xsd=/2001/XMLSchema xmlns:soap=/soap/envelope/
strxml = strxml soap:Body
strxml = strxml isNumner xmlns=/myService/test
strxml = strxml str4/str
strxml = strxml /isNumner
strxml = strxml /soap:Body
strxml = strxml /soap:Envelope
定义一个XML的文档对象，将手写的或者接受的XML内容转换成XML对象
set x = createobject(Microsoft.DOMDocument)
初始化XML对象
将手写的S
文档评论（0）