RegExp, impossibile trovare la classe...

[V1RuZ]

Ho un piccolo problema..., la ricerca è disabilitata quindi non posso sapere se qualcun'altro ha avuto lo stesso problema. In questo caso mi scuso...
Ho trovato una funzioncina che serve per validare un indirizzo email con le espressioni regolari, poichè ho sempre utilizzato asp con javascript ora ho la necessità di usarlo con vbscript, xò la pagina mi dà il seguente errore:

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A01B0)
Impossibile trovare nome di file o nome di classe durante un'operazione di automazione: 'RegExp'

con il seguente codice (che ho copiato...)

Function RegExpTest(patrn, strng)
  Dim regEx 
  Set regEx = New RegExp
  regEx.Pattern = patrn  
  regEx.IgnoreCase = True 
  RegExpTest = regEx.Test(strng) 
End Function

alla riga: Set regEx = New RegExp, qualcuno sa dirmi xchè?
grazie

[Roby_72]

<%
'Verifica della correttezza di una email
function check_email(strng)
	'Creazione della Regular Expression 
	Set regEx = New RegExp

	'Definizione del pattern di validazione
	regEx.Pattern = "^[\w-\.]{1,}\@([\da-zA-Z-]{1,}\.){1,}[\da-zA-Z-]{2,4}$"

	'Ignoro maiuscole e minuscole nell'indirizzo email
	regEx.IgnoreCase = True
	
	'TRUE se l'email è valida
	check_email = regEx.Test(strng)
end function
%>

Roby

[V1RuZ]

gracias mucho

[V1RuZ]

anzi no...continua a darmi lo stesso errore...

[Roby_72]

Il tuo sistema operativo?

Roby

[V1RuZ]

win xp pro

[V1RuZ]

uppino