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 "