Domino 9 und frühere Versionen > ND6: Entwicklung

Verzeichnis Existenz verifizieren?

(1/2) > >>

gfunkus:
Hi,

Hat wer ne Idee wie ich festellen kann in LS das ein Vez. schon exisitiert? Vermute mit curdir$ oder so?

Danke für eure Hilfe!

koehlerbv:
CurDir gibt lediglich das gerade aktuelle Verzeichnis zurück.

Zur Prüfung auf die Existenz eines Directorys bleibt nur, auf den möglichen Fehlercode eines ChDir zu reagieren - oder die WinAPI zu bemühen, darüber sollte das auch gehen.

Bernhard

eknori (retired):
Function checkDir( path As String ) As String
   
   On Error Resume Next
   
   CheckDir = False
   
   Chdrive Left( path, 1 )
   Chdir path
   
   If Curdir = path Then          
      CheckDir = True
   End If
   
End Function

Sub Click(Source As Button)
   Msgbox checkDir("c:\Winnt\system32\drivörs")
End Sub

Gibt TRUE zurück, wenn Dir existiert andernfalls FALSE

TMC:
Geht das nicht noch einfacher?

If dir$("c:\dokumente\test", 16) = "" Then
   Msgbox "Das Verzeichnis -test- gibt es nicht !"
Else
   Msgbox "Das Verzeichnis -test- ist vorhanden."
End If

Semeaphoros:
Sollte gehen, ausser man hat es mit einer leeren Partition zu tun, oder einen leeren Netzwerk-Share auf der Basis von Netzsoftware, die die beiden Verzeichnisse "." und ".." nicht mitliefern (zum Bleistift Samba in Abhängigkeit der Konfiguration)

Navigation

[0] Themen-Index

[#] Nächste Seite