El código es el siguiente:
/**************************************************************************************
*Validato1.0
*Los derechos de autor de este código pertenecen a Ocean Studio Ocean. Puede usar, copiar y modificar este código con fines no comerciales, pero necesita
*Retener información de derechos de autor de este estudio. Si usa o modifica este código con fines comerciales, comuníquese con este estudio para su permiso de uso.
*
*Si tiene alguna sugerencia para este programa, envíe un correo electrónico: [email protected].
*
*Estudio del océano
*http: //www.oceanstudio.net
*Ocean ([email protected])
**************************************************************************************************
// evento de teclado
<Public: adjectEvent = "OnKeyPress" OneVent = "doevent ()"/>
// Pegar evento
<Public: adjectEvent = "onpaste" onevent = "doevent ()"/>
// Evento de foco perdido
<Public: adjectEvent = "onblur" onevent = "doevent ()"/>
<ScriptLanguage = "jscript">
// Modo de verificación predefinido
varregArray = newArray (
NewArray ("int+0", "^// d+$", "", "necesita ingresar a un entero no negativo, por favor vuelva a verificar"), // Integer no negativo (Integer positivo +0)
NewArray ("int+", "^[0-9]*[1-9] [0-9]*$", "^// d+$", "Debe ingresar un entero positivo, por favor vuelva a verificar"), // Integer positivo
newArray ("int-0", "^((-// d+) | (0+)) $", "^(-| ((-// d+) | (0+)) $", "Necesita ingresar a un entero no positivo, por favor vuelva a verificar"), // Integer no positivo (Integero negativo +0)