Zipping Files Using Variables

[StOngeCompany]

Hi AutoIT Forums,

I'm trying to write a script that will scan a directory for .accdb files and zip them. Here is what I have:

$directory = InputBox ("Directory", "Please enter the directory.")
$scan = FileFindFirstFile($directory & "\" & "*.accdb")
If $scan = -1 Then
    MsgBox(0, "Error", "There are no databases in that directory.")
    Exit
EndIf
While 1
   Local $file = FileFindNextFile($scan)
   If @error Then ExitLoop
   RunWait('Winzip32.exe -a "'$directory & "\" & $file'" "'$directory & "\" & $file'"')
  
  WEnd
FileClose($scan)

The script is able to locate all of the .accdb files in a given directory, I'm just stuck on how I can get the RunWait command to recognize variables.

For example, this code works:

RunWait('Winzip32.exe -a "C:\Users\dberndt\Desktop\Test\Database1.zip" "C:\Users\dberndt\Desktop\Test\Database1.accdb"')

But this does not:

RunWait('Winzip32.exe -a "'$directory & "\" & $file'" "'$directory & "\" & $file'"')

Any help would be very much appreciated. Thank you in advance for your time and kindness.

[water]

Give this a try:

RunWait('Winzip32.exe -a "' & $directory & '' & $file & '" "' & $directory & '' & $file & '"')

[StOngeCompany]

Thank you very much, water, it appears that syntax is correct. However, I have one more hurdle to jump. When I run the script, I get an error from WinZip:

Cannot open file: it does not appear to be a valid archive.

I think I need to differentiate between the .zip and the .accdb. I tried the following code with no luck:

RunWait('Winzip32.exe -a "' & $directory & '' & $file & '.accdb' '" "' & $directory & '' & $file & '.zip' '"')

If anyone has any suggestions, I'd be very grateful.

[water]

FielFindNextFile returns a filename including extension e.g. test.accdb.

You need to strip off the filename and then can add ".zip" to it.