Help setting a string in a Function.

[Supa Ben]

I'm making myself a program that will send ringtones to my phone. Here's an example of how I am trying to test if the number is a valid number.

$number = ""
Dim $NumError

$test = NumCheck($number)

If $test < 1 Then
    Msgbox(0,"",$NumError)
Else
    MsgBox(0,"","Success")
EndIf


Func NumCheck($phonenumber)
    If $phonenumber = "" Then
        Return 0 & $NumError = "Error no number."
    Elseif $phonenumber < 10 Then 
        Return -1 & $NumError = "Error put in Area Code also."
    Else 
        Return 1
        Endif
EndFunc

A messagebox appears signaling an error has happened but the $Numerror does not get set. I need help please.

[The Kandie Man]

You cannot do what you are doing in the return lines of the function. Instead, use a global error message string variable for all your functions. Then when a function of yours returns, have it set the value of the global $sErrorMsg. This would be analogous to the @error macro that autoit uses, but it would be a custom string version of the message.

$number = ""
Global $sErrorMsg

$test = NumCheck($number)

If $test < 1 Then
    Msgbox(0,"",$sErrorMsg)
Else
    MsgBox(0,"","Success")
EndIf


Func NumCheck($phonenumber)
    If $phonenumber = "" Then
        $sErrorMsg = "Error no number."
        Return 0
    Elseif $phonenumber < 10 Then
        $sErrorMsg = "Error put in Area Code also."
        Return -1
    Else
        $sErrorMsg = ""
        Return 1
    Endif
EndFunc

I believe that is what you want.

- The Kandie Man ;-)

[Supa Ben]

The Kandie Man's Amazing fix

Thank you so much for that it works perfectly.