Ver Mensaje Individual
  #1 (permalink)  
Antiguo 15/06/2004, 15:52
dacotta
 
Fecha de Ingreso: noviembre-2003
Mensajes: 67
Antigüedad: 21 años, 5 meses
Puntos: 0
comprobar datos mail

Saludos, tengo este codigo donde con la funcion comprobar quiero comprobar que me ingresen correctamente algunos datos pero no me realiza la funcion:

<!--#include file="comu.asp"-->
<%
function comprobar1(){
var nom=(f1.nom.value)
if (nom.length<=2){
alert ("Introdueix correctament el codig postal")
f1.name.focus()}
}
%>
<html>
<!-- Generated by AceHTML Freeware http://freeware.acehtml.com -->
<!-- Creation date: 3/4/04 -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title></title>
<meta name="Description" content="">
<meta name="Keywords" content="">
<meta name="Author" content="Lògica Gironina">
<meta name="Generator" content="AceHTML 4 Freeware">
<link rel="stylesheet" type="text/css" href="base.css" />


</head>
<body text=white <%=fons%> <%=marge%>>
<!--#include file="inic.asp"-->

<%if (Request.Form("enviar")!="enviar"){%>
<table border=0 width=100% bgcolor=white>
<tr height=50 >
<td >&nbsp;</td>
</tr>
</table >
<table border=0 width=340 bgcolor=#999999 cellspacing=0 cellpadding= >
<form name="f1" action="registre.asp" method=post >
<tr>
<td><img src=imatges/registre1.jpg></td>
<td><img src=imatges/registre2.jpg></td>
<td width=200>
<table border=0>
<tr>

<td><font face="Arial">Nom:</font></td>
<td><input type=text name=nom size=14></td>
</tr>
<tr>
<td colspan=2 height=20>&nbsp;</td>
</tr>
<tr>
<td><font face="Arial">E-mail:</font></td>
<td><input type=text name=mail size=14 onFocus=comprobar1()></td>
</tr>
<tr>
<td colspan=2 height=20>&nbsp;</td>
</tr>
<tr>
<td>&nbsp;</td>
<td align=right><input type=submit name=enviar value=enviar></td>
</tr>
</table>
</td>
</tr>

</form>
</table>
<table border=0>
<tr height=50>
<td>&nbsp;</td>
</tr>


</table>

en el include comu tengo lo siguiente:

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<%@language="JScript"%>
<!--#include file="adojavas.inc"-->
<%
var titol="Portafoli digital de Raul Rabassa"
var fons="background=imatges/fons.jpg"
var marge=" topmargin=50 leftmargin=70"
var con=new ActiveXObject("adodb.connection")
con.Open("raul")
%>



Gracias
__________________
Soy lo suficientemente feo y bajito
como para triumfar por mi mismo.
( Woody Allen )