Elite Veteran
Beiträge: 922
 
Ort: Wien | Hallo!
Dreho52 - 24.02.19
...
Hier mein Befehl der leider nicht funktioniert, was ist daran falsch?
Private Sub Form_Load()
' DokuPfad wird aus der Abfrage mit dem gleichnamigen Feld gezogen
' Im Moment steht in Dokupfad "D:\TPSC\Access_Reports\"
' Der Ordner "D:\TPSC" besteht bereits
If Dir(DokuPfad, vbDirectory) = "" Then
MkDir DokuPfad
MsgBox ("Pfad " & DokuPfad & " erstellt !")
Else
MsgBox ("Pfad " & DokuPfad & " existiert schon")
End If
End Sub
Setze mal einen Haltepunkt und prüfe, was bei deiner Zeile mit
Dir(DokuPfad, vbDirectory)
rauskommt.
-----
Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |
Neues Verzeichnis anlagen