hi
is this right to figureout megabytes?
Code:Dim c As New CIpHelper, R As Double, S As Double c.InitInterfaces If FirstTime Then FirstTime = False enviados = Format(c.BytesSent / 1024, ".0") recibidos = Format(c.BytesReceived / 1024, ".0") Else 'FIRSTTIME = FALSE/0 R = ((c.BytesReceived / 1024) - recibidos) * 8 S = ((c.BytesSent / 1024) - enviados) * 8 End If Label1.Caption = "U:" & Format(S, ".0") Label2.Caption = "D:" & Format(R, ".0")


Reply With Quote
