ordner anlegen ..wenn nicht vorhanden

Bild

Betrifft: ordner anlegen ..wenn nicht vorhanden
von: roland_k
Geschrieben am: 12.02.2005 15:45:33
hm bin am basteln....gruesse euch
ich will automatisch speichern ,,,in c:\ test z . b
wenn aber der ordner nicht besteht kommt debubgger ??
wie stell ich das an ??
danke gruss roland _k

Bild

Betrifft: AW: ordner anlegen ..wenn nicht vorhanden
von: Josef Ehrensberger
Geschrieben am: 12.02.2005 15:51:31
Hallo Roland!
Das geht zB. so!

Declare Function MakeSureDirectoryPathExists Lib "imagehlp.dll" (ByVal Pfad As String) As Long
   
Sub Pfad_anlegen()
   MakeSureDirectoryPathExists "C:\NeuerOrdner\NeuerOrdner\NeuerOrdner\NeuerOrdner\"
End Sub

Dabei wird das Verzeichnis, sofern nicht vorhanden, angelegt!

Gruß Sepp
P.S.: Rückmeldung nicht vergessen!
Bild

Betrifft: AW: ordner anlegen ..wenn nicht vorhanden
von: Matthias G
Geschrieben am: 12.02.2005 15:53:15
Hallo Sepp,
was es nicht alles für Funktionen gibt... :-)
*STAUN*
Gruß Matthias
Bild

Betrifft: AW: ordner anlegen ..wenn nicht vorhanden
von: Heinz A. Wankmüller
Geschrieben am: 12.02.2005 16:17:15
Hallo Matthias,
da kann ich dir nur beipflichten.
Die Frage stellt sich: Wo findet man sowas?
Wie auch z.B GetBaseName(strDatei), mit der aus einem Gesamtpfad nur der Dateiname ausgelesen wird
Gruß
Heinz
Bild

Betrifft: AW: ordner anlegen ..wenn nicht vorhanden
von: Matthias G
Geschrieben am: 12.02.2005 15:51:47
Hallo Roland,
If Dir("C:\test", vbDirectory) = "" Then MkDir "C:\test"
Gruß Matthias
Bild

Betrifft: danke leute ..muss erst mal umsetzen :-))
von: roland_k
Geschrieben am: 12.02.2005 16:24:32
danke ..das sollte verdelli aber in recherche finden
hatte das mal im buch von bernd held gesehn aber nicht mehr gefunden
na ja vielen dank
gruss roland _k
 Bild

Beiträge aus den Excel-Beispielen zum Thema "ordner anlegen ..wenn nicht vorhanden "