Gewusst wie: sicherstellen, dass eine Datei in VB6 kopiert wurde
Erstellen, bearbeiten, verschieben, kopieren und löschen sind gemeinsame Aktionen in einem Programm ausgeführt, die Dateien verarbeitet. Anwendungen möglicherweise empfangen einer Datei von beliebigen externen Quellen wie e-Mail oder einer anderen Anwendung, durch die Datei lesen und führen Sie irgendeine Art von Aktion z. B., dass die Informationen in eine Datenbank einfügen und dann verschieben oder kopieren Sie die Datei an einen anderen Speicherort, der darauf hinweist, dass die Datei bereits verarbeitet wurde. Das Windows-Betriebssystem hat eine eingebaute API, alle der genannten Datei-Verarbeitung Funktionen behandeln.
Anweisungen
1 Erstellen Sie ein neues Standard-EXE-Projekt in Visual Basic. Fügen Sie Microsoft Scripting Runtime das Projekt hinzu, indem Sie "Project", "Verweise", "Microsoft Scripting Runtime" auswählen und auf "OK" Speichern und schließen Sie den Bildschirm.
2 Erstellen Sie ein neues FileScripting-Objekt, indem Sie deklarieren eine Variable vom Typ "Scripting.FileScriptingObject." Der Code sollte ähnlich aussehen:
Dim oFile als neue Scripting.FileScriptingObject
Diese Codezeile definieren die Variable mit dem Namen "oFile" und erstellen das Objekt, auf das verwiesen werden kann im Code zu folgen.
3 Bestimmen Sie, ob die Datei vorhanden ist, durch die Kodierung "oFile.FileExists(filepath)", wobei "Dateipfad" den vollständigen Namen und Pfad der Datei ist. Das Ergebnis dieser Funktion ist True oder False. Wenn das Ergebnis stimmt, dann die Datei vorhanden ist und Sie können weiter mit der Kopierfunktion. Wenn die Datei nicht vorhanden ist, sollten Sie jedoch eine Art der Fehlerbehandlung programmieren.
4 Kopieren Sie die Datei in der Variable "Dateipfad" an einen neuen Speicherort angegeben, durch die Kodierung dieser Linie "oFile.CopyFile Filepath Newloc" wobei "Newloc" der Pfad zum neuen Speicherort ist. Ein Beispiel für den neuen Standort wäre "C:\CopiedFiles" oder "D:\Backup." Der Dateiname bleibt gleich in den neuen Ordner.
5 Überprüfen Sie, ob die Datei kopiert wurde, wieder mit der "FileExists"-Methode. Überprüfen Sie, dass in der Variablen "Dateipfad" angegebene Datei in die Variable "Newloc" angegebenen Speicherort kopiert habe, werden Sie sicher, dass Sie den einzelnen Dateinamen in eine separate Variable gespeichert haben. Beispielsweise wird der Code "oFile.FileExists (Newloc & Filename)" TRUE zurück, wenn der Dateiname im "Filename" erfolgreich in den neuen Ordner kopiert wurde.