Hallo Leute,
gibt es irgendwelche Zeichenfolgen die man nicht im Quellcode stehen haben sollte?
Habe ein paar Zeilen die Wunderbar bis "Motoren" funktioniert aber die anderen beiden spucken mir gar nichts aus egal was ich da rein schreibe.
die daten hole ich hierher:
kann mir jemand den Fehler sagen?
hab nach drei Stunden fummeln keine Idee mehr.
Danke im vorraus
Verschoben. ~Thunderbolt
gibt es irgendwelche Zeichenfolgen die man nicht im Quellcode stehen haben sollte?
Habe ein paar Zeilen die Wunderbar bis "Motoren" funktioniert aber die anderen beiden spucken mir gar nichts aus egal was ich da rein schreibe.
VB.NET-Quellcode
- Private Sub Bsuchen_Click(sender As Object, e As EventArgs) Handles Bsuchen.Click
- Dim etc As New OpenFileDialog
- If etc.ShowDialog = DialogResult.OK And etc.FileName <> Nothing Then
- TextBox1.Text = etc.FileName
- End If
- Dim dateiinhalt As String = My.Computer.FileSystem.ReadAllText(TextBox1.Text)
- RTB_ETC_Auslesen.Text = dateiinhalt
- Dim Betriebsmittel() As String
- Dim Steckdosen As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " type=""Steckdose"" typeofconduction=")
- Steckdosen = UBound(Betriebsmittel) + 1
- LMSchuko.Text = Steckdosen - 1
- Dim Leuchten As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " type=""Leuchte"" typeofconduction=")
- Leuchten = UBound(Betriebsmittel) + 1
- LMLeuchten.Text = Leuchten - 1
- Dim CEESteckdosen As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " type=""CEE-Steckdose"" typeofconduction=")
- CEESteckdosen = UBound(Betriebsmittel) + 1
- LMCEE.Text = CEESteckdosen - 1
- Dim Motoren As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " type=""Motor"" typeofconduction=")
- Motoren = UBound(Betriebsmittel) + 1
- LMMotor.Text = Motoren - 1
- Dim Stromkreise As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " <CIRCUIT dbno="" typeofconduction=")
- Stromkreise = UBound(Betriebsmittel) + 1
- LMStromkreise.Text = Stromkreise - 1
- Dim Rlomessung As Integer
- Betriebsmittel = Split(RTB_ETC_Auslesen.Text, " type=""RLO"" typeofconduction=")
- Rlomessung = UBound(Betriebsmittel) + 1
- LMRLO.Text = Rlomessung - 1
- End Sub
die daten hole ich hierher:
kann mir jemand den Fehler sagen?
hab nach drei Stunden fummeln keine Idee mehr.
XML-Quellcode
- <DATABASE version="" level="" size="" language="" country="">
- <CUSTOMER dbno="1" id="-" txt="Test">
- <BUILDING dbno="1" id="-" txt="Test">
- <DISTRIBUTIONCABINET dbno="1" id="-" txt="Test1">
- <RCD dbno="1" id="-" txt="Test" nominalcurrent="63A" nominalfaultcurrent="30mA" type="A" characteristic="RCD">
- <CIRCUIT dbno="1" id="-" txt="Test 1" typeofconduction="NYM-J" numberofconduction="1" crosssection="2.5" characteristic="B/L" nominalcurrent="16A">
- <ELECTRICALEQUIPMENT dbno="1" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="2" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="3" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="4" id="-" txt="CEE" type="CEE-Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Keller" crosssection="1.5" />
- <ELECTRICALEQUIPMENT dbno="5" id="-" txt="Leuchte" type="Leuchte" typeofconduction="NYM-J" numberofconduction="1" location="Keller" crosssection="1.5" />
- <ELECTRICALEQUIPMENT dbno="6" id="-" txt="Motor" type="Motor" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="7" id="-" txt="Steckdose" type="Motor" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="8" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="9" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- <ELECTRICALEQUIPMENT dbno="10" id="-" txt="Steckdose" type="Steckdose" typeofconduction="NYM-J" numberofconduction="1" location="Büro" crosssection="2.5" />
- </CIRCUIT>
- <CIRCUIT dbno="2" id="-" txt="Test 2" typeofconduction="NYM-J" numberofconduction="1" crosssection="2.5" characteristic="B/L" nominalcurrent="16A" />
- <CIRCUIT dbno="3" id="-" txt="Test 3" typeofconduction="NYM-J" numberofconduction="1" crosssection="2.5" characteristic="B/L" nominalcurrent="16A" />
Danke im vorraus
Verschoben. ~Thunderbolt
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Thunderbolt“ ()