Hi
Right Now i have a problem when trying to consume a web Method
I don't know if the problem is the type of Data or if is the ASP Classic
Yes... this is the first time that i work with classes to send through a web services..
EDITED:
sorry i wrote the error at the end of this post. here is the error:
"
ERROR5 \SoapMapper \SoapMapper:Saving SoapMapper idUser failed HRESULT=0x80004002: Interfaz no compatible - Client:Unspecified client error. HRESULT=0x80004002: Interfaz no compatible
"
Well let me explain you my case.
im developing an Asp Client that consume a .NET web Service.
This ASP.NEt Web Services has One Method that accepts 3 parameters As Class.
: Seguridad,AsignarDato and hash
here i post the main page of the asp client:
Dim GetPolicy
Dim Seguridad
Dim AsignarDatos
Dim AutoResponseCliente
Dim Dato
response.write "Cargando variables..ok" & "<br>"
''GENERAMOS LA CLASE
SET Seguridad = new idCard
Seguridad.usuario = "usuario_prueba"
Seguridad.password = ""
SET AsignarDatos = new Poliza
AsignarDatos.Prefijo = "VVV" ''CAMBIAR A MVS
AsignarDatos.Folio = 1
AsignarDatos.EstadoEntrada = "TX"
AsignarDatos.MotivoVisita = "1"
AsignarDatos.FechaRegistro = "2012/12/20 14:00:00" 'Now
AsignarDatos.InicioVigencia = "2012/12/31 14:00:00" 'Now.AddMinutes(10)
AsignarDatos.FinVigencia ="2013/01/01 14:00:00"
AsignarDatos.NombreAsegurado = "MINERVA PROGRAMADORA"
AsignarDatos.MXCalleNumero = "PAVIMENTADA 311"
AsignarDatos.MXColonia = "TEST TEST TEST"
AsignarDatos.MXCodigoPostal = "64000"
AsignarDatos.Email = "rbustos@nationalunity.com.mx"
AsignarDatos.Producto = "CA" ''CAMBIAR A MVA
AsignarDatos.MXMunicipio = "MONTERREY"
AsignarDatos.MXEstadoNom = "NL"
AsignarDatos.MXLada = "81"
AsignarDatos.MXTelefonoNo = "12345678"
AsignarDatos.Anio = "2001"
AsignarDatos.Serie = "1MEFM53S11G644428"
AsignarDatos.Placas = "SJN8566"
AsignarDatos.Marca = "4"
AsignarDatos.Modelo = "SABLé LS C/D V/P (A4A)"
AsignarDatos.EstadoPlacas = "NL"
AsignarDatos.PuertoEntrada = "1"
AsignarDatos.Prima = "0"
AsignarDatos.Derecho = "0"
AsignarDatos.Asistencia = "0"
AsignarDatos.Descuento = "0"
AsignarDatos.Extraprima = "0"
AsignarDatos.Concepto_Extraprima = "0"
AsignarDatos.FolioCertificado = "VVV-01"
AsignarDatos.NombreConductor = "RENE BUSTOS"
AsignarDatos.NoLicencia = "VIGENTE"
AsignarDatos.FechaNacimiento = "1994/02/12"
AsignarDatos.Ocupacion = "EMPLEADO"
AsignarDatos.Filler1 = "9999"
AsignarDatos.Observaciones = "TESTING"
SET AutoResponseCliente = new AutoResponse
SET GetPolicy = New GetDataPDF
AutoResponseCliente = GetPolicy.GetInf(Seguridad,AsignarDatos,MD5(GenerateDataToHashing(AsignarDatos)))
Well. now i paste the code where the GetInf is declare:
in the next code is the problem....
The function GETINF, accepts the tree parameters, well.. two classes and one string that is the hash then
Class GetDataPDF
'oSOAP.mssoapinit("https://www.myURL/web_parser/service.asmx?wsdl")
Public Function GetInf(clsIdCard,clsPoliza,hash)
''SIEMPRE SE EJECUTA INDEPENDIENTEMENTE DE LOS PARAMETROS
Dim oSoapClient, oXMLDocument
Dim Result
'*******************************************
On Error Resume Next
set oSoapClient = Server.CreateObject("MSSOAP.SoapClient30")
If Err.number<>0 Then
response.Write "ERROR1 "&Error &"\"&Err.Source &"\"&Err.Description & "<br>"
Else
response.Write Result
End If
Set parser = Server.CreateObject("MSXML2.DOMDocument.4.0")
If Err.number<>0 Then
response.Write "ERROR2 "&Error &"\"&Err.Source &"\"&Err.Description
Else
response.Write Result
End If
oSoapClient.ClientProperty("ServerHTTPRequest") = True
If Err.number<>0 Then
response.Write "ERROR3 "&Error &"\"&Err.Source &"\"&Err.Description
Else
response.Write Result
End If
Call oSoapClient.mssoapinit ("https:
If Err.number<>0 Then
response.Write "ERROR4 "&Error &"\"&Err.Source &"\"&Err.Description
Else
response.Write Result
End If
response.write "datos de proceso: "
''response.end
'HERE IS WHERE THE ERROR OCURRS, when i try to consume the web method clsIdCard is a class , clsPoliza is a class too, and hash is a ..hash code jajaja..well
Set Result = oSoapClient.WsAuto(clsIdCard,clsPoliza,hash)
If Err.number<>0 Then
response.Write "ERROR5 "&Error &"\"&Err.Source &"\"&Err.Description & "<br>"
Else
response.Write Result
End If
End function
End class
The error is this:
ERROR5 \SoapMapper \SoapMapper:Saving SoapMapper idUser failed HRESULT=0x80004002: Interfaz no compatible - Client:Unspecified client error. HRESULT=0x80004002: Interfaz no compatible
Thanks guys.. regards from Mexico!!!