Moin, ich versuche derzeit eine Laufwerksbuchstaben abzufragen und diese dann in einem Pfad einzubetten um einen "FileExists"-Check zu machen.
Dachte da schon an EnvGet usw. Aber so richtig will das noch nicht. Hier ein Bsp.
AutoIt
Dim $String
$Drive = DriveGetDrive("Fixed")
$String = _ArrayToString($Drive,"|") ;macht aus Array einen String wobei die Einträge mit "|" getrennt werden
$String = StringRegExpReplace($String,$Drive[0]&"|","") ; Entfernt "$Drive[0]" , da diese Element die Anzahl der Laufwerk angibt
GUICreate("Laufwerk",260,50)
$Combo = GUICtrlCreateCombo("C:",10,10,200,20)
GUICtrlSetData(-1,$String,$Drive[1]) ; Setz den Inhalt der Combo und setzt das 1. gefundene Laufwerk als default
$Ok = GUICtrlCreateButton("OK",220,10,30,22)
$sFilePath = $Combo
$sFilePath2 = "\Cloud-Dienste\MEGA\Keepass\Firefox_Keepass.kdbx"
GUISetState()
While 1
Switch GUIGetMsg()
Case -3
Exit
Case $ok
Exit
EndSwitch
If FileExists($sFilePath&$sFilePath2) Then
MsgBox($MB_SYSTEMMODAL, "MSGt2", "-Datei gefunden. Weiter mit ...", 3)
Exit
Else
MsgBox($MB_SYSTEMMODAL, "MSGt3", "Datei nicht gefunden überprüfen Sie Ihre Laufwerke", 3)
Exit
EndIf
WEnd
Alles anzeigen