vc6.0调用webservice真是头疼

glgxw 2010-12-29 12:04:52
http://125.40.47.218:8888/zgyb_lc/services/YBService?wsdl
URL地址是这个
调用的时候接收不到返回的消息 不知道啥原因？
ISoapSerializerPtr Serializer;
ISoapReaderPtr Reader;
ISoapConnectorPtr Connector;

// Connect to the service
Connector.CreateInstance(__uuidof(HttpConnector30));


Connector->Property["EndPointURL"] = "http://125.40.47.218:8888/zgyb_lc/services/YBService?wsdl";
Connector->Connect();
MessageBox("1");

// Begin message
Connector->Property["SoapAction"] = "http://schemas.xmlsoap.org/wsdl/soap";
Connector->BeginMessage();
MessageBox("2");


// Create the SoapSerializer
Serializer.CreateInstance(__uuidof(SoapSerializer30));

// Connect the serializer to the input stream of the connector
Serializer->Init(_variant_t((IUnknown*)Connector->InputStream));

// Build the SOAP Message
Serializer->StartEnvelope("","","");
Serializer->StartBody("");
Serializer->StartElement("login","http://schemas.xmlsoap.org/wsdl/","NONE","");
Serializer->StartElement("ddyljg","hhttp://schemas.xmlsoap.org/wsdl/","NONE","");///http://webservice.yb.erixin.com/
Serializer->WriteString((char*)_bstr_t(ddyljg));
MessageBox("3");
Serializer->EndElement();
Serializer->StartElement("mcCString","http://schemas.xmlsoap.org/wsdl/","NONE","");//http://webservice.yb.erixin.com/
Serializer->WriteString((char*)_bstr_t(mcCString));
MessageBox("4");
Serializer->EndElement();
Serializer->EndElement();
Serializer->EndBody();
MessageBox("5");
Serializer->EndEnvelope();
MessageBox("6");
// Send the message to the web service
Connector->EndMessage();
MessageBox("7");
// Let us read the response
Reader.CreateInstance(__uuidof(SoapReader30));
MessageBox("8");
// Connect the reader to the output stream of the connector
Reader->Load(_variant_t((IUnknown*)Connector->OutputStream), "");
MessageBox("9");
// Display the result
//
/*char *ReardWX = new char[ strlen( Reader->RpcResult->text ) + 1 ];
strcpy( ReardWX, Reader->RpcResult->text );
return ReardWX;*/
printf("Answer: %s\n", (const char*)Reader->RpcResult->text);
MessageBox("10");
// MessageBox((const char*)Reader->RpcResult->text);
// return (char*)_bstr_t(sRmsg);
MessageBox((const char*)Reader->Body->xml);
MessageBox((const char*)Reader->RpcResult->text);
return (const char*)Reader->RpcResult->text;
...全文
370 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
以下是俺用的代码：
//WEB SERVICE数据下载

//sWebService--WEB SERVICE地址 如http://192.168.102.168:8080/cbdt/service/seamap

//sNameSpace--命名空间 如http://seamap.service.jlj.gov

//sFunction--下载函数，如getShipPositionList

//arParam--参数数组，包括参数名和参数值

//Reader--返回数据对象

//sOutMsg--错误提示信息

BOOL CWebServiceDownload::SoapDownload(CString sWebService, CString sNameSpace, CString sFunction,CParamArray &arParam,ISoapReaderPtr Reader,CString &sOutMsg)

{

	// Connect to the service.

	m_Connector->Property["EndPointURL"] = _bstr_t(sWebService);

	m_Connector->Connect();

	// 开始消息

	

	m_Connector->Property["SoapAction"] = _bstr_t(sWebService);

	

	m_Connector->BeginMessage();

	

	

	// Connect the serializer object to the input stream of the connector object.

	m_Serializer->Init(_variant_t((IUnknown*)m_Connector->InputStream));

	

	// 创建SOAP消息

	m_Serializer->StartEnvelope("","STANDARD","");

	m_Serializer->StartBody("");

				

	m_Serializer->StartElement(_bstr_t(sFunction),_bstr_t(sNameSpace),"STANDARD","");

	int nSize = arParam.GetSize();

	for(int i=0; i<nSize; i++)

	{

		SOAP_PARAM sp = arParam.GetAt(i);

		m_Serializer->StartElement(_bstr_t(sp.sParamName),"","STANDARD","");

		m_Serializer->WriteString(_bstr_t(sp.sParamVal));

		m_Serializer->EndElement();

	}	

	m_Serializer->EndElement();

	m_Serializer->EndBody();

	m_Serializer->EndEnvelope();

	

	// 将该消息发送给web服务

	try

	{

		m_Connector->EndMessage();     

	}

	catch(_com_error &e)

	{

		_bstr_t bstrSource(e.Source());

		_bstr_t bstrDescription(e.Description());

		sOutMsg.Format("SOAP下载失败：%s",(const char*)bstrDescription);

		return FALSE;

	}

	

    // 将reader联接到connector的输出字符串

	VARIANT_BOOL vb = Reader->Load(_variant_t((IUnknown*)m_Connector->OutputStream), "");

	if(vb == -1)

		return TRUE;

	return FALSE;

}
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
Connector->Property["EndPointURL"] = "http://125.40.47.218:8888/zgyb_lc/services/YBService";
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
用wsdl结尾的怎么回事你需要访问的URL地址呢？wsdl只是查看数据结构的啊。
我已经在VC6下实现了Web Services的数据下载，没有问题啊。返回的是XML数据流，按照XML协议和wsdl中定义的参数和返回值格式进行解析就可以了。
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
谢谢了 主要是俺对这不是很懂 学习阶段 请谅解！
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
你的废话真多......
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
也就是说对自己有用的定义下就可以了？没有用的可以不定义？
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
大致一样。这个就不用强求了。也许比它少几项，也许数据类型不一样。
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
SOAP_AISBASE 是定义的跟返回结构体结构一样的结构体吗？
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复 
	BOOL bReader = SoapDownload(uc.sWebService,uc.sNamespace,uc.sAISBase,arParam,Reader,sOutMsg);

	if(!bReader)

	{

		sOutMsg = "DownloadAISBaseInfo：SOAP下载失败。";

		return FALSE;

	}

	//下载数据解析////////////////////

	CStringList sqlStrList;//形成的插入语句

	IXMLDOMNodeListPtr childNodeList = Reader->RpcResult->GetchildNodes();

	long len = childNodeList->Getlength();//记录的数量

	for(int i=0; i<len; i++)

	{

		IXMLDOMNodePtr nodePtr = childNodeList->Getitem(i);

		IXMLDOMNodeListPtr valNodeList = nodePtr->GetchildNodes();

		long num = valNodeList->Getlength();//字段的数量

		CString sInfo = (const char*)nodePtr->GetnodeName();

		SOAP_AISBASE sa;

		for(int j=0; j<num; j++)

		{

			IXMLDOMNodePtr valPtr = valNodeList->Getitem(j);

			CString sNodeName = (const char*)(valPtr->GetnodeName());

			sNodeName.MakeUpper();

			CString sVal = (const char*)(valPtr->text);

			if(sNodeName == "AISCODE")

				sa.sBaseCode = sVal;

			else if(sNodeName == "AISNAME")

				sa.sBaseName = sVal;

			else if(sNodeName == "SERVICEREGION")

				sa.sSerivceRegion = sVal;

			else if(sNodeName == "ADDRESS")

				sa.sAddress = sVal;

		}

		CString sSql;

		sSql.Format("INSERT INTO AIS_BASE(AIS_BASE_CODE,AIS_BASE_NAME, SERVICEREGION, ADDRESS) values('%s','%s','%s','%s')", 

			sa.sBaseCode,sa.sBaseName,sa.sSerivceRegion,sa.sAddress);

		sqlStrList.AddTail(sSql);

	}
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
如果webservice返回有结构体该怎么取呢？
快乐鹦鹉 2010-12-29
  • 打赏
  • 举报
 回复
其中一个调用是这样的：
BOOL CWebServiceDownload::DownloadSavReportInfo(COleDateTime tStartTime,COleDateTime tEndTime,CString sShipTypeCode,CString sDangerTypeCode,CString &sOutMsg)

{

	ISoapReaderPtr Reader;

	Reader.CreateInstance(__uuidof(SoapReader30));	

	URLCONFIG uc = theApp.m_sysINIFile.GetURLConfig();

	//构造参数

	CParamArray arParam;

	SOAP_PARAM sp;

	sp.sParamName = "username";

	sp.sParamVal = GetEncryptAccount();

	arParam.Add(sp);

	sp.sParamName = "password";

	sp.sParamVal = GetEncryptPass();

	arParam.Add(sp);

	sp.sParamName = "starttime";

	sp.sParamVal = tStartTime.Format("%Y-%m-%d %H:%M:%S");

	arParam.Add(sp);

	sp.sParamName = "endtime";

	if(tEndTime.m_dt > 0.1)

		sp.sParamVal = tEndTime.Format("%Y-%m-%d %H:%M:%S");

	else

		sp.sParamVal = "";

	arParam.Add(sp);

	sp.sParamName = "shiptype";

	sp.sParamVal = sShipTypeCode;

	arParam.Add(sp);

	sp.sParamName = "dangercode";

	sp.sParamVal = sDangerTypeCode;

	arParam.Add(sp);



	//进行SOAP下载

	BOOL bReader = SoapDownload(uc.sWebService,uc.sNamespace,uc.sSavReport,arParam,Reader,sOutMsg);
bragi523 2010-12-29
  • 打赏
  • 举报
 回复
文本service有在客户端调用应该和其他DLL没有两样
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
刚开始接触webservice调用 真是摸不着头绪
glgxw 2010-12-29
  • 打赏
  • 举报
 回复
楼上的还在吗？能不能把你调用函数的这段让俺也看下？谢谢了！
vc6.0调用webservice的方法
本代码介绍了vc6.0如何调用webservice的详细步骤，是通过自己的调试成功 总结下来的
vc6.0调用webservice
vc6.0调用webservice vc调用java的函数，就是这么简单。凑个字数，凑个字数，凑个字数，凑个字数，凑个字数，
windows mobile 6.0 基于WebService方式与PC Server通讯的demo
windows mobile 6.0 基于WebService方式与PC Server通讯的demo
VC6.0中调用Java WebSerice例子
本人亲自测试没问题后，打包上传的。里面包含SOAP3安装文件和例子代码，里面有相应的注释。
Vc++6.0Vb6.0WS2010调用Vc写的DLL
一、HeapDLL(发布文件名：HeapDLL.dll) vc++6.0 制作MFCDLL,接口有 (1) int 传参赋值和取值 (2) 结构体传参 (3) 堆内存的分配和释放 二、VcCallvcDll vc++6.0 LoadLibrary方式调用HeapDLL.dll，测试HeapDLL.dll 的对外接口(含int传参、结构体传参、堆内存分配与释放)。 三、VbCallVcDll vb6.0 调用HeapDLL.dll，测试HeapDLL.dll 的对外接口(含int传参、结构体传参、堆内存分配与释放)。 四、WSCallVcDll visio studio 2010(.net3.5) WebService DllImport方式调用HeapDLL.dll，测试HeapDLL.dll 的对外接口(含int传参、结构体传参、堆内存分配与释放)。
ATL

3,245

社区成员

48,537

社区内容

发帖
与我相关
我的任务
社区描述
ATL，Active Template Library活动(动态)模板库，是一种微软程序库，支持利用C++语言编写ASP代码以及其它ActiveX程序。
社区管理员
  • ATL/ActiveX/COM社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章