' VBScript File

<script language="VBScript" type="text/VBScript"> 
Sub valida()
	if document.theForm.nombre.value="" then
		msgbox "Favor de capturar el nombre."
		document.theForm.nombre.focus
		exit sub
	end if
	if document.theForm.paterno.value="" then
		msgbox "Favor de caputurar el apellido paterno."
		document.theForm.paterno.focus
		exit sub
	end if
	if document.theForm.materno.value="" then
		msgbox "Favor de capturar el apellido materno."
		document.theForm.materno.focus
		exit sub
	end if

	if not isnumeric(document.theForm.telefono.value) then
		 msgbox "Favor de capturar un número de teléfono valido (Númerico de 10 Digitos)."
		document.theForm.telefono.focus
		
		exit sub
	end if
		if len(document.theForm.telefono.value)< 10 then
		   msgbox "Favor de introducir un número de teléfono valido (Númerico de 10 Digitos)."
		document.theForm.telefono.focus
			exit sub
		end if
		
		if document.theForm.email.value="" then
			msgbox "Favor de capturar un correo electrónico."
			document.theForm.email.focus
			exit sub
		end if
	document.theForm.submit
	
End Sub
</script>