Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Dateien kopieren mit Fortschrittsanzeige
zurück: Dictionary selbst gemacht weiter: Klassenprogrammierung: Klasse serialisieren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Information Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Isabelle :-)
Menschin


Verfasst am:
05. März 2014, 21:40
Rufname:
Wohnort: Westlicher Spiralarm der Galaxis


Dateien kopieren mit Fortschrittsanzeige - Dateien kopieren mit Fortschrittsanzeige

Nach oben
       Version: Office 2k (2000)

Hallöchen,

du musst regelmäßig mehrere Dateien kopieren und dabei den Fortschritt anzeigen lassen, dann habe ich eine Lösung für dich. Das rentiert sich natürlich nicht bei einer Hand voll kleiner Excelmappe die in wenigen Sekunden übertragen sind.

Der Code enthält etliche API-Funktionen und Controls (ProgressBar) aus der MSCOMCTL.OCX, sie ist deshalb nicht ohne größere Anpassungen in 64-Bit Excelversionen adaptierbar.

Klar könnte ich das Ganze einfacher gestalten, mir kam es aber auch darauf an, alle zu Verfügung stehenden Techniken zu benutzen, um sie dir auch ein wenig näher zu bringen. Also nicht einfach blind kopieren sondern versuchen zu verstehen ist das Ziel. Bei Fragen steht dir das Forum offen und wenn du mir eine PM mit einem Link auf deine Frage schickst dann werde ich mir die Zeit nehmen sie zu beantworten.

Als erstes wird der Hauptordner nach Unterordnern durchsucht damit beim Kopieren die identische Struktur erstellt werden kann. Dazu werden die Ordner in einer Auflistungsklasse gespeichert. Anschließend werden sie einzeln nach den zu kopierenden Dateien durchsucht und diese in einer weiteren Auflistungsklasse gespeichert.

Die Suche nach Ordnern und Dateien habe ich aus der FileSearch-Klasse ( http://www.office-loesung.de/ftopic148247_0_0_asc.php ) von Nepumuk abgeleitet die ich entsprechend modifiziert habe.

Diese Suche wird in einem kleinem Userform mit Anzahl der gefundenen Ordner, der Dateien und der zu kopierenden Byte-Summe angezeigt.

Die Summe der Bytes war bei der ganzen Sache das größte Rätsel, denn bei den ersten Tests hatte ich die FileLen-Funktion benutzt und regelmäßig Differenzen zwischen der Summe der zu kopierenden und der tatsächlich kopierten Werte erhalten. Bis ich dahinter kann dass sich an manchen Dateien sogenannte ADS (Alternative Data Streams) befinden welche beim kopieren der Dateien automatisch mit kopiert werden. Die ADS sind teilweise von mir angehängt worden, teilweise von Microsoft. Wenn du eine Datei aus dem Netz herunterlädst und öffnest bekommst du eine Warnung, dass die Datei, da sie aus dem Netz stammt, nicht sicher sei. Das kommt durch einen ADS der sich über den Eigenschaftdialog der Datei im Windows-Explorer entfernen lässt.

Das kopieren der Dateien selbst erfolgt mit der CopyFileEx-Funktion die eine CallBack-Routine (CopyProgress) aufruft welche die bereits übertragenen Bytes liefert, aus welchen sich der Fortschritt pro Datei, der Gesamtfortschritt sowie die verbleibende Restzeit berechnen lässt.

Schau dir einfach mal den Code in der Mappe an.

_________________
LG Isi

Die Mitgliedschaft im Forum erhöht deine Chance auf eine Antwort von mir um 99,999%



Datei_kopieren_mit_Fortschrittsanzeige.xls
 Beschreibung:

Download
 Dateiname:  Datei_kopieren_mit_Fortschrittsanzeige.xls
 Dateigröße:  253.5 KB
 Heruntergeladen:  57 mal

Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Kann Excel nach farbe (auswahl einer Farbe) kopieren? 2 clowni 7046 17. Dez 2005, 12:03
clowni Kann Excel nach farbe (auswahl einer Farbe) kopieren?
Keine neuen Beiträge Excel Formeln: daten aus anderen dateien auslesen 10 daniel düsentrieb 3807 18. Nov 2005, 15:37
daniel düsentrieb daten aus anderen dateien auslesen
Keine neuen Beiträge Excel Formeln: Syncronisieren von Excel Dateien!!! 0 Gast 601 24. Okt 2005, 10:09
Gast Syncronisieren von Excel Dateien!!!
Keine neuen Beiträge Excel Formeln: 2 Spalten in zwei Dateien vergleichen und X in eine Datei 3 Daniel der Unwissende 4414 14. Okt 2005, 13:30
c0bRa 2 Spalten in zwei Dateien vergleichen und X in eine Datei
Keine neuen Beiträge Excel Formeln: Letzte 3 Stellen einer Zelle kopieren? 4 Tonno 15150 30. Sep 2005, 11:10
Gast Letzte 3 Stellen einer Zelle kopieren?
Keine neuen Beiträge Excel Formeln: Formel in Schritten Kopieren 1-2-3-Frei-4-5-6-Frei 15 Gast 1295 20. Sep 2005, 09:40
Gast Formel in Schritten Kopieren 1-2-3-Frei-4-5-6-Frei
Keine neuen Beiträge Excel Formeln: Hilfe! Zelleninhalte in andere Tabellen kopieren. 2 erdboy 1490 17. Sep 2005, 13:25
Gast Hilfe! Zelleninhalte in andere Tabellen kopieren.
Keine neuen Beiträge Excel Formeln: Datum aus Steuerelment Kombinationsfeld in Zelle kopieren? 2 lemmi-g 675 02. Aug 2005, 19:18
Loomex Datum aus Steuerelment Kombinationsfeld in Zelle kopieren?
Keine neuen Beiträge Excel Formeln: Runden über Tabellenblatt kopieren 2 CK_one_Gast 1489 27. Jul 2005, 10:01
CK_one_Gast Runden über Tabellenblatt kopieren
Keine neuen Beiträge Excel Formeln: Excelliste ohne Leerzeilen in neues Arbeitsblatt kopieren! 1 8Ball 1994 02. Jun 2005, 14:42
mruettler Excelliste ohne Leerzeilen in neues Arbeitsblatt kopieren!
Keine neuen Beiträge Excel Formeln: Selbständiges Suchen einer Zelle und kopieren i andere Datei 2 Gerson 2322 19. Mai 2005, 04:48
Gerson Selbständiges Suchen einer Zelle und kopieren i andere Datei
Keine neuen Beiträge Excel Formeln: Muß Daten kopieren mit Bezug auf mehrer Zeilen 3 Anke 1487 07. Apr 2005, 10:54
Anke Muß Daten kopieren mit Bezug auf mehrer Zeilen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: MS Frontpage