请将下面的代码完整复制到soapclient.js中
/**//*****************************************************************************
AJAX
Javascript"SOAPClient"library
ThanktoMr.MatteoCasati,IharVoitka-http://www.guru4.net/
Author:ZhangLiang,E-Mail:cheungmine@gmail.com
Date:2006-8-31
*****************************************************************************/
function_debug(rownum,msg)...{alert(rownum+":"+msg);}
varSOAP_SUCCESS=0;
varSOAP_FAULT=1;
var_sr_env_hdr_="<soap:Envelope"+
"xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/""+
"xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance""+
"xmlns:xsd="http://www.w3.org/2001/XMLSchema""+
"xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/">";
var_sr_body_hdr_="<soap:Bodysoap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">";
var_soap_header_m_token_="";//globalvarible,soap_header:m_token
functionSOAPParams(callid,url,method,async,callback,username,password)
...{
this.callid=callid;
this.url=url;//"http://localhost/MtkWebgisServer/MtkWebgis.dll?Handler=GenMtkWebgisWSDL";
this.svc=null;//"http://cl2/MtkWebgisServer/MtkWebgis.dll?Handler=Default";//未完
this.method=method;
if(async+""=="undefined")
this.async=true;//defaultvalue
else
this.async=async;
if(this.async)...{
if(callback+""=="undefined")
this.callback=soap_callback;
else
this.callback=callback;
}
this.username=null;
if(username+""!="")
this.username=username;
this.password=null;
if(password+""!="")
this.password=password;
this.wsdl=null;
this.result=SOAP_FAULT;
this.xmlhttp=null;//xmlhttpobjectreturned
this._pl=newArray();//inputparameterslist
this.add=function(name,value)...{
this._pl[name]=value;
returnthis;
}
this.toXml=function()...{
varxml="";
for(varpinthis._pl)...{
vart=typeof(this._pl[p]);
if(t=="object"||t=="function")
xml+="<"+p+">"+this._pl[p].toXml()+"</"+p+">";
else
xml+="<"+p+">"+this._pl[p].toString().replace(/&/g,"&").replace(/</g,"<").replace(/>/g,">")+"</"+p+">";
}
returnxml;
}
this.setToken=function()...{
if(this.method=="login")...{
_soap_header_m_token_=this.getval("snp:m_token");
}
}
this.getToken=function()...{
return_soap_header_m_token_;
}
this.getval=function(name)...{
varret=SOAPClient._getElementsByTagName(this.xmlhttp.responseXML.documentElement,name).item(0);
returnret.text;
}
this.retval=function()...{
returnthis.getval("return");
}
//SOAP:Fault
this.faultcode=function()...{
returnthis.getval("faultcode");
}
this.faultstring=function()...{
returnthis.getval("faultstring");
}
this.faultdetail=function()...{
returnthis.getval("detail");
}
}
functionSOAPClient()...{}
SOAPClient.invoke=function(params)
...{
params.result=SOAP_FAULT;
if(params.async)
SOAPClient._loadWsdl(params);
else
returnSOAPClient._loadWsdl(params);
}
//private:wsdlcache
SOAPClient_cacheWsdl=newArray();
//private:invokeasync
SOAPClient._loadWsdl=function(params)
...{
//loadfromcache?
params.wsdl=SOAPClient_cacheWsdl[params.url];
if(params.wsdl+""!=""&¶ms.wsdl+""!="undefined")...{
params.svc=SOAPClient._getService(params.wsdl);
returnSOAPClient._sendSoapRequest(params);
}
//getwsdl
var_xmlhttp=SOAPClient._getXmlHttp();
if(params.username+""!="undefined")
_xmlhttp.open("GET",params.url,params.async,params.username,params.password);
else
_xmlhttp.open("GET",params.url,params.async);
if(params.async)...{
_xmlhttp.onreadystatechange=function()...{
if(_xmlhttp.readyState==4)
SOAPClient._onLoadWsdl(params,_xmlhttp);
}
}
_xmlhttp.send(null);
if(!params.async)
returnSOAPClient._onLoadWsdl(params,_xmlhttp);
}
SOAPClient._onLoadWsdl=function(params,req)
...{
if(req.readyState==4&&req.status==200)...{
params.wsdl=req.responseXML;
params.svc=SOAPClient._getService(params.wsdl);
SOAPClient_cacheWsdl[params.url]=params.wsdl;//saveacopyincache
returnSOAPClient._sendSoapRequest(params);
}
returnSOAP_FAULT;
}
SOAPClient._sendSoapRequest=function(params)
...{
//getnamespace,ok
varns=SOAPClient._getAttribValue(params.wsdl.documentElement,"targetNamespace");
//构造SOAP请求,SOAP2.0
varsr=_sr_env_hdr_+"<soap:Header><snp:m_tokenxmlns:snp=""+ns+"">"+
_soap_header_m_token_+"</snp:m_token></soap:Header>"+
_sr_body_hdr_+"<snp:"+params.method+"xmlns:snp=""+ns+"">"+
params.toXml()+"</snp:"+params.method+"></soap:Body></soap:Envelope>";
//sendrequest
params.xmlhttp=SOAPClient._getXmlHttp();
params.xmlhttp.open("POST",params.svc,params.async);
params.xmlhttp.setRequestHeader("SOAPAction",""#"+params.method+""");//SOAPAction:"#HelloWorld"
params.xmlhttp.setRequestHeader("Content-Type","text/xml;charset=utf-8");
if(params.async)...{
params.xmlhttp.onreadystatechange=function()...{
if(params.xmlhttp.readyState==4)
SOAPClient._onSendSoapRequest(params);
}
}
try...{
params.xmlhttp.send(sr);
}
catch(ex)...{}
if(!params.async)
returnSOAPClient._onSendSoapRequest(params);
}
SOAPClient._onSendSoapRequest=function(params)
...{
if(params.xmlhttp.readyState==4&¶ms.xmlhttp.status==200)...{
params.result=SOAP_SUCCESS;//未完...
params.setToken();//设置全局变量:_soap_header_m_token_
}
if(params.async&¶ms.callback)
params.callback(params.result,params);
if(!params.async)
returnparams.result;
}
//private:utils
SOAPClient._getElementsByTagName=function(document,tagName,ns)
...{
try...{
//tryingtogetnodeomittinganynamespaces(latestversionsofMSXML.XMLDocument)
varlst=document.selectNodes(".//*[local-name()=""+tagName+""]");
if(lst.length==0)
throw0;
returnlst;
}
catch(ex)...{}
//oldXMLparsersupport
if(ns+""=="undefined")
returndocument.getElementsByTagName(tagName);
returndocument.getElementsByTagName(ns+":"+tagName);
}
SOAPClient._getService=function(wsdl)
...{
varsoap_address=SOAPClient._getElementsByTagName(wsdl.documentElement,"address","soap").item(0);
returnSOAPClient._getAttribValue(soap_address,"location");
}
SOAPClient._getAttribValue=function(node,name)
...{
return(node.attributes[name]+""=="undefined")?node.attributes.getNamedItem(name).nodeValue:node.attributes[name].value;
}
//private:xmlhttpfactory
SOAPClient._getXmlHttp=function()
...{
try...{
if(window.XMLHttpRequest)...{
varreq=newXMLHttpRequest();
//someversionsofMozdonotsupportthereadyStatepropertyandtheonreadystateeventsowepatchit!
if(req.readyState==null)
...{
req.readyState=1;
req.addEventListener("load",
function()
...{
req.readyState=4;
if(typeofreq.onreadystatechange=="function")
req.onreadystatechange();
},
false);
}
returnreq;
}
elseif(window.ActiveXObject)...{
returnnewActiveXObject(SOAPClient._getXmlHttpProgID());
}
}
catch(ex)...{}
thrownewError("YourbrowserdoesnotsupportXmlHttpobjects");
}
SOAPClient._getXmlHttpProgID=function()
...{
if(SOAPClient._getXmlHttpProgID.progid)
returnSOAPClient._getXmlHttpProgID.progid;
varprogids=["Msxml2.XMLHTTP.5.0","Msxml2.XMLHTTP.4.0","MSXML2.XMLHTTP.3.0","MSXML2.XMLHTTP","Microsoft.XMLHTTP"];
varo;
for(vari=0;i<progids.length;i++)
...{
try
...{
o=newActiveXObject(progids[i]);
returnSOAPClient._getXmlHttpProgID.progid=progids[i];
}
catch(ex)...{};
}
thrownewError("CouldnotfindaninstalledXMLparser");
}
假设ATL XML WebServices实现方法如下:
[id(1),helpstring("登入系统,获得用户令牌和全图URL,以后任何方法调用必须给出令牌")]
HRESULTlogin([in]BSTRUsername,[in]BSTRPassword);
id(2),helpstring("刷新地图,取地图imgURL")]
HRESULTrefresh([out]DOUBLE*Scale,[out,retval]BSTR*imgURL);
客户端IE中调用如下:
<HTML>
<HEAD>
<TITLE>WebGisDemoPage-WebGisAJAXClient</TITLE>
<scriptlanguage="javascript"src="ajax/soapclient.js"></script>
<scriptlanguage="javascript">
//WebServiceURL
varg_url="http://cl2/mtkwebgis/MtkWebgis.dll?Handler=GenMtkWebgisWSDL";
functionsoap_callback(rcode,params)
...{
if(rcode==SOAP_SUCCESS)
...{
switch(params.callid)
...{
case"刷新":
imgMap.src=params.retval();//retval()取得[out,retval]参数
alert("当前比例:"+params.getval("Scale"));//getval(...)取得[out]参数
break;
}
}
else
...{
alert(params.callid+":发生错误");
}
}
functionLogin()
...{
//同步调用,获得令牌
varsoap=newSOAPParams("登录",g_url,"login",false);
soap.add("Username","cheung");
soap.add("Password","mine");
if(SOAP_SUCCESS==SOAPClient.invoke(soap))
refresh();
else
alert("登录失败");
}
functionRefresh()
...{
//异步调用刷新,默认回调函数soap_callback
varsoap=newSOAPParams("刷新",g_url,"refresh");
SOAPClient.invoke(soap);
}
</script>
</HEAD>
<BODYonload="Login();">
<divid="divMap"><imgid="imgMap"></div>
</BODY>
</HTML>
使用soapclient.js需要注意,我假设XML WebServices必须存在如上面所示的login方法,用于验证用户,而且m_token必须是soap头。login原型如下:
[soap_method]
[soap_header(value="m_token",out=true)]
HRESULTlogin(/**//*[in]*/BSTRUsername,/**//*[in]*/BSTRPassword)
...{
CHARszID[MAX_TOKEN_LEN+1];
*szID=0;
DWORDdwSize=MAX_TOKEN_LEN;
HRESULThr=m_spSessionSvc->CreateNewSession(szID,&dwSize,&m_spSession);
CHECK_FAILED(hr);
szID[dwSize]=0;
m_token=CComBSTR(szID).Detach();
returnhr;
}
这样,用户就可以通过soapclient.js在IE中直接调用ATL Server写的XML WebServices了。
(本文写于2006年9月,cheungmine,上海新区时空信息技术有限公司)
分享到:
相关推荐
AtlServer.zip webserver中用到的东西 有需要的下载
在VS2008中移除了对ATL Server的内置代码,而是把它独立为一个开源项目,见 http://www.codeplex.com/AtlServer/ 但这意味着原来在vs2003,vs2005程序中使用了以下头文件的程序将编译出错, 如 fatal...
用atl实现IIS动态web服务器的编程,示例是基于atl web server组件技术,用户可以参考msdn关于组件技术详细说明
ATL Server
使用VC6.0做的COM服务器端和客户端适用于初学者。
ATL_Server_Source_and_Headers
使用ATL服务器并由MFC客户端调用的XML Web服务
用ATL server开发的ISAPI示例程序,包括自动配置功能。
开发ATL Server时常常被srf文件中的非法标签导致的500内部服务错误抓狂,MS给的提示太原始了,竟然没有提示哪个标签非法,为了快速查找非法标签开发了这个工具。也可以作为其它文本文件标签信息的快速查找工具。 (1)...
COM的生成,注册,调用.C#调用C++写的ATL,包括方法、属性、事件等的建立和调用
1、使用ATL建立一个包含2个接口的COM组件,并在其中一个自动化接口中实现字符串的小写转换(如:将HELLO转换成hello);在另一个普通的接口中实现2个方法:通过三角形的3条边长求面积和两数之间的除法()(如:a/b...
ATL Server, 生成WebService代理类,里面包含了自行编译的sproxy.exe
Atl 利用 WTL 生成界面 com接口 供外部调用
不过ATL Server代码已经托管到开源网站上,我们可以找到ATL Server的源代码,编译出Sproxy.exe,这个工具可以根据wsdl文件来生成非托管的代理类。这个代理类还需要配合一些头文件才能一起使用,这个相关的头文件都...
开发ATL Server时常常被srf文件中的非法标签导致的500内部服务错误抓狂,MS给的提示太原始了,竟然没有提示哪个标签非法,为了快速查找非法标签开发了这个工具。也可以作为其它文本文件标签信息的快速查找工具。
开发ATL Server时常常被srf文件中的非法标签导致的500内部服务错误抓狂,MS给的提示太原始了,竟然没有提示哪个标签非法,为了快速查找非法标签开发了这个工具。也可以作为其它文本文件标签信息的快速查找工具。 比...
一个以VC++ ATL 实现的 web 服务,数据库可通过 udl 来定义。
创建一个ATL COM DLL 组件并采用PHP进行调用的程序例子。
第13章 你好,ATL Server:一个新型的C++ Web平台 13.1 微软Web平台(因特网信息服务) 13.2 可能是可以运行的最简单ISAPI扩展 13.3 封装ISAPI 13.4 ATL Server 13.5 ATL Server中的Web服务 13.6 总结 第14章 ATL ...
ATL控件的Web发布方法(内附zxca使用说明).pdf