I'm trying to implement a webservice from SmarterTrack just that I'm not getting it ... give me the following error:
Server did not recognize the value of HTTP Header SOAPAction: http:/ / localhost:9996/Services2/svcTickets.asmx?op=CreateTicket.
I already tested it directly in the browser and it works extremely well.
Sub Execute()
Dim request As HttpWebRequest = CType(WebRequest.Create("http :/ /localhost: 9996/Services2/svcTickets.asmx"), HttpWebRequest)
request.Method = "POST"
request.Host = "localhost:9996"
request.ContentType = "text/xml; charset=utf-8"
request.Headers.Add("SOAPAction", "
http://localhost:9996/Services2/svcTickets.asmx?op=CreateTicket")
request.Method = "POST"
Dim soapEnvelopeXml As New XmlDocument()
soapEnvelopeXml.LoadXml("<?xml version=""1.0"" encoding=""utf-8""?>" & ControlChars.CrLf &
"<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/"">" & ControlChars.CrLf &
"<soap:Body>" & ControlChars.CrLf &
"<CreateTicket xmlns=""
http://localhost:9996/Services2/svcTickets.asmx"">" & ControlChars.CrLf &
"<authUserName>admin</authUserName>" & ControlChars.CrLf &
"<authPassword>teste123</authPassword>" & ControlChars.CrLf &
"<departmentID>3</departmentID>" & ControlChars.CrLf &
"<groupId>3</groupId>" & ControlChars.CrLf &
"<userIdOfAgent>2</userIdOfAgent>" & ControlChars.CrLf &
"<toAddress>teste@teste.pt</toAddress>" & ControlChars.CrLf &
"<subject>test</subject>" & ControlChars.CrLf &
"<body>teste</body>" & ControlChars.CrLf &
"<isHtml>True</isHtml>" & ControlChars.CrLf &
"<setWaiting>True</setWaiting>" & ControlChars.CrLf &
"<sendEmail>True</sendEmail>" & ControlChars.CrLf &
"</CreateTicket>" & ControlChars.CrLf &
"</soap:Body>" & ControlChars.CrLf &
"</soap:Envelope>")
Using stream As Stream = request.GetRequestStream()
soapEnvelopeXml.Save(stream)
End Using
Using response As WebResponse = request.GetResponse()
Using rd As New StreamReader(response.GetResponseStream())
Dim soapResult As String = rd.ReadToEnd()
Console.WriteLine(soapResult)
End Using
End Using
End Sub
I imported the following wsdl directly into visual studio as service reference, just mocking
the domain. Did I do it correctly? http:/ /portal.smartertools dot com/Services2/svcTickets.asmx?WSDL