Hey Leute, ich mal wieder
Ich habe ein Programm geschrieben, welches Systeminformationen an einen Server senden soll, bislang klappt das alles super, doch jetzt wollte ich die Prozesse übertragen und bin dann auf ein klitzekleines Problem gestossen
Und zwar:
Wenn ich den Clienten mit dem Server verbinde, sendet er in einer For Each schleife die Prozesse über den StreamWriter zum Server
soweit so gut...
Und nun will ich es auf der Serverseite empfangen, aber das was ankommt ist nicht "der Wahrheit" bzw kommt nur jeder 2. Prozess an
Spoiler anzeigen
Ich frage mich nun, was mache ich falsch, bzw gibt es einen besseren Weg zu übertragen ?
Danke schon mal im vorraus
Mfg
Dende()
Ich habe ein Programm geschrieben, welches Systeminformationen an einen Server senden soll, bislang klappt das alles super, doch jetzt wollte ich die Prozesse übertragen und bin dann auf ein klitzekleines Problem gestossen
Und zwar:
Wenn ich den Clienten mit dem Server verbinde, sendet er in einer For Each schleife die Prozesse über den StreamWriter zum Server
soweit so gut...
Und nun will ich es auf der Serverseite empfangen, aber das was ankommt ist nicht "der Wahrheit" bzw kommt nur jeder 2. Prozess an
VB.NET-Quellcode
- Private Sub GetProcessList()
- Dim objConnect As New clsConnection(mobjClient.GetStream)
- Dim blnEnde As Boolean = False
- Dim strProcess As String
- objConnect.StreamReader = New StreamReader(objConnect.Stream)
- objConnect.StreamWriter = New StreamWriter(objConnect.Stream)
- Do
- 'objConnect.StreamWriter.WriteLine("DING")
- strProcess = objConnect.StreamReader.ReadLine
- If objConnect.StreamReader.ReadLine = "ListEnd" Then
- blnEnde = True
- Else
- Me.Invoke(New AddProcessDelegate(AddressOf GetList), strProcess)
- End If
- Loop Until blnEnde = True
- End Sub
Ich frage mich nun, was mache ich falsch, bzw gibt es einen besseren Weg zu übertragen ?
Danke schon mal im vorraus
Mfg
Dende()