msgbox disable OK button until drive is accesible

[jbennett]

Hi,

The last question of the night and i've finished my code :-)

I have a msgbox that pops up if it cannot find the backup location. The backup location is stored within $backup_location and if it's not accesible then a msgbox will appear.

The only problem is that if the user clicks the OK button then the code continues. Is there any way to prevent the user from clicking OK until the drive is available.

I'm thinking of having an OK and a CANCEL button and the user can only click OK if the drive is available, otherwise they have to click CANCEL

and CANCEL will exit the program.

Here is my code

$checkNASdrive = DriveStatus( $backup_location )
if $checkNASdrive ="INVALID" then
MsgBox(16,"ERROR","Cannot find backup destination"& @LF & "Please connect the NAS drive and click the OK button")
EndIf

Thanks alot for everyone's help so far :-) 1 Last hurdle and i've made it.

Edited October 22, 2008 by jbennett

[TehWhale]

$checkNASdrive = DriveStatus( $backup_location )
Do
if $checkNASdrive ="INVALID" then MsgBox(16,"ERROR","Cannot find backup destination"& @LF & "Please connect the NAS drive and click the OK button")
Until $checkNASdrive = "READY"

Edited October 22, 2008 by TehWhale

[jbennett]

Thanks that's brilliant.

Only problem, is there any way of adding a CANCEL button so the user can close the msgbox?

thanks

[TehWhale]

$checkNASdrive = DriveStatus($backup_location)
Do
    If $checkNASdrive = "INVALID" Then
        $msgcode = MsgBox(16 + 49, "ERROR", "Cannot find backup destination" & @LF & "Please connect the NAS drive and click the OK button")
    EndIf
Until $checkNASdrive = "READY" Or $msgcode = 2

[MrCreatoR]

is there any way of adding a CANCEL button so the user can close the msgbox?

Look at the flags for Msgbox function in help file.

$checkNASdrive = DriveStatus($backup_location)

$iAsk = 0

While $checkNASdrive = "INVALID"
    If $iAsk = 0 Then
        $iAsk = MsgBox(1+16, "ERROR", _
            "Cannot find backup destination" & @LF & "Please connect the NAS drive and click the OK button")
    Else ;5 is Retry and Cancel
        $iAsk = MsgBox(5+16, "ERROR", _
            "Cannot find backup destination" & @LF & "Please connect the NAS drive and click the Retry button")
    EndIf
    
    If $iAsk = 2 Then Exit ;Return 2 is Cancel, 4 is Retry.
    
    $checkNASdrive = DriveStatus($backup_location)
WEnd

Edited October 22, 2008 by MrCreatoR

[jbennett]

One little problem TehWale.

The code will still continue if the user clicks cancel.

Is it possible to exit the program if they click cancel

thanks :-)

Edited October 22, 2008 by jbennett

[jbennett]

I like that code MrCreatoR.

Very good :-)

[aNewLyfe]

you can also use a form for it

just make it like a msgbox, check for connection then enable ok button