Set regEx = New RegExp \' Create a regular expression. regEx.Pattern = \"[0-9]+\" regEx.IgnoreCase = True \' Set case insensitivity. regEx.Global = True \' Set global applicability. Set Matches = regEx.test(variabel) \' Execute search. If not Matches Then Response.write(\"Kun tal\") End if
<% mads = \"sdfsdfsdf\" Set regEx = New RegExp regEx.Pattern = \"[0-9]+\" regEx.IgnoreCase = True regEx.Global = True Set Matches = regEx.test(mads) If not Matches Then Response.write(\"Kun tal\") End if %>
<--- det virker ikke den siger
Error Type: Microsoft VBScript runtime (0x800A01A8) Object required: \'regEx.test(...)\' /asp/test2.asp, line 7
Fjern Set, så der kun står matches = regEx.test(mads)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.