Auto-determine USB drive letter

[LowKey]

I currently have a script that runs with autorun, that causes the drive's background picture and text colour to change using the Desktop.ini file, then opens the drive with run("explorer.exe e:"). I was wondering, first off, if and how can I automatically determine the drive letter? Secondly, is there a better/more efficient way to open the drive?

[Danny35d]

$USB_Drive = StringLeft(@ScriptDir, 2)
Run(@ComSpec & ' /c Explorer ' & $USB_Drive, @ScriptDir, @SW_HIDE)

[Xenobiologist]

Hi,

???

MsgBox(64, 'ScriptDrive', _getScriptDrive())
MsgBox(64, 'ScriptDrive mit "\"', _getScriptDrive(1))
MsgBox(64, 'ScriptDriveType ', _getScriptDriveType())

Func _getScriptDrive($iflag = 0)
    Local $drive = StringRegExp(@ScriptDir, '[a-zA-Z]\:', 1)
    If @error <> 0 Then Return -1
    If $iflag = 0 Then Return $drive[0]
    Return $drive[0] & '\'
EndFunc   ;==>_getScriptDrive

Func _getScriptDriveType()
    Local $drive = StringRegExp(@ScriptDir, '[a-zA-Z]\:', 1)
    If @error <> 0 Then Return -1
    Switch DriveGetType($drive[0])
        Case "Unknown"
            Return 1
        Case "Removable"
            Return 2
        Case "Fixed"
            Return 3
        Case "Network"
            Return 4
        Case "CDROM"
            Return 5
        Case "RAMDisk"
            Return 6
    EndSwitch
    Return -1
EndFunc   ;==>_getScriptDriveType

So long,

Mega

[slayerz]

@Low Key, from what I can understand is, you want your script to automatically determine the drive to open your USB drive rite?

I have a simple solution for this...

Well, I do write batch script like this :

START /max explorer.exe %removable%\

save it as anyname.bat, put it in your USB drive, it should automatically open your USB drive when executed

BTW, that's only my basic idea.You could write it in autoit using _rundos()

Edited January 14, 2008 by slayerz