diff --git a/snapcontrol.exe b/snapcontrol.exe index 501ea32..81bf5a7 100644 Binary files a/snapcontrol.exe and b/snapcontrol.exe differ diff --git a/snapcontrol.pb b/snapcontrol.pb index 4812e75..bc7bc54 100644 --- a/snapcontrol.pb +++ b/snapcontrol.pb @@ -7,7 +7,7 @@ ; LICENSE : MIT License ; AUTHOR : Michael H.G. Schmidt ; EMAIL : michael@schmidt2.de -; DATE : 20230723 +; DATE : 20240222 ; ------------------------------------------------------------ ; ; This tool creates an image backups of windows machines, @@ -28,7 +28,7 @@ EnableGraphicalConsole(0) Dim filelist$(0) -Global VERSION$="V1.12" +Global VERSION$="V1.13" Global updatesched = 0 Global dryrun = 0 Global silentmode = 0 @@ -46,14 +46,11 @@ Global Shutdowncommand$ = "shutdown /s /t 120 /d p:0:0" ; valid versions for Drive Snapshot we support ... NewList DriveSnapshotVersion$() - AddElement(DriveSnapshotVersion$()) - DriveSnapshotVersion$() = "V1.46" +For i = 46 To 55 AddElement(DriveSnapshotVersion$()) - DriveSnapshotVersion$() = "V1.47" - - AddElement(DriveSnapshotVersion$()) - DriveSnapshotVersion$() = "V1.48" + DriveSnapshotVersion$() = "V1." + Str(i) +Next Procedure Usage() PrintN ("usage: snapcontrol.exe [ /S | /I | /V | /D | /? ]") @@ -150,9 +147,9 @@ Global MailPass$ = Trim(ReadPreferenceString("MailPass","")) ; which Drive Snapshot version should be used ? arch$ = GetEnvironmentVariable("PROCESSOR_ARCHITECTURE") If ( arch$ = "x86" ) - SnapshotBin$ = BinPath$ + "\snapshot.exe" + SnapshotBin$ = "c:\windows\snapshot.exe" Else - SnapshotBin$ = BinPath$ + "\snapshot64.exe" + SnapshotBin$ = "c:\windows\snapshot64.exe" EndIf ; Drive Snapshot found ? @@ -589,8 +586,8 @@ EndProg(RC_ALL) ; IDE Options = PureBasic 5.73 LTS (Windows - x64) ; ExecutableFormat = Console -; CursorPosition = 44 -; FirstLine = 41 +; CursorPosition = 49 +; FirstLine = 22 ; Folding = -- ; EnableXP ; Executable = snapcontrol.exe