| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [分享]调用WebServices的另一种方法，支持SOAP方式调用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40280) |
| -- 作者：xdongx -- 发布时间：2013/9/13 23:16:00 -- [分享]调用WebServices的另一种方法，支持SOAP方式调用 调用WebServices遇到问题，有些服务未提供URL调用支持。 经有点甜指点，测试成功。 问题贴： http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=40202&skin=0 分享C#编译后的DLL库。 以下内容只有回复后才可以浏览 调用方式： 1、引用HDSoft.Lib.dll 2、Dim arg(1) As String \'定义查询参数:加入有两个参数，根据实际数量定义 3、arg(0) = e.Form.Controls("TextBox1").Text \'按WebServices参数顺序依次赋值 4、arg(1) = e.Form.Controls("TextBox2").Text \' 5、Dim obj As object = HDSoft.Lib.WebServices.InvokeWebService("http://服务地址/path/服务名.asmx","方法名",arg) 6、根据返回结果判断是否成功。如果调用时发生错误，返回null。 ============================ \'假设测试的服务为验证用户密码的，返回1为验证成功，0不成功。 Dim obj As object = HDSoft.Lib.WebServices.InvokeWebService("https://test.com.cn/MYWS/MyService.asmx","AuthUser",arg) If obj=Nothing Then e.Form.Controls("Label1").Text = "连接服务器错误,请检查网络." Else If obj.ToString() = 1 e.Form.Controls("Label1").Text = "登录成功" Else e.Form.Controls("Label1").Text = "用户或密码错误,登录失败." End If End If [此贴子已经被作者于2013-9-13 23:19:08编辑过]
|
| -- 作者：zpx_2012 -- 发布时间：2013/9/14 0:20:00 -- 顶下 |
| -- 作者：lsy -- 发布时间：2013/9/14 7:20:00 -- 好，顶帖的人来了。
|
| -- 作者：Bin -- 发布时间：2013/9/14 11:56:00 -- 顶 |
| -- 作者：blackzhu -- 发布时间：2013/9/14 13:37:00 -- 看看这个 |
| -- 作者：langui -- 发布时间：2013/9/16 16:16:00 -- 谢谢了 |
| -- 作者：wssylxb -- 发布时间：2013/9/16 20:19:00 -- 高！这个内容我正需要，万分感激！ |
| -- 作者：comnets -- 发布时间：2013/9/17 19:14:00 -- 顶起！ |
| -- 作者：wangzhe001 -- 发布时间：2013/9/18 9:15:00 -- 谢谢楼主分享 |
| -- 作者：xiandou -- 发布时间：2013/9/28 20:27:00 -- 这个好,可以用来调用我需要的信息 |