vs项目
1、到vs新建一个类库项目，框架选.net framework 4.02、到项目添加一个服务引用，像上面图片一样
3、新建一个类，在类里面添加一个函数，假设名称为HelloWorld，代码如下：
Public Function HelloWorld() As String
Dim obj As New ServiceReference1.RequestFormWebServiceSoapClient() ‘这个是服务的主类型，所有服务接口都在RequestFormWebServiceSoapClient类里，而命名空间是ServiceReference1，在生成服务的时候可以自己改为其它名称，如上图
Return obj.HelloWorld()
End Function
又比如调用服务的AppliyUpLoad函数，可以定义这样的函数：
Public Function AppliyUpLoad(ByVal xmlData As String, ByVal orgID As String, ByVal jzType As String, <System.Runtime.InteropServices.OutAttribute()> ByRef sMsg As String) As Boolean
Dim obj As New ServiceReference1.RequestFormWebServiceSoapClient()
Return obj.AppliyUpLoad(xmlData, orgID, jzType, sMsg)
End Function
AppliyUpLoad接口是需要参数的（上面红色代码），至于是什么参数可以看接口文档说明，或者自行查看服务代码，照抄，查看代码方法，在 obj.AppliyUpLoad属性上右键选转到定义即可
此主题相关图片如下：2.png
4、编译这个类库为dll文件
foxtable项目
1、把dll复制到foxtable安装目录，并添加引用
2、打开foxtable按目录里的Foxtable.exe.config文件，添加如下配置（这个配置在vs项目的app.config文件中可以找到，添加web引用引用后会自动添加的，自己可以对比vs项目添加web引用前和添加web引用后的内容找出这段配置内容）
<system.serviceModel>
<bindings>
<basicHttpBinding>
<binding name="RequestFormWebServiceSoap" />
</basicHttpBinding>
</bindings>
<client>
<endpoint address="http://49.232.191.89/WebLisService/RequestFormWebService.asmx"
binding="basicHttpBinding" bindingC
c name="RequestFormWebServiceSoap" />
</client>
</system.serviceModel>
这段设置放到Foxtable.exe.config文件<startup>段之前，如：
此主题相关图片如下：1.png
注意备份Foxtable.exe.config文件，升级或者重装foxtable会被覆盖掉
3、调用接口的代码：
dim jk as new WeblisServiceTest.WeblisService()
dim res as string = jk.HelloWorld()
msgbox(res)
dim sMsg as string
dim res2 as boolean = jk.AppliyUpLoad("xmlData参数值", "orgID参数值", "jzType参数值", sMsg)
msgbox(sMsg)
[此贴子已经被作者于2020/8/29 17:03:33编辑过]
加好友 
发短信
Post By：2020/8/29 12:29:00 [只看该作者]
