ERROR: syntax error (illegal character)

[rm4453]

It keeps giving me this error and I don't know how to fix it:

>"C:\Users\Cashier\Downloads\OAEC\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "F:\Hitbox Viewer Code\_Startup.au3" /UserParams    
+>14:27:07 Starting AutoIt3Wrapper v.2.1.3.0 SciTE v.3.3.6.0 ;  Keyboard:00000409  OS:WIN_8/  CPU:X64 OS:X64    Environment(Language:0409  Keyboard:00000409  OS:WIN_8/  CPU:X64 OS:X64)
>Running AU3Check (1.54.22.0)  from:C:\Users\Cashier\Downloads\OAEC\AutoIt3
F:\Hitbox Viewer Code\_Startup.au3(156,20) : ERROR: syntax error (illegal character)
    Return $bAllUsers ?
    ~~~~~~~~~~~~~~~~~~^
F:\Hitbox Viewer Code\_Startup.au3(220,21) : ERROR: syntax error (illegal character)
    Return ($bAllUsers ?
    ~~~~~~~~~~~~~~~~~~~^
F:\Hitbox Viewer Code\_Startup.au3(221,23) : ERROR: syntax error (illegal character)
            ((@OSArch = 'X64') ?
            ~~~~~~~~~~~~~~~~~~~^
F:\Hitbox Viewer Code\_Startup.au3 - 3 error(s), 0 warning(s)
!>14:27:07 AU3Check ended. Press F4 to jump to next error.rc:2
>Exit code: 2    Time: 0.680

 

THANKS FOR ALL OF YOUR HELP!

Here is the code:

expandcollapse popup

#include-once

; #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w- 4 -w 5 -w 6 -w 7
; #INDEX# =======================================================================================================================
; Title .........: _Startup
; AutoIt Version : v3.3.10.0 or higher
; Language ......: English
; Description ...: Create startup entries in the startup folder or registry. The registry entries can be Run all the time (Run registry entry) or only once (RunOnce registry entry.)
; Note ..........:
; Author(s) .....: guinness
; Remarks .......: Special thanks to KaFu for EnumRegKeys2Array() which I used as inspiration for enumerating the Registry Keys.
; ===============================================================================================================================

; #INCLUDES# ====================================================================================================================
#include <StringConstants.au3>

; #GLOBAL VARIABLES# ============================================================================================================
Global Enum $STARTUP_RUN = 0, $STARTUP_RUNONCE, $STARTUP_RUNONCEEX

; #CURRENT# =====================================================================================================================
; _StartupFolder_Exists: Checks if an entry exits in the 'All Users/Current Users' startup folder.
; _StartupFolder_Install: Creates an entry in the 'All Users/Current Users' startup folder.
; _StartupFolder_Uninstall: Deletes an entry in the 'All Users/Current Users' startup folder.
; _StartupRegistry_Exists: Checks if an entry exits in the 'All Users/Current Users' registry.
; _StartupRegistry_Install: Creates an entry in the 'All Users/Current Users' registry.
; _StartupRegistry_Uninstall: Deletes the entry in the 'All Users/Current Users' registry.
; ===============================================================================================================================

; #INTERNAL_USE_ONLY#============================================================================================================
; See below.
; ===============================================================================================================================

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupFolder_Exists
; Description ...: Checks if an entry exits in the 'All Users/Current Users' startup folder.
; Syntax ........: _StartupFolder_Exists([$sName = @ScriptName[, $bAllUsers = False]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $bAllUsers           - [optional] Add to Current Users (False) or All Users (True) Default is False.
; Return values .: Success - True
;                  Failure - False
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupFolder_Exists($sName = @ScriptName, $bAllUsers = False)
    Local $sFilePath = Default
    __Startup_Format($sName, $sFilePath)
    Return FileExists(__StartupFolder_Location($bAllUsers) & '\' & $sName & '.lnk')
EndFunc   ;==>_StartupFolder_Exists

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupFolder_Install
; Description ...: Creates an entry in the 'All Users/Current Users' startup folder.
; Syntax ........: _StartupFolder_Install([$sName = @ScriptName[, $sFilePath = @ScriptFullPath[, $sCommandline = ''[,
;                  $bAllUsers = False]]]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $sFilePath           - [optional] Location of the program executable. Default is @ScriptFullPath.
;                  $sCommandline        - [optional] Commandline arguments to be passed to the application. Default is ''.
;                  $bAllUsers           - [optional] Add to Current Users (False) or All Users (True) Default is False.
; Return values .: Success - True
;                  Failure - False & sets @error to non-zero
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupFolder_Install($sName = @ScriptName, $sFilePath = @ScriptFullPath, $sCommandline = '', $bAllUsers = False)
    Return __StartupFolder_Uninstall(True, $sName, $sFilePath, $sCommandline, $bAllUsers)
EndFunc   ;==>_StartupFolder_Install

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupFolder_Uninstall
; Description ...: Deletes an entry in the 'All Users/Current Users' startup folder.
; Syntax ........: _StartupFolder_Uninstall([$sName = @ScriptName[, $sFilePath = @ScriptFullPath[, $bAllUsers = False]]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $sFilePath           - [optional] Location of the program executable. Default is @ScriptFullPath.
;                  $bAllUsers           - [optional] Was it added to Current Users (False) or All Users (True) Default is False.
; Return values .: Success - True
;                  Failure - False & sets @error to non-zero
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupFolder_Uninstall($sName = @ScriptName, $sFilePath = @ScriptFullPath, $bAllUsers = False)
    Return __StartupFolder_Uninstall(False, $sName, $sFilePath, Default, $bAllUsers)
EndFunc   ;==>_StartupFolder_Uninstall

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupRegistry_Exists
; Description ...:Checks if an entry exits in the 'All Users/Current Users' registry.
; Syntax ........: _StartupRegistry_Exists([$sName = @ScriptName[, $bAllUsers = False[, $iRunOnce = $STARTUP_RUN]]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $bAllUsers           - [optional] Add to Current Users (False) or All Users (True) Default is False.
;                  $iRunOnce            - [optional] Always run at system startup $STARTUP_RUN (0), run only once before explorer is started $STARTUP_RUNONCE (1)
;                                         or run only once after explorer is started $STARTUP_RUNONCEEX (2). Default is $STARTUP_RUN (0).
; Return values .: Success - True
;                  Failure - False
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupRegistry_Exists($sName = @ScriptName, $bAllUsers = False, $iRunOnce = $STARTUP_RUN)
    Local $sFilePath = Default
    __Startup_Format($sName, $sFilePath)
    RegRead(__StartupRegistry_Location($bAllUsers, $iRunOnce) & '\', $sName)
    Return @error = 0
EndFunc   ;==>_StartupRegistry_Exists

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupRegistry_Install
; Description ...: Creates an entry in the 'All Users/Current Users' registry.
; Syntax ........: _StartupRegistry_Install([$sName = @ScriptName[, $sFilePath = @ScriptFullPath[, $sCommandline = ''[,
;                  $bAllUsers = False[, $iRunOnce = $STARTUP_RUN]]]]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $sFilePath           - [optional] Location of the program executable. Default is @ScriptFullPath.
;                  $sCommandline        - [optional] Commandline arguments to be passed to the application. Default is ''.
;                  $bAllUsers           - [optional] Add to Current Users (False) or All Users (True) Default is False.
;                  $iRunOnce            - [optional] Always run at system startup $STARTUP_RUN (0), run only once before explorer is started $STARTUP_RUNONCE (1)
;                                         or run only once after explorer is started $STARTUP_RUNONCEEX (2). Default is $STARTUP_RUN (0).
; Return values .: Success - True
;                  Failure - False & sets @error to non-zero
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupRegistry_Install($sName = @ScriptName, $sFilePath = @ScriptFullPath, $sCommandline = '', $bAllUsers = False, $iRunOnce = $STARTUP_RUN)
    Return __StartupRegistry_Uninstall(True, $sName, $sFilePath, $sCommandline, $bAllUsers, $iRunOnce)
EndFunc   ;==>_StartupRegistry_Install

; #FUNCTION# ====================================================================================================================
; Name ..........: _StartupRegistry_Uninstall
; Description ...: Deletes the entry in the 'All Users/Current Users' registry.
; Syntax ........: _StartupRegistry_Uninstall([$sName = @ScriptName[, $sFilePath = @ScriptFullPath[, $bAllUsers = False[,
;                  $iRunOnce = Default]]]])
; Parameters ....: $sName               - [optional] Name of the program. Default is @ScriptName.
;                  $sFilePath           - [optional] Location of the program executable. Default is @ScriptFullPath.
;                  $bAllUsers           - [optional] Was it added to the current users (0) or all users (1). Default is 0.
;                  $iRunOnce            - [optional] Was it run at system startup $STARTUP_RUN (0), run only once before explorer is started $STARTUP_RUNONCE (1)
;                                         or run only once after explorer is started $STARTUP_RUNONCEEX (2). Default is $STARTUP_RUN (0).
; Return values .: Success - True
;                  Failure - False & sets @error to non-zero
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================
Func _StartupRegistry_Uninstall($sName = @ScriptName, $sFilePath = @ScriptFullPath, $bAllUsers = False, $iRunOnce = $STARTUP_RUN)
    Return __StartupRegistry_Uninstall(False, $sName, $sFilePath, Default, $bAllUsers, $iRunOnce)
EndFunc   ;==>_StartupRegistry_Uninstall

; #INTERNAL_USE_ONLY#============================================================================================================
Func __Startup_Format(ByRef $sName, ByRef $sFilePath)
    If $sFilePath = Default Then
        $sFilePath = @ScriptFullPath
    EndIf
    If $sName = Default Then
        $sName = @ScriptName
    EndIf
    $sName = StringRegExpReplace($sName, '\.[^.\\/]*$', '') ; Remove extension.
    Return Not (StringStripWS($sName, $STR_STRIPALL) == '') And FileExists($sFilePath)
EndFunc   ;==>__Startup_Format

Func __StartupFolder_Location($bAllUsers)
    Return $bAllUsers ? @StartupCommonDir : @StartupDir
EndFunc   ;==>__StartupFolder_Location

Func __StartupFolder_Uninstall($bIsInstall, $sName, $sFilePath, $sCommandline, $bAllUsers)
    If Not __Startup_Format($sName, $sFilePath) Then
        Return SetError(1, 0, False) ; $STARTUP_ERROR_EXISTS
    EndIf
    If $bAllUsers = Default Then
        $bAllUsers = False
    EndIf
    If $sCommandline = Default Then
        $sCommandline = ''
    EndIf

    Local Const $sStartup = __StartupFolder_Location($bAllUsers)
    Local Const $hSearch = FileFindFirstFile($sStartup & '\' & '*.lnk')
    Local $vReturn = 0
    If $hSearch > -1 Then
        Local Const $iStringLen = StringLen($sName)
        Local $aFileGetShortcut = 0, _
                $sFileName = ''
        While 1
            $sFileName = FileFindNextFile($hSearch)
            If @error Then
                ExitLoop
            EndIf
            If StringLeft($sFileName, $iStringLen) = $sName Then
                $aFileGetShortcut = FileGetShortcut($sStartup & '\' & $sFileName)
                If @error Then
                    ContinueLoop
                EndIf
                If $aFileGetShortcut[0] = $sFilePath Then
                    $vReturn += FileDelete($sStartup & '\' & $sFileName)
                EndIf
            EndIf
        WEnd
        FileClose($hSearch)
    ElseIf Not $bIsInstall Then
        Return SetError(2, 0, False) ; $STARTUP_ERROR_EMPTY
    EndIf

    If $bIsInstall Then
        $vReturn = FileCreateShortcut($sFilePath, $sStartup & '\' & $sName & '.lnk', $sStartup, $sCommandline) > 0
    Else
        $vReturn = $vReturn > 0
    EndIf

    Return $vReturn
EndFunc   ;==>__StartupFolder_Uninstall

Func __StartupRegistry_Location($bAllUsers, $iRunOnce)
    If $iRunOnce = Default Then
        $iRunOnce = $STARTUP_RUN
    EndIf
    Local $sRunOnce = ''
    Switch $iRunOnce
        Case $STARTUP_RUNONCE
            $sRunOnce = 'Once'
        Case $STARTUP_RUNONCEEX
            $sRunOnce = 'OnceEx'
        Case Else
            $sRunOnce = ''
    EndSwitch

    Return ($bAllUsers ? 'HKEY_LOCAL_MACHINE' : 'HKEY_CURRENT_USER') & _
            ((@OSArch = 'X64') ? '64' : '') & '\SOFTWARE\Microsoft\Windows\CurrentVersion\Run' & $sRunOnce
EndFunc   ;==>__StartupRegistry_Location

Func __StartupRegistry_Uninstall($bIsInstall, $sName, $sFilePath, $sCommandline, $bAllUsers, $iRunOnce)
    If Not __Startup_Format($sName, $sFilePath) Then
        Return SetError(1, 0, False) ; $STARTUP_ERROR_EXISTS
    EndIf
    If $bAllUsers = Default Then
        $bAllUsers = False
    EndIf
    If $sCommandline = Default Then
        $sCommandline = ''
    EndIf

    Local Const $sRegistryKey = __StartupRegistry_Location($bAllUsers, $iRunOnce)
    Local $iInstance = 1, _
            $sRegistryName = '', _
            $vReturn = 0
    While 1
        $sRegistryName = RegEnumVal($sRegistryKey & '\', $iInstance)
        If @error Then
            ExitLoop
        EndIf

        If ($sRegistryName = $sName) And StringInStr(RegRead($sRegistryKey & '\', $sRegistryName), $sFilePath, $STR_NOCASESENSEBASIC) Then
            $vReturn += RegDelete($sRegistryKey & '\', $sName)
        EndIf
        $iInstance += 1
    WEnd

    If $bIsInstall Then
        $vReturn = RegWrite($sRegistryKey & '\', $sName, 'REG_SZ', $sFilePath & ' ' & $sCommandline) > 0
    Else
        $vReturn = $vReturn > 0
    EndIf

    Return $vReturn
EndFunc   ;==>__StartupRegistry_Uninstall

 

Edited January 12, 2016 by rm4453
Provided More Error Information

[mLipok]

Can you provide a code snippet with this line following line:

Return $bAllUsers = @StartupCommonDir Else

?

Edited January 12, 2016 by mLipok

[rm4453]

Can you provide a code snippet with this line following line:

Return $bAllUsers = @StartupCommonDir Else

?

what do you mean? sorry I am still new to autoit and am working on learning quite a bit...

Edited January 12, 2016 by rm4453
Spelling error

[mLipok]

The first issue on which you need to focus is:

F:\Hitbox Viewer Code\_Startup.au3(156,40) : ERROR: syntax error
    Return $bAllUsers = @StartupCommonDir Else

The code you provide in opening post, does'nt containt this line.
I think this is an issue in your own script.

Edited January 12, 2016 by mLipok

[rm4453]

The first issue on which you need to focus is:

The code you provide in opening post, does'nt containt this line.
I think this is an issue in your own script.

crap XD forgot to include other script that is calling this... here you go TY for reminder.

 

expandcollapse popup

#include "_Startup.au3"

Dim $DBT_DEVICEARRIVAL = "0x00008000"
Dim $DBT_DEVICECOMPLETEREMOVAL = "0x00008004"
Dim $USB_ATTENTION = "0x00000007"
Dim $WM_DEVICECHANGE = 0x0219
Dim $Drives
Dim $Drive_Type = "ALL"  ; Set to ALL because some USB Drives are detected as Fixed Disks, and we don't want to miss those
Dim $WATCH = False
Dim $MyDrive = "STUFF"

                    Func StartInstall()
                        _StartupFolder_Install() ; Add the running EXE to the Current Users startup folder.
                        ShellExecute(@StartupDir & '\')
                        _StartupRegistry_Install()
                        Local MsgBox("ERROR","FAULTY DRIVE","Your USB Device Has Corrupted Memory Please Plug It Into A Recognized Computer, And Launch Recovery.exe To Save Your Data!")
                    EndFunc


;Get Initial List of Drives to Check Against
UpdateDrives()
;Setup The GUI to watch for the DeviceChange Event
GUICreate("")
GUIRegisterMsg($WM_DEVICECHANGE, "DeviceChange")
Func DeviceChange($hWndGUI, $MsgID, $WParam, $LParam)
    Switch $WParam
        Case $USB_ATTENTION
        ; This only happens when USB drives are inserted, so I use it to tell the difference between these and CDROMs
            $WATCH = True
        Case $DBT_DEVICECOMPLETEREMOVAL
        ; Whenever a Drive is Removed, Update the Drive List
            UpdateDrives()
        Case $DBT_DEVICEARRIVAL
        ; A drive was inserted
        ; Use $WATCH to tell if this was a CDROM or USB
        ; $WATCH = True, USB
        ; $WATCH = False, CDROM
            If $WATCH = True Then
            ; New USB Drive Was Detected, Time to Find it's Letter
                $New = FindNewDrive(); $New now has the Drive Letter of our New Drive, so USE IT!!!
                $Label = DriveGetLabel($New)
                $MyDrive = $Label
                If $Label == $MyDrive Then
                    StartInstall()
                EndIf
            ; Now Reset Drive List so more insertions can also be detected accurately
                UpdateDrives()
            EndIf
    EndSwitch
EndFunc  ;==>DeviceChange

; This just jumps through the new Drive List, comparing them until it finds the entry that is in the new one that isn't in the old one
Func FindNewDrive()
    $Temp = DriveGetDrive( "REMOVABLE" )
    For $i = 1 to $Temp[0]
        $Old = False
        For $j = 1 to $DRIVES[0]
            If $DRIVES[$j] == $Temp[$i] Then $Old = True
        Next
        If $Old == False Then Return $Temp[$i]
    Next
EndFunc  ;==>FindNewDrive

; Just to keep things neat, and so if Variables Ever Change, this makes updating easier
Func UpdateDrives()
    $Drives = DriveGetDrive( $Drive_Type )
EndFunc  ;==>UpdateDrives

; Main Loop to Keep the Program Open
; No Real Way of ending this program, except for just killing the process
; Which is what I want, an always on backup for my drive every time I insert it
While 1
    $GuiMsg = GUIGetMsg()
; This is needed because the watch event above not only triggers before a USB Drive is inserted/removed,
; but also AFTER insertion too, and if not reset, a subsequent CD insertion will trigger it again.
; So, every second, we reset $WATCH, to keep things clean
    Sleep (1000)
    $WATCH = False
WEnd

That code provides the a-formentioned error when  _StartupFolder_Install or _StartupRegistry_Install is called via Func StartInstall()

[mLipok]

The only one problem I see now is 

Local MsgBox("ERROR", "FAULTY DRIVE", "Your USB Device Has Corrupted Memory Please Plug It Into A Recognized Computer, And Launch Recovery.exe To Save Your Data!")

"C:\Users\user\Downloads\statup_example.au3"(79,8) : error: syntax error
    Local MsgBox
    ~~~~~~^
"C:\Users\user\Downloads\statup_example.au3"(79,8) : error: Statement cannot be just an expression.
    Local MsgBox
    ~~~~~~^

Btw.

These line numbers are from this reordered code:

expandcollapse popup

#include "_startup.au3"

Global $DBT_DEVICEARRIVAL = "0x00008000"
Global $DBT_DEVICECOMPLETEREMOVAL = "0x00008004"
Global $USB_ATTENTION = "0x00000007"
Global $WM_DEVICECHANGE = 0x0219
Global $Drives
Global $Drive_Type = "ALL" ; Set to ALL because some USB Drives are detected as Fixed Disks, and we don't want to miss those
Global $WATCH = False
Global $MyDrive = "STUFF"

;Get Initial List of Drives to Check Against
UpdateDrives()
;Setup The GUI to watch for the DeviceChange Event
GUICreate("")
GUIRegisterMsg($WM_DEVICECHANGE, "DeviceChange")

; Main Loop to Keep the Program Open
; No Real Way of ending this program, except for just killing the process
; Which is what I want, an always on backup for my drive every time I insert it
While 1
    $GuiMsg = GUIGetMsg()
    ; This is needed because the watch event above not only triggers before a USB Drive is inserted/removed,
    ; but also AFTER insertion too, and if not reset, a subsequent CD insertion will trigger it again.
    ; So, every second, we reset $WATCH, to keep things clean
    Sleep(1000)
    $WATCH = False
WEnd


Func DeviceChange($hWndGUI, $MsgID, $WParam, $LParam)
    Switch $WParam
        Case $USB_ATTENTION
            ; This only happens when USB drives are inserted, so I use it to tell the difference between these and CDROMs
            $WATCH = True
        Case $DBT_DEVICECOMPLETEREMOVAL
            ; Whenever a Drive is Removed, Update the Drive List
            UpdateDrives()
        Case $DBT_DEVICEARRIVAL
            ; A drive was inserted
            ; Use $WATCH to tell if this was a CDROM or USB
            ; $WATCH = True, USB
            ; $WATCH = False, CDROM
            If $WATCH = True Then
                ; New USB Drive Was Detected, Time to Find it's Letter
                $New = FindNewDrive(); $New now has the Drive Letter of our New Drive, so USE IT!!!
                $Label = DriveGetLabel($New)
                $MyDrive = $Label
                If $Label == $MyDrive Then
                    StartInstall()
                EndIf
                ; Now Reset Drive List so more insertions can also be detected accurately
                UpdateDrives()
            EndIf
    EndSwitch
EndFunc   ;==>DeviceChange

; This just jumps through the new Drive List, comparing them until it finds the entry that is in the new one that isn't in the old one
Func FindNewDrive()
    $Temp = DriveGetDrive("REMOVABLE")
    For $i = 1 To $Temp[0]
        $Old = False
        For $j = 1 To $Drives[0]
            If $Drives[$j] == $Temp[$i] Then $Old = True
        Next
        If $Old == False Then Return $Temp[$i]
    Next
EndFunc   ;==>FindNewDrive

; Just to keep things neat, and so if Variables Ever Change, this makes updating easier
Func UpdateDrives()
    $Drives = DriveGetDrive($Drive_Type)
EndFunc   ;==>UpdateDrives

Func StartInstall()
    _StartupFolder_Install() ; Add the running EXE to the Current Users startup folder.
    ShellExecute(@StartupDir & '\')
    _StartupRegistry_Install()
    MsgBox("ERROR", "FAULTY DRIVE", "Your USB Device Has Corrupted Memory Please Plug It Into A Recognized Computer, And Launch Recovery.exe To Save Your Data!")
EndFunc   ;==>StartInstall

 

Hint:

do not use 

Dim ....

If you want to know why read HelpFile:

...
Dim = Local scope if the variable name doesn't already exist globally (in which case it reuses the global variable!)
...
You should use Local or Global, instead of Dim, to explicitly state which scope is desired for a variable/constant/array.
...

[rm4453]

The only one problem I see now is 

Local MsgBox("ERROR", "FAULTY DRIVE", "Your USB Device Has Corrupted Memory Please Plug It Into A Recognized Computer, And Launch Recovery.exe To Save Your Data!")

Btw.

These line numbers are from this reordered code:

expandcollapse popup

#include "_startup.au3"

Global $DBT_DEVICEARRIVAL = "0x00008000"
Global $DBT_DEVICECOMPLETEREMOVAL = "0x00008004"
Global $USB_ATTENTION = "0x00000007"
Global $WM_DEVICECHANGE = 0x0219
Global $Drives
Global $Drive_Type = "ALL" ; Set to ALL because some USB Drives are detected as Fixed Disks, and we don't want to miss those
Global $WATCH = False
Global $MyDrive = "STUFF"

;Get Initial List of Drives to Check Against
UpdateDrives()
;Setup The GUI to watch for the DeviceChange Event
GUICreate("")
GUIRegisterMsg($WM_DEVICECHANGE, "DeviceChange")

; Main Loop to Keep the Program Open
; No Real Way of ending this program, except for just killing the process
; Which is what I want, an always on backup for my drive every time I insert it
While 1
    $GuiMsg = GUIGetMsg()
    ; This is needed because the watch event above not only triggers before a USB Drive is inserted/removed,
    ; but also AFTER insertion too, and if not reset, a subsequent CD insertion will trigger it again.
    ; So, every second, we reset $WATCH, to keep things clean
    Sleep(1000)
    $WATCH = False
WEnd


Func DeviceChange($hWndGUI, $MsgID, $WParam, $LParam)
    Switch $WParam
        Case $USB_ATTENTION
            ; This only happens when USB drives are inserted, so I use it to tell the difference between these and CDROMs
            $WATCH = True
        Case $DBT_DEVICECOMPLETEREMOVAL
            ; Whenever a Drive is Removed, Update the Drive List
            UpdateDrives()
        Case $DBT_DEVICEARRIVAL
            ; A drive was inserted
            ; Use $WATCH to tell if this was a CDROM or USB
            ; $WATCH = True, USB
            ; $WATCH = False, CDROM
            If $WATCH = True Then
                ; New USB Drive Was Detected, Time to Find it's Letter
                $New = FindNewDrive(); $New now has the Drive Letter of our New Drive, so USE IT!!!
                $Label = DriveGetLabel($New)
                $MyDrive = $Label
                If $Label == $MyDrive Then
                    StartInstall()
                EndIf
                ; Now Reset Drive List so more insertions can also be detected accurately
                UpdateDrives()
            EndIf
    EndSwitch
EndFunc   ;==>DeviceChange

; This just jumps through the new Drive List, comparing them until it finds the entry that is in the new one that isn't in the old one
Func FindNewDrive()
    $Temp = DriveGetDrive("REMOVABLE")
    For $i = 1 To $Temp[0]
        $Old = False
        For $j = 1 To $Drives[0]
            If $Drives[$j] == $Temp[$i] Then $Old = True
        Next
        If $Old == False Then Return $Temp[$i]
    Next
EndFunc   ;==>FindNewDrive

; Just to keep things neat, and so if Variables Ever Change, this makes updating easier
Func UpdateDrives()
    $Drives = DriveGetDrive($Drive_Type)
EndFunc   ;==>UpdateDrives

Func StartInstall()
    _StartupFolder_Install() ; Add the running EXE to the Current Users startup folder.
    ShellExecute(@StartupDir & '\')
    _StartupRegistry_Install()
    MsgBox("ERROR", "FAULTY DRIVE", "Your USB Device Has Corrupted Memory Please Plug It Into A Recognized Computer, And Launch Recovery.exe To Save Your Data!")
EndFunc   ;==>StartInstall

 

Hint:

do not use 

Dim ....

If you want to know why read HelpFile:

So How do i fix the problem is there any way you can give me the code with an explanation so i can understand what went wrong? "if possible can first code sample be separate they are two different au3 files normally that is why i forgot to paste second set of code... SORRY this is just way over my head right now... "i copied most of this code from the forums after doing a ton of research and am trying to basically hack it all together...

Edited January 12, 2016 by rm4453
spelling error

[mLipok]

Currently I not understand.
Formulate your query again.

[rm4453]

Currently I not understand.
Formulate your query again.

I don't understand how to fix the problem that it is having... "especially the illegal character problem where it points to the ? mark" How would i fix the problems that it is having and can you supply the sample code with your explanation so i can not only read it but see it... "i learn by seeing quicker than by reading..." Thank You

[mLipok]

Try this: Post_179891.zip

Edited January 13, 2016 by mLipok

[Bowmore]

I think the problem is that you are using a very old version of Au3Check and AutoIt that does not understand  the  

$bAllUsers ? @StartupCommonDir : @StartupDir

 syntax.

You need to upgade to the latest version or rewrite your code to use 

If $bAllUsers Then 
   Return @StartupCommonDir 
Else 
   Return @StartupDir 
EndIf

 

Edited January 13, 2016 by Bowmore

[mLipok]

@Bowmore good point.

@rm4453 try to update your SciTE4AutoIt3 version:

https://www.autoitscript.com/site/autoit-script-editor/downloads/

 

[rm4453]

@Bowmore good point.

@rm4453 try to update your SciTE4AutoIt3 version:

https://www.autoitscript.com/site/autoit-script-editor/downloads/

 

That looks like its working now Thank You So Much!

[mLipok]

I'm glad this solve your problem.
mLipok

btw.
Welcome to the forum.

 

[rm4453]

I'm glad this solve your problem.
mLipok

btw.
Welcome to the forum.

 

Same Here, and Thank You I hope to get to where I helpout out a good amount...

[rm4453]

My Next Question is how would i make so it copies a file from the usb to the users documents.... "and passes that filepath onto _StartupFolder_Install and _StartupRegistry_Install " That way it copies the files off that I need and makes so they will auto launch for me...