Office: (Office 2003) Ordner verschieben mit fortschrittsbalken

Hallo

Ich möchte von Access aus Daten archivieren.
somit brauche ich eine Funktion mit der ich Ordnerverschieben kann.

auf der Seite von TK-online habe ich eine Funktion MoveFolderFSO
gefunden mit der es eigentlich auch ganz gut funktioniert, nur wäre es schön wenn ich während der Verschiebung auch sehen könnte wie lange es geht z. B Fortschrittsbalken oder so, hat jemand eine Idee wie man das lösen könnte?

für jeden Tipp wäre ich sehr dankbar

Besten dank im voraus.

:)

 

Moin,
für einen Excelimport hab' ich mir einfach ein ungebundenes Textfeld auf das Formular gepappt, das in der Importschleife dann mit "Bearbeite: " & aktueller Dateiname versorgt wird. So hat dann der User während der Dauer des Imports ein bisschen Abwechslung *biggrin.gif* :.
maike

 

Hallo Dark,
eine Suche nach Fortschrittbalken hier im Forum liefert reichlich brauchbare Ergebnisse; unter anderem hier

 

Wie lange das Kopieren dauert, dürfte schwierigst zu ermitteln sein (Datenmenge?, System?). Für einen Fortschrittsbalken müsste ebenso der Gesamtaufwand und der prozentuale Erfolg bestimmbar sein.

Damit sich etwas bewegt, könnte man vielleicht so etwas ins Spiel bringen: Wie kann ich Dateien mit den Flying Windows verschieben?

 

Hallo darkfire,
die Frage hatte ich hier auch schon gestellt.
Funktionier mit API.
Siehe Beispiel hier Beitrag 20 von TommyK.
Ansonsten im Forum suchen nach Datei kopieren API.

Es grüßt Jens *Smilie

 

Hallo zusammen

Besten dank für die vielen Tipps.
Ich werde mich mal durchlesen und ein wenig ausprobieren.

Besten Dank nochmals und ein schönes weekend.

 

Es geht auch alles wesentlich einfacher. ^^

Einfach ein kleines Unterformular mit einem Balken (Rechteckt) drinnen. Denn Balken bei Start auf Breite 0 setzen und den Timer anschmeissen. Und jedem Timer-Event den Balken um einen Wert X verbreitern.

Das Unterformular wird beim Start der Prozedur aufgerufen und und nach jeder kopierten Datei kommt ein DoEvents als Anweisung rein. Damit wird nach jeder kopierten Datei der Balken in dem Formular bewegt und es sieht wie ein Fortschrittsbalken aus. Sowas kann man auch gut mit maikeks Vorgehen (einblenden des Namens welche Datei gerade kopiert wird) verbinden.

Für den User bewegt sich bei längeren Prozeduren etwas am Bildschirm und er ist beruhigt das nix hängt.

Nachteil dieser Vorgehensweise ... es ist nur umständlich anpassbar an die exakte prozentuale Abarbeitung der Prozedur. Was aber meistens nicht notwendig ist ... Hauptsache es passiert was und wenn die Prozedur beendet ist und die Form mit den Balken geschlossen wird, einfach in Form_Close dann den Balken schnell auf volle Breite setzen und im Form die Meldung einblenden "Vorgang beendet!", kurzes Sleep und dann raus.

Gruß

Rainer

 

Hallo

nach längerem ausprobieren und testen hab ich nun eine Variante gefunden mit der ich die Daten verschieben und den Vorgang mit der Statusanzeige auch anzeigen kann. Das kopieren und löschen der Daten, funktioniert soweit wunderbar.

Leider habe ich beim löschen vom leeren SourcePath, das Problem, dass sich Access sich immer aufhängt und ich finde einfach nicht raus wieso. Hier mein code:

Code:

Code:

Code:

Code:

wenn mir jemand einen Tipp geben könnte was ich falsch mache wäre ich sehr dankbar.

Besten Dank im voraus.

 

Code:

Die Verwendung von Dir ist manchmal heikel (lies die genaue Definition). Der Schleifendurchlauf könnte durch das Löschen gestört sein.

Da das FSO-Objekt sowieso in Verwendung ist, wurde ich auch zur Prüfung auf Verzeichnis eine FSO-Methode wählen.

 

Hallo Eberhard,

Besten dank für den Tipp, hat aber auch nichts gebracht, hatte immer noch das gleiche Problem.

Habe aber nun mit der Funktion "DeleteFolderFSO" das Problem in den Griff bekommen.

Code:

Wahrscheinlich lag das es an der Do While-Schleife und an der Funktion RmDIR.
Nichtsdestotrotz, nun funktionierts ja.

Besten dank nochmals und noch einen schönen Tag noch.