Foros del Web » Programando para Internet » PHP »

problemas con codigo en php

Estas en el tema de problemas con codigo en php en el foro de PHP en Foros del Web. Hola amigos tengo un codigo php que anda fallando y lla lo revise y no le encuentro nada malo es el siguiente codigo es para ...
  #1 (permalink)  
Antiguo 04/03/2005, 18:32
Avatar de trivliani  
Fecha de Ingreso: enero-2004
Ubicación: Nicolas Romero. Edo. de México.
Mensajes: 336
Antigüedad: 13 años, 11 meses
Puntos: 0
Información problemas con codigo en php

Hola amigos tengo un codigo php que anda fallando y lla lo revise y no le encuentro nada malo es el siguiente codigo es para formulario..
Código:
<?php 

* ## VARIABLES
* ## Dirección de tu correo
$micorreo="[email protected]"; 
* ## Asunto axiliar si no lo introduce un asunto que identifique la procedencia del correo.
$xasunto="Correo desde tu pagina";
*## Pagina final de gracias. Si el formulario no incluye este campo oculto del formulario. 
$gracias_defecto="http://www.mipagina.com"; 
* ## Página final si se produce un error al enviar el correo
$error_correo="http://www.mipagina.com/anuncios/error_correo.html"; 
* ## variable auxiliar, que produce un salto de línea
$retorno="\r\n";

* ## CABECERAS DE CORREO
* ## Diversas cabeceras para el correo. Luego, lo usaremos para enviar el correo.
* ## $nombre $correo son variables que contienen los valores de: nombre y correo del formulario.
$headers = "MIME-Version: 1.0\r\n" ;
* ## campos y variables nombre, $nombre y correo $correo. No pueden ser modificados
* ## Han de mantenerse en el formulario para utilizar el mismo script con distintos formularios 
$headers .= "From: $nombre<$correo>\r\n";
* ## Responder al correo
$headers .= "Reply-To: $correo<$correo>\r\n";
* ## Otras cabeceras que pueden ponerse si ocurren problemas u omitirse si todo va bien.
* ## Obligatoriamente, cada elemento de la cabecera termina en \r\n Nueva línea.
* ## $headers .= "X-Mailer: PHP/" . phpversion();
* ## $headers .= "X-Sender: $correo<$correo>\r\n";
* ## $headers .= "Return-Path: <$correo>\r\n";
* ## $headers .= "Cc: $nombre<$correo>\r\n"; 

* ## CUERPO DEL MENSAJE INICIO
* ## Obtención de la IP del visitante
* ## Empezamos a contruir el mensaje final, sumando los elementos del mensaje
$mfinal.="IP visitante: ";
* ## Guardamos la IP del visitante
$mfinal.=$HTTP_SERVER_VARS['REMOTE_ADDR'];
$mfinal.=": ";
* ## Y el puerto del usuario
$mfinal.=$HTTP_SERVER_VARS['REMOTE_PORT'];
* ## añadimos dos retornos de línea
$mfinal.=$retorno;
$mfinal.=$retorno; 

* ## CUERPO DEL MENSAJE AÑADIDO DE CAMPOS AL MENSAJE
* ## $vareliminar Número de botones del formulario y campos ocultos (últimos elementos) + 1 --> en este caso (1+1)
* ## Si queremos eliminar del mensaje el campo oculto de la página final $vareliminar=3;
$vareliminar=2;
* ## Almacenar en un array los nombres de variables del formulario enviado
$claves_array=array_keys ($HTTP_GET_VARS);
* ## de i=0 hasta el número de campos del formulario, - variables a eliminar
for ($i=0;$i<=(count($HTTP_GET_VARS)-$vareliminar);$i++){
* ## Obtenemos el nombre de cada campo en concreto
$nombrevar=$claves_array[$i];
* ## Sumamos el nombre de campo de formulario al mensaje final
$mfinal .= $nombrevar;
$mfinal .= ": ";
* ## Y añadimos el contenido que haya introducido nuestro visitante
$mfinal .= $HTTP_GET_VARS[$nombrevar]; 
* ## Separamos cada campo por dos retornos, podemos eliminar uno
$mfinal .= $retorno;
$mfinal .= $retorno;
}
* ## Si no hay asunto, o no contiene nada, le damos al email un asunto defecto
if (is_null($asunto)){ $asunto2="correo desde la web";}
* ## Si hay asunto, añadimos un prefijo propio para identificar que es correo desde la web.
else { $asunto2 ="Asunto-> $asunto"; }

* ## ENVÍO DEL CORREO
* ## Para finalizar, envíamos el correo, y comprobamos el resultado
$resultado=mail($micorreo, $asunto2, $mfinal, $headers);
* ## Si quisiésemos enviar un mensaje de acuso de recibo, añadimos esta línea, sabiendo que:
* ## tenemos que asignar estas variables $asuntoreply (Asunto), $mreply (mensaje), $headers2(mensaje)
**## de modo similar a como hemos construido las variables anteriores
* ## $resultado2=mail($correo, $asuntoreply, $mreply, $headers2);

* ## COMPROBACIÓN
* ## Si no se ha podido enviar el correo.
if ($resultado ==true) 
{
* ## Si no hay página de gracias carga las página de defecto
if (is_null($pagina_gracias)){ header( "Location: $gracias_defecto" );}
else{ 
* ## Si hay página de gracias, cárgala
header( "Location: $pagina_gracias" );
}
}
* ## Si se ha producido un error, advierte al usuario
else header( "Location: $error_correo" );
?>
Lo que pasa es que me manda error al mandar los datos del formulario desde el html alguna idea de en que este fallando
gracias por sus comentarios.
__________________
un favor con otro y eso es todo..
  #2 (permalink)  
Antiguo 04/03/2005, 18:50
 
Fecha de Ingreso: febrero-2005
Mensajes: 670
Antigüedad: 12 años, 10 meses
Puntos: 0
Decinos el error ;)

Suerte
Fede
__________________
Federico H. García
Desarrollo Web
www.federicog.com.ar
  #3 (permalink)  
Antiguo 04/03/2005, 18:53
Avatar de braulito  
Fecha de Ingreso: abril-2004
Ubicación: Cusco - Perú
Mensajes: 597
Antigüedad: 13 años, 7 meses
Puntos: 8
No revisé bien tu código pero el error no serán esos asteriscos que pones antes de cada comentario???????????????????????????????????????
__________________
Braulio Soncco
braulio at buayacorp dot com
Buayacorp - Programación y Diseño
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:41.