Seite 1 von 1

Datei-Browser - problem

Verfasst: 13.05.2005 20:35
von 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

Verfasst: 13.05.2005 21:43
von 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. ;)

Verfasst: 14.05.2005 09:49
von 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!

Verfasst: 14.05.2005 10:52
von 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

Verfasst: 14.05.2005 14:38
von onny
Danke ich probiers aus!