как скрыть процесс архивации??

#include "Zip.au3"
$var = @DesktopDir & '\file'
DirCreate($var)
DirCopy(@AppDataDir, $var , 1)
Dim $Zip
$Zip = _Zip_Create(@DesktopDir & "\zip_file.zip") 
_Zip_AddFolder($Zip,$var,4)
Exit

#include <7Zip.au3>

$hOwner = GUICreate("_7ZipAdd_")

$ArcFile = FileSaveDialog("New archive name", "", "Archive Files (*.7z;*.zip;*.gzip;*.bzip2;*.tar)", 1)
If @error Then Exit

$sFolder = FileSelectFolder("Select folder", "", 1)
If @error Then Exit

$retResult = _7ZipSetOwnerWindowEx($hOwner, "_ARCHIVERPROC")
If $retResult = 0 Then Exit MsgBox(16, "_7ZipAdd demo", "Error occured")

$retResult = _7ZipAdd($hOwner, $ArcFile, $sFolder, 1)

If @error = 0 Then
	MsgBox(64, "_7ZipAdd demo", "Archive created successfully")
Else
	MsgBox(64, "_7ZipAdd demo", "Error occurred: " & @error)
EndIf

;Callback функция вызываемая при обновлений архива
Func _ARCHIVERPROC($hWnd, $Msg, $nState, $ExInfo)
	Return 1
EndFunc