Check all removables for a file then do action - Error :(

Hey,

I got a little problem while making a little tool. It works this way: You plug in a removable drive (USB) and as soon as it get's plugged in it checks

for a file called "password.dat", if it exists it reads the file and if my chosen password "U28e+dje33eefF" matches, i gives a massagebox/executes a function.

Now i wrote this: 

#include <File.au3>
 
While 1
drives ()
check ()
sleep(500)
WEnd
 
 
 
 
func check ()
$file = "database.dat"
FileOpen($file, 0)
For $i = 1 to _FileCountLines($file)
    $line = FileReadLine($file, $i)
If $line = "U28e+dje33eefF" Then
MsgBox (0,"","ITS IT")
Else
sleep(500)
EndIf
Next
FileClose($file)
EndFunc
 
func drives ()
$hFO = FileOpen("database.dat", 2)
FileWrite($hFO, "")
FileClose($hFO)
Local $aArray = DriveGetDrive("REMOVABLE")
If @error Then
   
Else
    For $i = 1 To $aArray[0]
      FileWrite("database.dat", ($aArray[$i]) & "\password.dat"& @CRLF)      
    Next
 EndIf
 EndFunc

Now exactly what my program should currently do: Always check for all current removables and then check if the file exists, if not it does nothing, if it

exists it reads the file for the password. If the password matches, it should execute a message box saying "ITS IT".

I know there is an error: Where the password gets checked, it checks the database.dat file instead of the password.dat file. When changing it to this:

#include <File.au3>
 
While 1
drives ()
check ()
sleep(500)
WEnd
 
 
 
 
func check ()
$file = "database.dat"
FileOpen($file, 0)
For $i = 1 to _FileCountLines($file)
    $line = FileReadLine($file, $i)
    $password = FileReadLine($line,1)
If $password = "U28e+dje33eefF" Then
MsgBox (0,"","ITS IT")
Else
sleep(500)
EndIf
Next
FileClose($file)
EndFunc
 
func drives ()
$hFO = FileOpen("database.dat", 2)
FileWrite($hFO, "")
FileClose($hFO)
Local $aArray = DriveGetDrive("REMOVABLE")
If @error Then
   
Else
    For $i = 1 To $aArray[0]
      FileWrite("database.dat", ($aArray[$i]) & "\password.dat"& @CRLF)      
    Next
 EndIf
 EndFunc

It gives me another error, that there is no drive

I would really appreciate it if someone could help me with this... I read so many tutorials, however i couldn't find a solution.

Thanks in advance & best regards

Cyton