Hello all,
I am trying to pass an address to a webservice called
"Nottinghamservice" (see below). I am having problems with the
"sendNavAddress". When I execute I get the error 'Element is an invalid
node type". The exeption details point to the line "Dim results() As
Object = Me.Invoke("sendNavAddress", New Object() {ptn, label,
address})". PLEASE HELP ME!!!!
This is my code.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim ExampleVar As NottinghamService
Dim results As Long
Dim strResults As String
Dim label As String
Dim addr As New TdxAddress
label = "Test"
addr.street = "209 Farmington Ave"
addr.city = "Romeoville"
addr.state = "IL"
addr.zipCode = 60446
addr.country = "USA"
ExampleVar = New NottinghamService
results = ExampleVar.sendNavAddress("8156004780", label, addr)
end sub
This is the method provide by the service
<System.Web.Services.Protocols.SoapRpcMethodAttrib ute("",
RequestNamespace:="urn:tns",
ResponseNamespace:="http://www.xxxxxxx.net/wsdl/") _
Public Function sendNavAddress(ByVal ptn As String, ByVal label
As String, ByVal address As TdxAddress) As
<System.Xml.Serialization.SoapElementAttribute("er rorStatus")Long
Dim results() As Object = Me.Invoke("sendNavAddress", New
Object() {ptn, label, address})
Return CType(results(0),Long)
End Function
'<remarks/>
<System.Xml.Serialization.SoapTypeAttribute("TdxAd dress",
"http://www.xxxxxx.net/schema") _
Public Class TdxAddress
'<remarks/>
Public lat As Double
'<remarks/>
Public lon As Double
'<remarks/>
Public street As String
'<remarks/>
Public city As String
'<remarks/>
Public state As String
'<remarks/>
Public zipCode As String
'<remarks/>
Public country As String
'<remarks/>
Public layerId As Long
End Class