add basic logging for webservices
This commit is contained in:
parent
36937abe4c
commit
e71d9d7668
@ -155,6 +155,8 @@ Public Class Winline
|
||||
|
||||
oURI &= $"?{oQuery}"
|
||||
|
||||
_Logger.Info("WebService Request: {0}", oURI)
|
||||
|
||||
Dim oRequest As HttpWebRequest = WebRequest.Create(oURI)
|
||||
Dim oResponse As HttpWebResponse = DirectCast(oRequest.GetResponse(), HttpWebResponse)
|
||||
Dim oXmlResponse As String
|
||||
@ -163,6 +165,8 @@ Public Class Winline
|
||||
oXmlResponse = oReader.ReadToEnd()
|
||||
End Using
|
||||
|
||||
_Logger.Info("WebService Response: {0}", oXmlResponse)
|
||||
|
||||
Dim oDocument As New XmlDocument
|
||||
oDocument.LoadXml(oXmlResponse)
|
||||
oDocument.Save(Console.Out)
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user