VB6调用webservice231551

VB6调用webservice的例子，工程引用了Microsoft soap sdk 3.0 和 xml 6.0 (A vb6.0 program for webservice,using Microsoft soap sdk 3.0 and xml 6.0)

/*
注意：用Eclipse编译时使用默认包，即package 为空，把编译后的HelloWorldService.class 拷贝到apache 对应的文件夹下，我的位置为
C:\Program Files\Apache Software Foundation\Tomcat 6.0\webapps\
axis2\WEB-INF\pojo，如果不使用pojo而使用打包方式，则无此限制。
apache 6.0 的配置使用apache-tomcat-6.0.29.exe AXIS2 使用 axis2-1.4.1
注意设置好系统环境，如JAVA_HOMEAXIS2_HOME 等
*/
import java.net.URLDecoder;
import java.net.URLEncoder;
import java.util.Random;
/**
* function: WebService HelloWorld服务示例
* @author hoojo
* @createDate 2011-1-5 下午03:35:06
* @file HelloWorldService.java
* @package com.hoo.service
* @project Axis2WebService
* @blog http://blog.csdn.net/IBM_hoojo
* @email hoojo_@126.com
* @version 1.0
*/
public class HelloWorldService {
public String getVersion（） {
return “ver1.0 made by pyz!20160125“;
}
public int getRandom（int i） {
return i + new Random（）.nextInt（100）;
}
public int getAddResult（int iint j） {
	return i + j;
	}
public String enUTF8（String msg） {
	String newMsg = null;
	//newMsg=URLDecoder.decode（msg “utf-8“）;
	try{
		newMsg = URLEncoder.encode（msg “utf-8“）;
	}catch（Exception ex）{
		ex.printStackTrace（）;
	}
return newMsg;
}
public String deUTF8（String msg） {
	String newMsg = null;
	try{
		newMsg = URLDecoder.decode（msg “utf-8“）;
	}catch（Exception ex）{
		ex.printStackTrace（）;
	}
return newMsg;
}
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件    2734080  2015-11-15 09:46  webservice\20140817_机动车检验监管系统接口使用手册（修改稿）.doc

     文件     684329  2015-12-25 12:22  webservice\51CTO下载-axis2_WebService_开发指南.pdf

     文件    6967994  2016-01-08 00:21  webservice\apache-tomcat-6.0.29.exe

     文件       1396  2016-01-25 15:08  webservice\HelloWorldService.java

     文件       4059  2016-01-26 13:30  webservice\pyz.frm

     文件        884  2016-01-26 13:32  webservice\pyz.vbp

     文件         49  2016-01-26 13:32  webservice\pyz.vbw

     文件       6546  2016-01-24 06:47  webservice\SOAP Toolkit 3.0 webservice 之二.txt

     文件       4420  2016-01-24 06:44  webservice\SOAP Toolkit 3.0 webservice.txt

     文件    1093576  2016-01-24 05:57  webservice\SOAPSDK3.0-KB827257-X86.exe

     文件    3736813  2016-01-24 06:03  webservice\SoapToolkit30.rar

     文件         82  2016-01-25 15:20  webservice\我单位接口序列号和检验机构编号.txt

     目录          0  2016-01-28 18:58  webservice

----------- ---------  ---------- -----  ----

             15234228                    13