以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]webservice报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86315)

--  作者:狐作非为
--  发布时间:2016/6/15 12:31:00
--  [求助]webservice报错

图片点击可在新窗口打开查看此主题相关图片如下:444.png
图片点击可在新窗口打开查看

--  作者:狐作非为
--  发布时间:2016/6/15 12:32:00
--  
Dim s = new Test.CAdxWebServiceXmlCC.CAdxCallContext()
Dim _caService = new CAdxWebServiceXmlCCClient
Dim CaService = new CAdxWebServiceXmlCCClient
s.codeLang ="CHI"
s.codeUser ="ADMIN"
s.password =""
Dim poolAlias = "LLTEST" \'// "LLTEST";//"YLLX3WS"; //cc.poolAlias = "WS_DEMOBRI";                // Pool name
Dim importModel = System.Configuration.ConfigurationManager.GetSection("importModel")
If importModel IsNot Nothing Then
    Dim model = DirectCast(importModel, System.Collections.IDictionary)
    If model("poolAlias") IsNot Nothing Then
        poolAlias = TryCast(model("poolAlias"), String)
    Output.Show(poolAlias)
    End If
End If
s.poolAlias = poolAlias
s.requestC & vbCr & vbLf & "&adonix.trace.on=on&adonix.trace.level=3" & vbCr & vbLf & "&adonix.trace.size=8"
Return _caService 
CaService.save(s, "YWMSMFG", FileSys.ReadAllText("d:\\test.xml", Encoding.Default))

--  作者:大红袍
--  发布时间:2016/6/15 14:51:00
--  
 请,先去vs里面编写代码测试成功了,再来foxtable里面写代码。好吗?