$v){
$$k=$v;
//$strHeader.="\t$k";
$strToSave.="\t$v";
}
//$strToSave="$strHeader\n$strToSave\n";
if (!$txtNombre)
$strErrores .="El campo NOMBRE es obligatorio ";
if (!$txtApellidos)
$strErrores.="El campo APELLIDOS es obligatorio ";
if (strlen($txtTelfCasa)>6 or strlen($txtTelfMovil)>6 or strlen($txtTelfTrabajo)>6)
$HayTelf=1;
if (!$HayTelf)
$strErrores.="Es obligatorio, al menos, un TELEFONO. No olvide el prefijo. ";
if (strlen($txtEmail)<7)
$strErrores.= "El campo E-MAIL es obligatorio. ";
if (!$txtPass or !$txtPassRe){
$strErrores.="Los campos PASSWORD son obligatorios. Han de tener, al menos, cuatro caracteres. ";
}else{
if ($txtPass != $txtPassRe)
$strErrores.="Los PASSWORD no coinciden. ";
}
if ($cmbTipoVia == "??" and !$txtViaNoExiste)
$strErrores.="Tiene que especificar el TIPO DE VIA si no existe en el deplegable. ";
if (!$txtDireccion)
$strErrores.="El campo DIRECCION es obligatorio. ";
if (!txtNum)
$strErrores.="El campo NUMERO DE CALLE es obligatorio. ";
if (!$txtCiudad)
$strErrores.= "El campo CIUDAD es obligatorio. ";
if (!$txtProvincia)
$strErrores.="El campo PROVINCIA es obligatorio. ";
if (strlen($txtCodigoPostal)!=5)
$strErrores.="El campo CODIGO POSTAL es obligatorio. Debe introducir los 5 dígitos. ";
if(!$txtPais)
$strErrores.="El campo PAIS es obligatorio. ";
if ($txtDia > 31 or $txtDia <= 0){
$strErrores.= "El DIA de su fecha de nacimiento no es correcto. ";
$ErrFecha=1;
}
if ($txtMes > 12 or $txtMes <= 0){
$strErrores.= "El MES de su fecha de nacimiento no es correcto. ";
$ErrFecha=1;
}
if ($txtAno < 1890 or $txtAno > 2002){
$strErrores.= "El AÑO de su fecha de nacimiento no es correcto. ";
$ErrFecha=1;
}
if (!checkdate($txtMes,$txtDia,$txtAno))
$strErrores.="Su FECHA DE NACIMIENTO no es correcta. ";
if ($txtNumHijos and $txtNumHijos <0)
$strErrores.="El NUMERO DE HIJOS no es correcto. ";
if (!txtMarca)
$strErrores.="La MARCA de coche es obligatoria. ";
if (!$txtModelo)
$strErrores.="El MODELO de coche es obligatorio. ";
if (!$txtColor)
$strErrores.="El COLOR de coche es obligatorio ";
if ($strErrores)
$strErrores= " Es obligatorio completar los campos ROJOS. Los demás
son optativos, pero recomendamos su cumplimentación.
