0) { echo ''; echo '
La dirección ' . $Url . ' ya existe en León-line
'; } else { $sQuery = "insert into leonline (Login,Titular,Url,Coment,Pclave,Categoria,F_A,F_B,F_M,Contacto,Correo,Pass,IP_Alta,IP_Baja,IP_Mod,N_Mostrada,N_Visitada,Top,Lista,Observa) "; $sQuery .= " values ('','".$Titular."','".$Url."','".$Coment."','".$Pclave."','".$Categoria."','".$F_A."','".$F_B."','".$F_M."','".$Contacto."','".$Correo."','".$Pass."','".$IP_Alta."','".$IP_Baja."','".$IP_Mod."','".$N_Mostrada."','".$N_Visitada."','".$Top."','".$Lista."','".$Observa."')"; $sQr = mysql_query($sQuery, $cDB) or die("El Alta falló(2): " . mysql_error()); Agradecimiento($Titular); $Login=mysql_insert_id(); EnviarMail($Url,$Login,$Pass,$Correo); } } //======================================================== Function Formulario() { //======================================================== ?>
Alta León-line. Rellene el formulario y pulse enviar.
 Titular Título de su Web Site  
 Url Url de su Web Site  
 Comentario Explicación del contenio de su Página.  
 Palabras Palabras que el usuario buscará para localizar su dirección.  
 Categoría Categoría de Servicios o Productos de su Página.
 Persona de contacto Persona de contacto en la dirección de correo indicada  
 Dirección de e-mail Dirección electrónica para contactar y poder realizar la baja cuando sea necesario.  
 ¿Desea inscribirse en la Lista de Correo?   Si   No
 COMENTARIOS
             
Gracias por unirse a León-line

" .$Titular; ?>
\n"; $Cabeceras .= "Reply-To: GabineteWeb "; $Para .= "consulte@gabineteweb.com"; $Para .= ", "; $Para .= ($Correo); $Asunto = 'Alta - León-line.'; $Mensaje = '

La dirección: ' . $Url . ', ha sido insertada en León-line.
Su Login de usuario León-line es: ' . $Login . '
y su password, la siguiente: ' . $Pass . '

Con ellas podrá realizar modificaciones en su Registro.

Si tiene alguna duda contacte con nosotros en Formulario León-line.

'; mail($Para,$Asunto,$Mensaje,$Cabeceras); } ?>