Wie man überprüft, ob eine Datei vorhanden ist in VB6

September 15

Wie man überprüft, ob eine Datei vorhanden ist in VB6

Entwickler sollten überprüfen, das Vorhandensein einer Datei, bevor Sie versuchen, es zu manipulieren. Wenn ein Programmierer versucht, eine Datei zu verwenden, die nicht vorhanden ist, kann eine Anwendung fehlschlagen oder ungenaue Ergebnisse zu generieren. VB6, auch bekannt als Visual Basic 6, verfügt nicht über eine Funktion namens "Sehen, wenn diese Datei vorhanden ist." Jedoch erlaubt es Ihnen, das Vorhandensein einer Datei auf einem Computer mithilfe von eine indirekte Methode erkannt.

Anweisungen

1 Starten Sie die VB6-Anwendung zu, und drücken Sie "Strg" und "N", öffnen Sie das Fenster "Neues Projekt".

2 Doppelklicken Sie auf "Standard-EXEC" um ein neues Projekt zu erstellen. VB6 wird ein leeres Formular im Bearbeitungsfenster angezeigt.

3 Doppelklicken Sie auf die Schaltfläche "Befehl" in der Toolbox auf das Formular zu setzen.

4 Die rechten Maustaste, und klicken Sie auf "Code anzeigen", um das Codefenster anzuzeigen.

5 Platzieren Sie den folgenden Code vor der "End Sub"-Anweisung, die Sie sehen, im Code:

Dim FileToCheck As String

FileExists As Boolean Dim

DirectoryName As String Dim

Dieser Code definiert drei Variablen. Die "FileToCheck"-Variable enthält den Namen der Datei, deren Existenz Sie erkennen möchten. Die Variable "FileExists" hält "True" oder "False", je nachdem, ob die Datei vorhanden ist. VB6 speichert die Datei Verzeichnisnamen in der Variablen mit dem Namen "Verzeichnisname", wenn die Datei vorhanden ist.

6 Platzieren Sie den folgenden Code unter der Code in der vorherigen Schritt:

FileToCheck = "C\:SomeFolder\SomeFile.txt"

DirectoryName = Dir(fileToCheck)

Wenn DirectoryName = "" dann

FileExists = False

Sonst

FileExists = True

EndIf

MsgBox fileExists

Ersetzen Sie "C:\SomeFolder\SomeFile.txt" durch den vollständigen Pfadnamen der Datei, die Sie überprüfen möchten. Beispielsweise möchten Sie sehen wenn eine Datei namens "music.jpg" in einen Ordner namens "Media" auf Laufwerk "D" vorhanden ist, ersetzen Sie "C:\SomeFolder\SomeFile.txt" mit "D:\Media\music.jpg." Die nächste Codezeile führt die "Dir"-Funktion. Es untersucht den Wert der "FileToCheck." Findet der Befehl "Dir" die angegebene Datei, speichert sie die Verzeichnisnamen in der Variablen mit dem Namen "DirectoryName." Andernfalls speichert es einen leeren Wert.

7 Drücken Sie die Taste "F5", um die Anwendung auszuführen. Wenn das Formular angezeigt wird, klicken Sie auf. Der Code wird ausgeführt, und eine Meldung box zeigt den "True", wenn Sie die Datei für aktiviert vorhanden ist. Wenn diese Datei nicht vorhanden ist, zeigt das Meldungsfeld "False."

Tipps & Warnungen

  • Durch Festlegen einer booleschen Variablen wie z. B. "FileExists", stellen Sie diese Variable in Ihrer Anwendung andere Module zur Verfügung. Diese Module können dann entscheiden, den Verlauf der Aktion an, die je nach dem Vorhandensein oder Fehlen einer Datei.