Public Class xlogin <SoapElement(ElementName:="eStatus"), _ XmlElement(ElementName:="Status")> _ Public StatusID As Boolean End Class <WebMethod()> _ Public Function Login(ByVal sUser As String, ByVal sPwd As String) As xlogin Dim mystatus As xlogin = New xlogin() ..... mystatus.StatusID = True Return mystatus End Function
HTTP/1.1 200 OK Content-Type: text/xml; charset=utf-8 Content-Length: length <?xml version="1.0" encoding="utf-8"?> <soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> <soap:Body> <LoginResponse xmlns="http://WheelOfFortune.org/"> <LoginResult> <Status>boolean</Status> </LoginResult> </LoginResponse> </soap:Body> </soap:Envelope>
HTTP/1.1 200 OK Content-Type: text/xml; charset=utf-8 Content-Length: length <?xml version="1.0" encoding="utf-8"?> <soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> <soap:Body> <LoginResponse xmlns="http://WheelOfFortune.org/"> <LoginResult> <Login> <Status>boolean</Status> </Login> </LoginResult> </LoginResponse> </soap:Body> </soap:Envelope>
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)