Cita:
Iniciado por tazzito
Dim MiSoapWS As New SoapClient30
'On Local Error Resume Next
MiSoapWS.MSSoapInit "http://www.elguille.info/NET/WebServices/HolaMundoWebS.asmx?wsdl"
if VariableMetodoElejido="Saludar" then
TxtResultado.Text = MiSoapWS.Saludar
elseif VariableMetodoElejido="Saludo" then
TxtResultado.Text = MiSoapWS.Saludo("hunabku")
Endif
Set MiSoapWS = Nothing
Oye tazzito una pregunta estaba probando en un webservice que tengo local y realize 2 parametros uno como el siguiente
<WebMethod(Description:="Ejemplo de texto")> _
Public Function TextoUno() As String
Return "PRUEBA"
End Function
qne en efecto me devolvio el stringo de PRUEBA
pero quise meter este otro:
<WebMethod(Description:="Consulta de ABONOS")> _
Public Function abonos() As String
cmd.ActiveConnection = rs
cmd.CommandType = ADODB.CommandTypeEnum.adCmdText
cmd.CommandText = "select * from cajcautmovtoabono "
rs = cmd.Execute()
Return rs
End Function
el cual segun yo me deberia arojar el resultado de esa consulta en el text1 pero me envia error sabras si esta mal mi funcion???