Hallo Ihr lieben, stehe nun vor folgendem Problem.
Ich würde gern, das die Progessbar parallel zur Datensicherung läuft und mir entsprechend den Fortschrittsbalken anzeigt.
Leider ist es momentan so, das erst die Datensicherung läuft und hinterher die Progressbar
Könnt ihr mir wohl mal auf die Sprünge helfen?
Ich würde gern, das die Progessbar parallel zur Datensicherung läuft und mir entsprechend den Fortschrittsbalken anzeigt.
Leider ist es momentan so, das erst die Datensicherung läuft und hinterher die Progressbar
Könnt ihr mir wohl mal auf die Sprünge helfen?
VB.NET-Quellcode
- Private Sub Btn_DatenSichern_Click(sender As Object, e As EventArgs) Handles Btn_DatenSichern.Click
- Timer1.Enabled = True
- ' Fortschritt.Enabled = True
- 'xxxxxxxxx Outlook sichern xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
- Dim PstDatei = New IO.FileInfo("C:\Users\Administrator\Documents\Outlook-Dateien\xxxx")
- Dim Zielverzeichnis = "D:\OutlookMozillaSicherung"
- IO.Directory.CreateDirectory(Zielverzeichnis)
- If PstDatei.Exists Then
- PstDatei.CopyTo("D:\OutlookMozillaSicherung\xxxx", True)
- End If
- 'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
- 'xxxxxxxxx Mozilla sichern xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
- If IO.Directory.Exists("C:\Users\xxxx\AppData\Roaming\Mozilla") Then
- My.Computer.FileSystem.CopyDirectory("C:\Users\xxxx\AppData\Roaming\Mozilla", "D:\OutlookMozillaSicherung", True)
- End If
- '########################################################
- MsgBox("Daten gesichert!")
- Me.Close()
- End Sub
- Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
- ProgressBar1.Increment(1)
- If ProgressBar1.Value = ProgressBar1.Maximum Then
- ProgressBar1.Value = ProgressBar1.Minimum
- Timer1.Enabled = False
- End If
- End Sub
Schlimmer als ein Elefant im Porzellanladen, ist ein Igel in der Kondomfabrik und Nutella hat Lichtschutzfaktor 9,7 8)
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Steamy2010“ ()