add basic logging for webservices

WinLineArtikelnummerGenerator/Winline.vb

@@ -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)