Regular expresions der ikke helt virker ?

Mit forsøg er forresten kun at tillade tal 0-9 små og store bogstaver a-z, A-Z og der skal være minimum 4 max 12 ;o)

/Websam

og så lige tegnet _ dethavde jeg glemt ;o)

Du mangler bare noget anchor til linie start ^og linie slut $ så din regex skal se sådan her ud:

^[\d_a-zA-Z]{4,12}$

On another note: Du kunne med fordel skrive lidt om på den kode så du fjerner IMHO mærkeligt login omkirng if of return:

Dim strRegex As String = "^[\d_a-zA-Z]{4,12}$"
Dim Re As New Regex(strRegex)

Return (Re.IsMatch(objInfo.Text))

Return (Re.IsMatch(objInfo.Text)) vil så retunere True el. False ?

Den returnerer True hvis der er et match og False hvis der ikke er et match.

Hvis du prøver at afkode din if-sætning fungerer det sådan her.

Hvis IsMatch er ikke True, altså False, så skal der returneres False ellers skal der returneres True.

Derfor kan du bare returnerer den bool som IsMatch returnerer uden at gøre noget ved den.

Men uanset hvad så retunere den stadigvæk kun True selvom jeg laver en streng der ikke ville kunne valideres til True, "test-om'det_virker"

Har du ændret regex med anchors som jeg skrev i svaret ??

"test-om'det_virker" skulle jo så retunere False og det gør den ikke ?

Den ser nu sådan her ud :

Dim strRegex As String = "^[\d_a-zA-Z]{4,12}$"
Dim Re As New Regex(strRegex)
Return (Re.IsMatch(objInfo.Text))

Prøv lige denne her

Return Regex.IsMatch(objInfo.Text, "^[\d_a-zA-Z]{4,12}$");


Nu er jeg ikke så skarp på VB.NET strings men er \ en escape i VB strings? I C# ville ovenstående string skulle skrives "^[\\d_a-zA-Z]{4,12}$" eller @"^[\d_a-zA-Z]{4,12}$"

Den første fungerer hos mig. Bortset fra at jeg ikke kan bruge Return af værdi i en Sub.

Det prøver jeg lige, men jeg kan fortælle at denne til at validere en email med virker fint :

Dim strRegex As String = "^([a-zA-Z0-9_\-\.]+)@((\[[0-9]{1,3} \.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)"

jamen så kan vi vel udelukke at det er stringen der skal se anderleves ud. Men ellers prøv denne her den har under alle omstændigheder ikke det problem.

^[0-9_a-zA-Z]{4,12}$

ja hov det havde lige ikke svaret på \ er ikke escape i VB, men jeg tror det var en () der skulle til :

"^([\d_a-zA-Z]{4,12})$"

Det ser i hvertfald ud til at virke ;o)

Jeg får i hvertfald følgende udskrevet :

test_virker'ikke = False
test_virker = True

super

Så må jeg jo bare huske at der skal () omkring og kigger jeg på den til email er der jo oxo det på den så det er vel bare sådan en morgenting *GGG*