[VB 2008] Download Dauer anzeigen und Download pausieren las Verfasst am: 07.06.2011, 17:53
Hallo Nutzer,
ich bräuchte noch für meinen Downloader einen Code, der die Download Zeit berechnet und der den Download pausieren und ihn danach auch wieder weiterlaufen lässt.
Vielleicht kann euch das hier ja weiterhelfen, denn dies sind die momentanen Codes für (Die Download-Geschwindigkeit,Status,Weite und Link), so ähnlich könnte dann ja auch vielleicht der Code für den Download Dauer Berechner aussehen:
Code:
Public Sub ChangeTexts(ByVal length As Long, ByVal position As Integer, ByVal percent As Integer, ByVal speed As Double)
Me.lblsize.Text = "Größe : " & Math.Round((length / 1024), 2) & " KB"
'zeigt die Größe an
Me.lbldownloading.Text = "Downloading : " & Me.txtFileName.Text
'zeigt den Link an, von der gedownloaded wird
Me.lblstat.Text = "Status : " & Math.Round((position / 1024), 2) & " KB von " & Math.Round((length / 1024), 2) & "KB (" & Me.ProgressBar1.Value & "%)"
Me.lblpercent3.Text = Me.ProgressBar1.Value & "%"
If speed = -1 Then
Me.lblspd.Text = "Geschwindigkeit : " & "wird berechnet..."
Else
Me.lblspd.Text = "Geschwindigkeit : " & Math.Round((speed / 1024), 2) & " KB/s"
End If