Voy a intentarlo:
function validar_clave() {
clave1 = trim(document.getElementById("claveuno").value)
clave2 = trim(document.getElementById("clavedos").value)
temp = false
if len(clave1) > 3 and len(clave1) < 21 then
er = New RegExp
er.Pattern = "^[a-z0-9]+$"
er.IgnoreCase = True
temp = er.Test(clave1)
if temp = true and clave1 <> clave2 then
temp = false
alert("Las claves ingresadas no son iguales!")
else temp = false then
alert("Las claves ingresadas no son correctas o tienen espacios en blanco!")
else temp = true then
document.getElementById("md5clave").value = MD5(clave1)
document.getElementById("claveuno").value = ""
document.getElementById("clavedos").value = ""
end if
er = nothing
else
alert("Las claves ingresadas no son correctas o estan en blanco!")
end if
validar_clave = temp
}
function validar(){
valido = false
if validar_mail then
if validar_clave then valido = true
else
alert("El email ingresado no es valido o esta en blanco!")
end if
validar = valido
}
function validar_mail(){
bValido = True
Mail = trim(document.getElementById("correo").value)
If Len(Mail) < 5 Then
bValido = False
Else
If InStr(1, Mail, "@") = 0 Then
bValido = False
Else
If InStr(1, Mail, ".") = 0 Then
bValido = False
Else
If InStr(InStr(1, Mail, "@"), Mail, ".") < InStr(1, Mail, "@") Then
bValido = False
End If
End If
End If
End If
validar_mail = bValido
}
Yo no sé mucho, y seguramente no esté bien, pero así a lo mejor tentamos a alguien que sepa más a corregirme