热门文章

 阿标在线 动力3.62HTML生成
 3.62网站文件说明
 动力3.62整合动网7.0 SP2插
 MDAC2.8 下载！
 动力3.62版 防止垃圾留言
 动力3.6全方位改动方法
 让3.62不同频道实现不同风
 把3.62首页登陆为横向代码
 动易3.6首页随机FLASH修改
 362首页和文章频道页图文幻
 个性化修改3.6宝典
 3.62轻易实现网摘功能
 如何正确统计中文字数？
 弹出JAVASCRIPT语法错误对
 后台使“网站顶部LOGO地址
 最新图片文章横向移动的修
 html 生成艺术字
 3.6 Sp2 Logo和Banner及广
 日期值的计算
 汉字转拼音
 首页“图片更新”图片滚动
 简体中文转换为繁体中文的
 如何在css中定义链接的下划

几种调用WebService的方法

1． 在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","http://tempuri.org/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="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">';

data = data + '<soap:Body>';

data = data + '<isNumner xmlns="http://tempuri.org/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组件来实现，可以到这里下载:

http://msdn.microsoft.com/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='http://www.w3.org/2001/XMLSchema-instance' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:soap='http://schemas.xmlsoap.org/soap/envelope/'>"

strxml = strxml & "<soap:Body> "

strxml = strxml & "<isNumner xmlns='http://tempuri.org/myService/test'>"

strxml = strxml & "<str>4</str>"

strxml = strxml & "</isNumner>"

strxml = strxml & "</soap:Body>"

strxml = strxml & "</soap:Envelope>"



'定义一个XML的文档对象，将手写的或者接受的XML内容转换成XML对象

'set x = createobject("Microsoft.DOMDocument")

'初始化XML对象

'将手写的SOAP字符串转换为XML对象

' x.loadXML strxml

'初始化http对象

Set h = createobject( "Microsoft.XMLHTTP")

'向指定的URL发送Post消息

h.open "POST", "http://localhost/myService/test.asmx", False

h.setRequestHeader "Content-Type", "text/xml"

h.setRequestHeader "SOAPAction", "http://tempuri.org/myService/test/isNumner"

h.send (strxml)

While h.readyState <> 4

Wend

'显示返回的XML信息

str = h.responseText

'将返回的XML信息解析并且显示返回值

'Set x = createobject("MSXML2.DOMDocument")

' x.loadXML str



'str = x.childNodes(1).Text



response.write(str)



%>



3．在.net中

在.net中调用WebService就方便多了，没有必要自己写soap消息了，以上都是用XMLHTTP来发送WebService请求的，在.net只要添加了web引用，会自动为你创建一个代理类。然后使用代理类就像用自己定义的类一样方便。

---

上一篇文章： 用程序来自动建立FTP帐号（serv-u的odbc设置）

下一篇文章： 新浪短信Web Service 简介