DriveGetDrive doesn't work

[PcExpert]

Hi all,

I want to get the driveletter from the drive where the script is running from (an external Harddisk). So I tried the following:

$1 = DriveGetDrive("REMOVABLE")
MsgBox(64, "Drive", $1)oÝ÷ Ø­¶­v'gßÛp¢¹ºÜ"¶aÆ®¶­sbb33c³ÒG&fTvWDG&fRgV÷C¶ÆÂgV÷C²¤×6t&÷cBÂgV÷C´G&fRgV÷C²Âb33c³

I'm getting the same error. Whats wrong?

[November]

Hi,

Maybe the OS does not recognize like a removable disk, but as a hard disk.

Double check!

Cheers

[Helge]

DriveGetDrive returns an array so your messageboxes are of no use like that. See the example in the helpfile...

[PsaltyDS]

Since there is no @ScriptDrive macro, I use this function in many different scripts where I want the script to go to the @ScriptDir drive for something not actually in @ScriptDir:

$ScriptRoot = _ScriptRoot()
MsgBox(64, "Script Root", "Script root is: " $ScriptRoot)

;--------------------------------------
; Function _ScriptRoot()
;   Return the root of @Script dir, either drive or CIFS share path
;   Call with _ScriptRoot()
;   On success returns the root of @ScriptDir without trailing backslash
;       (i.e. "D:", or "\\ServerName\Share"
;   On failure returns 0 and sets @error
;--------------------------------------
Func _ScriptRoot()
    ; Find the script root
    Local $sScriptRoot
    Select
        Case StringMid(@ScriptDir, 2, 1) = ':'
            $sScriptRoot = StringLeft(@ScriptDir, 2)
        Case StringLeft(@ScriptDir, 2) = '\\'
            $sScriptRoot = StringReplace(@ScriptDir, '\\', '')
            Local $avScriptRoot = StringSplit($sScriptRoot, '\')
            $sScriptRoot = '\\' & $avScriptRoot[1] & '\' & $avScriptRoot[2]
        Case Else
            ; Case not handled: @ScriptDir does not start with "\\" or a drive letter.
            Return SetError(1, 0, 0)
    EndSelect
    
    ; Test the derived script root
    If FileExists($sScriptRoot & "\") Then
        Return $sScriptRoot
    Else
        ; Derived script root does not exist
        Return SetError(2, 0, 0)
    EndIf
EndFunc   ;==>_ScriptRoot

[PcExpert]

Thanks!