Hallo Leute,
ich versuche derzeit verzweifelt eine XML auszulesen
Von dieser XML, möchte ich den sensor und die downtime auslesen und in eine Variable speichern.
Aktueller Code:
Irgendwelche Verbesserungsvorschläge bzw. Ideen wie ich es realisieren könnte?
ich versuche derzeit verzweifelt eine XML auszulesen
XML-Quellcode
- <?xml version="1.0"?>
- -<item>
- <objid>10376</objid>
- <device>s1</device>
- <coverage/>
- <downtime>0,1184%</downtime>
- <downtime_raw>000000000001184</downtime_raw>
- <uptime>99,8816%</uptime>
- <uptime_raw>000000000998816</uptime_raw>
- <uptimetime>669 Tg.</uptimetime>
- <uptimetime_raw>000000057805704</uptimetime_raw>
- <sensor>HTTP</sensor>
- <dateonly>26.07.2017</dateonly>
- <dateonly_raw>42942.0000000000</dateonly_raw>
- <lastvalue>71 ms</lastvalue>
- <lastvalue_raw>71.0000</lastvalue_raw>
- </item>
Von dieser XML, möchte ich den sensor und die downtime auslesen und in eine Variable speichern.
Aktueller Code:
VB.NET-Quellcode
- Dim wc As New System.Net.WebClient()
- wc.Credentials = New System.Net.NetworkCredential(txt_Name.Text, txt_PW.Text)
- wc.Encoding = System.Text.UTF8Encoding.UTF8
- Dim allSensors = wc.DownloadString(url)
- Dim allSensorsParsed = XDocument.Parse(allSensors)
- Dim certificate As XElement
- Dim domain As String
- 'SSL-ZERTIFIKATE ERKENNEN
- For Each certificate In allSensorsParsed.<sensors>.<item>
- For Each domain In allSensorsParsed.<sensors>.<item>.<sensor>
- If domain.Contains("SSL-Zertifikatssensor") Then
- Dim DomainName = certificate.<item>.@sensor
- Dim downtime = certificate.<item>.@downtime
- End If
- Next
- Next
Irgendwelche Verbesserungsvorschläge bzw. Ideen wie ich es realisieren könnte?