Validacion de Input type text

[Dianinha]

Holas!!!

Estoy tratando de validar los valores que se introducen en un Text, pero me da error no funciona de ninguna manera. Me podrian ayudar a ver que tengo de mal.

Esta es la funcion que tengo:

<script language="vbscript">
function valida(texto)
texto.value=replace(cstr(texto.value),",",".")
if texto.value <> "" then
if not isNumeric(texto.value) then
Msgbox "El Valor introducido no es valido",48
texto.value = ""
end if
end if
end function
</script>

Hago un select de los registros que tienen un valor llamado TARGET en, y me muestre ese valor en un input type text:
<input readonly="" name="targetbox1" type="text" value="<%=response.Write(target)%>" size="7">

Si no tiene valor pongo un text en blanco para que introduzcan el valor:
<input name="targetbox1" type="hidden" onBlur="VBScript: valida(document.dd.targetbox1)" value="" size="7" maxlength="13">

Que pasa esto esta dentro de un ciclo, o sea que podrá haber varios text en blanco porque habrá varios registros sin el Target, entonces deberan ser insertados a mano.

Me da este error:
Object does'nt support this property or method:"texto.value"

en si, lo que quiero validar es que alli en esos text solo se pueda introducir numeros y puntos. no permitir ni letras ni otros caracteres.