check char in array?

[TheAutomator]

what am I doing wrong here?

Func char_ok($input)
Local $arr = [ 'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z', _
'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z', _
0,1,2,3,4,5,6,7,8,9 ]
For $x = 1 To UBound($arr)
If $arr[$x - 1] = $input Then Return True
Next
Return False
EndFunc


MsgBox(0,0,char_ok('-'))

The '-' is not in the array so why is it true?

 

TheAutomator. 

Edited March 4, 2014 by TheAutomator

[FireFox]

Hi,

The problem is when you are comparing a number with your input so your input (which is a string) is converted to a number.

As your input can not be converted to a number, it equals 0. Hence it matches the 0 in your array.

To avoid this add quotes to have strings and not numbers.

Br, FireFox.

[TheAutomator]

FireFox,

hey, it works.

Thanks 

 

TheAutomator. 

[jchd]

What Firefox said.

Also you'd better use a regular expression for this validation:

Func char_ok($input)
    Return (StringRegExp($input, '(?i)^[[:alnum:]]$') = 1)
EndFunc

MsgBox(0, 0, char_ok('Zr'))

[TheAutomator]

jchd,

Also you'd better use a regular expression for this validation

 

 

I know, but i'm not so familiar with regular expressions and I don't find any good tutorials for it..

but thanks for the info  

TheAutomator. 

[JLogan3o13]

jchd,

 

I know, but i'm not so familiar with regular expressions and I don't find any good tutorials for it..

but thanks for the info  

TheAutomator. 

 

You would find one quickly if you cracked open the help file. Not only is there a Regular Expression Tutorial, there are links to other resources. All you have to do is look.

Edited March 4, 2014 by JLogan3o13

[TheAutomator]

JLogan3o13,

you're right, sometimes I read to fast and miss this things.

only read the part that explains StringRegExp ..

I will take a look at it   

TheAutomator. 

[jchd]

Good reading!