Datei-Browser - problem

[onny]

Ich will mit einem PathRequester einen Pfad suchen lassen, in dem dann Dateien ertellt, kopiert oder geköscht werden können.....

InitialPath$ = "C:\"
Path$ = PathRequester("Bitte geben sie ihr Test Verzeichniss an!", InitialPath$)

If Path$


If ReadFile(0, "Path$\Test.exe")
Else
MessageRequester("Information", "Test.exe wurde nicht gefunden auf: "+Chr(10)+Path$, 0)
EndIf

usw...

Wie muss der Quelltext mit Path$ beim kpoieren usw ausehen?
Mfg jonas

[Ynnus]

Wenn du Dateien in ein Verzeichnis kopieren willst, kannst du dafür die Funktion CopyFile nehmen. Wenn das fehlschlägt, geht das Kopieren in diesen Ordner nicht und das kannst du auswerten. Mit dem Löschen ist es ähnlich, erst prüfen ob die Datei existiert (etwa ReadFile) und dann deletefile() zum Löschen benutzen. Vielleicht kann man auch direkt löschen ohne zu Prüfen, obs die Datei gibt, aber sicher ist sicher.

Was ich aber eigentlich sagen wollte, du solltest dir angewöhnen, deinen Quellcode so übersichtlich wie möglich zu gestalten. Also Einrückungen und wenn du ihn hier postest, dann möglichst mit [code]dein text[/code] Tags.

[onny]

Ok, merk ich mir!

Aber ich wollte wissen wie ich mit dem Dateibrowser ein Verzeichniss suchen kann in das dann eine Datei kopiert werden kann!

[ts-soft]

Ändere bitte diese Zeile:

Code: Alles auswählen

If ReadFile(0, "Path$\Test.exe")

so ab:

Code: Alles auswählen

If Right(Path$, 1) <> "\" : Path$ + "\" : EndIf 
If ReadFile(0, Path$ + "Test.exe") 

Ich hoffe Du kommst so weiter

[onny]

Danke ich probiers aus!