几种调用WebService的方法

关注

原创最新推荐文章于 2026-02-15 09:14:26 发布 1.2k 阅读 AI 写同款· GEO 优化 ›

静态分析工具COBOT与Testbed对比 Testbed为规则检查工具的代表，市场占有量非常大，但随着时间的推移，大家从规则匹配转向了用静态分析工具检查Bug，所以规则检查型工具占有量比开始时候已经减少，但仍有一些比较落后的单位还在继续采购此类工具。3、通过对开源工程的测试，进行误漏报率的对比，发现COBOT(库博)的误漏报率相比Testbed较低，因COBOT主打国内市场，在众多军工单位进行大量试用及使用，吸取了众多单位的意见和建议，更加符合国内军工单位的使用习惯及测试要求。4、此外库博在功能上还可以进行计划任务，检测队列，检测并发的功能支持。阅读详情

．在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)

%>