Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Ftp.OCX Progressbar

Frage Entwicklung VB for Applications

Mitglied: copro

copro (Level 1) - Jetzt verbinden

23.03.2006, aktualisiert 27.03.2006, 4303 Aufrufe, 1 Kommentar

Hallo ich arbeite mit dem OCX von http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=56998 ...
scheint ganz gut zu laufen...

Nun wollte ich es in mein Projekt übernehmen und soweit klappt es auch nur die Progressbar macht faxen....

Ursprung scheint progressbar1.max = total.
Der Wert Total wird bei meinem Projekt nicht sauber übergeben.


con = FTP1.Connect("text", "ftp.server.com", "21", "user", "pass")
FTP1.DownloadFile "server-datei", App.Path & "local-datei"

Private Sub FTP1_Progress(Total As Long, Current As Long)
On Error Resume Next
ProgressBar1.Max = Total
ProgressBar1.Value = Current
Label1.Caption = Current
End Sub


so siehts bei mir aus... Ich hab aus dem Projekt von der Webseite ein OCX erstellt und es als Komponente eingebunden...

Die Progressbar ist am Anfang gleich voll wie gesagt ich denke es liegt am Total Wert

MfG Copro
Mitglied: RaRi2003
27.03.2006 um 13:04 Uhr
Hi,

ich würde Ihnen gerne Helfen, aber mit dem Codeschnipsel kann ich leider nur wenig anfangen.

Die Zuweisung der Variablen und die Initialisierung fehlen.
Es ist auch wenig hilfreich "On Error Resume Next" zu verwenden wenn man auf Fehler suche ich. Verwenden Sie hier doch z.B.:

On Error Goto ERR_SUB

Ihr Code

EXIT_SUB:
Exit Sub

ERR_SUB:
msgbox "Fehler " & err.number & vbcrlf & err.description
Resume EXIT_SUB
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Update mehrerer Verzeichnisse auf FTP-Server (3)

Frage von caspi-pirna zum Thema Batch & Shell ...

TK-Netze & Geräte
IP Cam und FTP Server auf der EasyBox (11)

Frage von RaMimi zum Thema TK-Netze & Geräte ...

Windows Server
Windows Server 2012R2 - IIS - FTP Benachrichtigung bei FTP Anmeldung (3)

Frage von MultiStorm zum Thema Windows Server ...

Neue Wissensbeiträge
Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(2)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(9)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Heiß diskutierte Inhalte
Exchange Server
Exchange 2016 Standard Server 2012 R2 Hetzner Mail (36)

Frage von Datsspeed zum Thema Exchange Server ...

Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Windows 10
Windows Store Apps ohne Windows Store installieren (10)

Frage von keefien zum Thema Windows 10 ...

Internet Domänen
Nameserver ein Geist? (9)

Frage von zelamedia zum Thema Internet Domänen ...