Backgroundworker Macht nicht das was er soll....

KAXTJ · 11. April 2013, 18:53

Hallo.

ich denke mal bild und code sagen mehr wie tausen worte.

VB.NET-Quellcode

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
BackgroundWorker1.RunWorkerAsync()
End Sub
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
wc.Credentials = New Net.NetworkCredential(benutzername, passwort)
Lichtc.Text = wc.DownloadString("Ftp://zimmersteuerung.1x.de/www/Lichtc.txt") 'ACHTUNG ! AUF GROß UND
wc.Credentials = New Net.NetworkCredential(benutzername, passwort)
Showsc.Text = wc.DownloadString("Ftp://zimmersteuerung.1x.de/www/Showsc.txt") 'ACHTUNG ! AUF GROß UND
If Lichtc.Text = "0" Then
Label1.Text = "Licht ist aus"
End If
If Lichtc.Text = "1" Then
Label1.Text = "Licht ist an"
End If
If Showsc.Text = "1" Then
Label2.Text = "Show ist an"
Button1.Enabled = False
End If
If Showsc.Text = "0" Then
Label2.Text = "Show ist aus"
Button1.Enabled = True
End If
End Sub

Hat jemand eine Idee?

Artentus · 11. April 2013, 18:57

Doch, er macht genau das, was er soll.
Du musst Invoke oder BiginInvoke aufrufen, um auf die GUI aus einem anderen Thread zugreifen zu können.

Dodo · 11. April 2013, 19:00

Wieso 2 mal die NetworkCredentials angeben?? Reicht einmal nicht?

SpaceyX · 11. April 2013, 19:01

Der WebClient hat asynchrone Methoden. Nutze doch diese Möglichkeit.

Breadsoft · 11. April 2013, 19:04

Ich nutze nicht gerne den Backgroundworker. Ich benutze lieber System.Threading.Thread und arbeite damit.

Artentus · 11. April 2013, 19:05

@Breadsoft
Da würde bei obigem Code genau der selbe Fehler rauskommen.
Aber in der Tat, Backgroundworker ist nur was für den Einstieg in Threading, aber keine Langzeitlösung.

Breadsoft · 11. April 2013, 19:09

Ja natürlich muss man bei beiden Sachen mit Invoke oder BeginInvoke arbeiten sonst kann man das vergessen. Aber ich habe schon von Anfang an den Backgroundworker nicht benutzt weil ich mit dem nicht so richtig klar komme.

KAXTJ · 11. April 2013, 21:22

jetzt geht das. aber dafür habe ich ein neues Problem:

VB.NET-Quellcode

private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
BackgroundWorker1.RunWorkerAsync()
End Sub
Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
wc.Credentials = New Net.NetworkCredential(benutzername, passwort)
Lichtc.Text = wc.DownloadString("Ftp://zimmersteuerung.1x.de/www/Lichtc.txt") 'ACHTUNG ! AUF GROß UND
Showsc.Text = wc.DownloadString("Ftp://zimmersteuerung.1x.de/www/Showsc.txt") 'ACHTUNG ! AUF GROß UND
If Lichtc.Text = "0" Then
Me.Invoke(Sub() Label1.Text = "Licht ist aus")
End If
If Lichtc.Text = "1" Then
Me.Invoke(Sub() Label1.Text = "Licht ist an")
End If
If Showsc.Text = "1" Then
Me.Invoke(Sub() Label2.Text = "Show ist an")
Me.Invoke(Sub() Button1.Enabled = False)
End If
If Showsc.Text = "0" Then
Me.Invoke(Sub() Label2.Text = "Show ist aus")
Me.Invoke(Sub() Button1.Enabled = True)
End If
wc.Credentials = New Net.NetworkCredential(benutzername, passwort)
wc.UploadString("Ftp://zimmersteuerung.1x.de/www/Shows.txt", Shows.Text)
wc.UploadString("Ftp://zimmersteuerung.1x.de/www/Licht.txt", Licht.Text)
BackgroundWorker1.RunWorkerAsync()
End Sub
End Class

SpaceyX · 11. April 2013, 21:25

Was denkst Du selber, was Du da machst?

Ich hab Dir oben schon gesagt, dass Du Dir mal die Async-Methoden anguggen sollst. Dann kannst Du Dir das ganze gerammel mit dem BackgroundWorker nämlich sparen.

Artentus · 11. April 2013, 21:26

Du kannst den Backgroundworker nicht erneut starten, während er noch läuft. Entferne die letzte Codezeile.

KAXTJ · 11. April 2013, 21:35

@Artentus und wie soll ich ihm dann den befehl geben neu zu starten? mir fehlt leider nichts ein

@SpaceyX Schon probiert ohne erfolg....... Er sagt dann immer das alles falsch were...

Artentus · 11. April 2013, 21:36

Das machst du dann im WorkerCompleted-Event.

VincentTB · 11. April 2013, 21:42

Was haben alle gegen den BGW? Ich benutzte den immer, halt mit AdressOf und so. Kam damit immer bestens klar und könnte mir auch nichts einfacheres vorstellen...

KAXTJ · 11. April 2013, 21:44

WorkerCompleted-Event? ich habe ein bischen rum gesucht, google, SDK und auch selber rumprobiert, aber leider nicht darüber gefunden. Wie funktioniert das?

Artentus · 11. April 2013, 21:46

Entschuldigung bitte, es ist RunWorkerCompleted.
Ich arbeite halt nicht mit dem BGW, aber 10 Sekunden auf MSDN haben mir gereicht um den richtigen namen herauszufinden.

Niko Ortner · 11. April 2013, 22:09

WTF?
Warum neustarten?
Eine Endlosschleife würde es auch tun.
Hier ein paar zusätzliche Infos zum BGW: [VB.NET] Multithreading mit BackgroundWorker

FreakJNS · 11. April 2013, 22:34

Wäre das nicht ein Fall für einen Timer?
Ich meine gut kann es doch nicht sein mit dem Abfrageinterval ans Maximum zu gehen und am Ende nur ein Label zu verändern... Da würden 10 Abfragen pro Sekunde doch locker ausreichen.

Niko Ortner · 12. April 2013, 00:03

@FreakJNS: Ja, das wäre sicher keine schlechte Idee. Man müsste aber aufpassen, dass man den Code nicht mehrmals gleichzeitig ausführt.
Also mit 'nem BGW wäre es sowas in der Richtung:

VB.NET-Quellcode

Sub TimerTick() Handles Timer.Tick
If Not BGW.IsBusy Then
BGW.RunWorkerAsync()
End If
End Sub

Dadurch wird der Code erst erneut gestartet, sobald er zu Ende gelaufen ist.

Edit: Besser wäre wahrscheinlich noch, beim Starten des BGWs den Timer zu stoppen und beim Fertiglaufen des BGWs den Timer wieder zu starten.

RodFromGermany · 12. April 2013, 07:01

@Niko Ortner: Wie bei einem normalen Thread würde ich den BGW genau einmal starten und dann in der Thread-Routine DoWork() eine Endlosschleife mit sinnvoller Abbruchbedingung implementieren: Task-Ende und Programm-Ende.

Backgroundworker Macht nicht das was er soll....

Backgroundworker Macht nicht das was er soll....

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Tags

Ähnliche Themen

7 Benutzer haben hier geschrieben