Jump to content

Recommended Posts

Posted (edited)

How do I check the E drive?

For example, if there is drive MsgBox (0, "title", "E drive is installed") else (0, "title", "E drive is not installed")

Edited by TURK34

[font="'Times New Roman"]Everything will be fine[/font]

  • Moderators
Posted

TURK34,

Look at DriveGetDrive in the Help file. :mellow:

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

Posted

  On 8/20/2011 at 5:16 PM, 'Melba23 said:

TURK34,

Look at DriveGetDrive in the Help file. :)

M23

I could not give an error :mellow:

[font="'Times New Roman"]Everything will be fine[/font]

  • Moderators
Posted

TURK34,

This works for me:

$aDrives = DriveGetDrive("All")

For $i = 1 To $aDrives[0]
    If $aDrives[$i] = "e:" Then ; Make sure you use lowercase letter ;)
        MsgBox(0, "title", "E drive is installed")
        Exit
    EndIf
Next
MsgBox(0, "title", "E drive is not installed")

Or you could use _ArraySearch. :mellow:

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

Posted

  On 8/20/2011 at 5:36 PM, 'Melba23 said:

TURK34,

This works for me:

$aDrives = DriveGetDrive("All")

For $i = 1 To $aDrives[0]
    If $aDrives[$i] = "e:" Then ; Make sure you use lowercase letter ;)
        MsgBox(0, "title", "E drive is installed")
        Exit
    EndIf
Next
MsgBox(0, "title", "E drive is not installed")

Or you could use _ArraySearch. :)

M23

thank you very much :mellow:

[font="'Times New Roman"]Everything will be fine[/font]

  • Moderators
Posted

smartee,

That will not work with an empty CDROM/Removable drive. :mellow:

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

  • Moderators
Posted

smartee,

  Quote

Oh good point, but wouldn't this?

That seems to work. :mellow:

And I do not have a floppy drive so I did not realise that DriveGetDrive made them so sad. :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

  Reveal hidden contents

 

Posted (edited)

I think it's best :mellow:

Local $Drive = "E:"
If DriveStatus($Drive) = "READY" Then
     MsgBox(64, "Info", "E: drive is installed.")
Else
    MsgBox(16, "Error!", "E drive is not installed".")

Edited by TURK34

[font="'Times New Roman"]Everything will be fine[/font]

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...