Ich hab folgendes Problem:
Ich will von dem VB.NET-PDA-Emulator aus ein Webservice ausführen. Das Webservice selber funktioniert (hab ich mit einer normalen Webapplikation getestet). Nun steck ich aber bei dem Problem fest, dass der Emulator nicht mit dem Webservice kommunizieren kann.
--------------------------------------------------------------------------------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dsCustomer As New DataSet
Dim ws As New sync1.Service1
dsCustomer = ws.getCustomers(txtUsr.Text, txtPwd.Text)
ListBox1.Items.Clear()
Dim dt As DataTable = dsCustomer.Tables.Item("CUS_Customer")
Dim cRow As DataRow
For Each cRow In dt.Rows
ListBox1.Items.Add(cRow.Item("CUS_Name"))
Next
End Sub
--------------------------------------------------------------------------------
Das ist die Funktion beim Client (PDA-Anwendung). Ich schicke User und Passwort (was aus Textboxen ausgelesen wird) an das Webservice, welches mir ein DataSet zurückliefern soll. Bei der fett-markierten Stelle jedoch springt er (im Projektmappen-Explorer) zur Reference.map des Webverweises und markiert mir folgende Zeile mit folgender Fehlermeldung:
--------------------------------------------------------------------------------
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/SynchronisationWebService/Service1/getCustomers", RequestNamespace:="http://tempuri.org/SynchronisationWebService/Service1", ResponseNamespace:="http://tempuri.org/SynchronisationWebService/Service1", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function getCustomers(ByVal usr As String, ByVal pwd As String) As System.Data.DataSet
Dim results() As Object = Me.Invoke("getCustomers", New Object() {usr, pwd})
Return CType(results(0), System.Data.DataSet)
End Function
Eine nicht behandelte Ausnahme des Typs 'System.Net.WebException' ist in System.Web.Services.dll aufgetreten.
Zustzliche Informationen: Unable to connect to the remote server.
--------------------------------------------------------------------------------
Anscheinend reicht es bei so einem Projekt nicht aus, einen einfachen Webservice-Verweis zu erstellen. Was muss ich also machen, damit das funktioniert?
mfg!
Ich will von dem VB.NET-PDA-Emulator aus ein Webservice ausführen. Das Webservice selber funktioniert (hab ich mit einer normalen Webapplikation getestet). Nun steck ich aber bei dem Problem fest, dass der Emulator nicht mit dem Webservice kommunizieren kann.
--------------------------------------------------------------------------------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dsCustomer As New DataSet
Dim ws As New sync1.Service1
dsCustomer = ws.getCustomers(txtUsr.Text, txtPwd.Text)
ListBox1.Items.Clear()
Dim dt As DataTable = dsCustomer.Tables.Item("CUS_Customer")
Dim cRow As DataRow
For Each cRow In dt.Rows
ListBox1.Items.Add(cRow.Item("CUS_Name"))
Next
End Sub
--------------------------------------------------------------------------------
Das ist die Funktion beim Client (PDA-Anwendung). Ich schicke User und Passwort (was aus Textboxen ausgelesen wird) an das Webservice, welches mir ein DataSet zurückliefern soll. Bei der fett-markierten Stelle jedoch springt er (im Projektmappen-Explorer) zur Reference.map des Webverweises und markiert mir folgende Zeile mit folgender Fehlermeldung:
--------------------------------------------------------------------------------
<System.Web.Services.Protocols.SoapDocumentMethodAttribute("http://tempuri.org/SynchronisationWebService/Service1/getCustomers", RequestNamespace:="http://tempuri.org/SynchronisationWebService/Service1", ResponseNamespace:="http://tempuri.org/SynchronisationWebService/Service1", Use:=System.Web.Services.Description.SoapBindingUse.Literal, ParameterStyle:=System.Web.Services.Protocols.SoapParameterStyle.Wrapped)> _
Public Function getCustomers(ByVal usr As String, ByVal pwd As String) As System.Data.DataSet
Dim results() As Object = Me.Invoke("getCustomers", New Object() {usr, pwd})
Return CType(results(0), System.Data.DataSet)
End Function
Eine nicht behandelte Ausnahme des Typs 'System.Net.WebException' ist in System.Web.Services.dll aufgetreten.
Zustzliche Informationen: Unable to connect to the remote server.
--------------------------------------------------------------------------------
Anscheinend reicht es bei so einem Projekt nicht aus, einen einfachen Webservice-Verweis zu erstellen. Was muss ich also machen, damit das funktioniert?
mfg!