准备工作
安装MSSOAPToolkit3.0工具
VFP sp2 7423
1 新建VFP项目添下vfpwbs.prg
内容如下(我建议文件名同类名)
接收参数跟VFP过程一样的用LPARAMETERS 参数1,参数2
代码语言：javascript复制Define Class vfpwbs As Session OlePublic
Procedure helloworld
Return "helloworld"
Endproc
Enddefine2 编译成多线程dll
不要编译成EXE就好
3 打开MSSOAP工具 WSDL Generator
4 选择你编译好的COM
5 选择要发布的类
6 选择要发布的域名或IP. 如有端口与要填端口号. 后期要也是可以的
7 不用改动
8 发布文件在什么目录
9 IIS建站,如图示我的网站目录在E:webtestwebservice文件
10 将8步生成的文件放于E:webtestwebservice
可以将刚刚项目编译的 vfpwbs.dll 放到C盘,然后用regsvr32命令注册vfpwbs.dll
11 配置WSDL解析
处理程序映射->添加模块映射
12 测试是否架设成功
打开IE输入网址 http://192.168.0.99:6633/vfpwbs.WSDL,如图所示,架设成功
64位系统IIS 要设置充许运行32位程序
13 因为我们的端口不是80,是6633 ,打开生成的WSDL文件找到如下文字
将原来的location改为location='http://192.168.0.99:6633/vfpwbs.WSDL' 即可.
如更改域名IP端口都是改动这里
记住两个参数 service name与 port name
portname 有两个vfpwbsSoapPort,cowwbsSoapPort
14 VFP调用
oSOAP=Createobject("MSSOAP.soapclient30")
lcurl="http://192.168.0.99:6633/vfpwbs.wsdl"
&&第2参数是service name,第三参数是port name ,如果有两个port name 不可省略
oSOAP.MSSoapInit(lcURL,"vfpwbs","cowwbsSoapPort")
osoap.ConnectorProperty("EndPointURL")=lcurl
?osoap.helloworld()
至此发布完成
