elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado:


+  Foro de elhacker.net
|-+  Programación
| |-+  Desarrollo Web
| | |-+  PHP (Moderador: #!drvy)
| | | |-+  envio correos desde pagina web
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: envio correos desde pagina web  (Leído 2,390 veces)
arggos

Desconectado Desconectado

Mensajes: 17


Ver Perfil
envio correos desde pagina web
« en: 28 Abril 2008, 01:14 am »

Hola a todos basiucamente queria saber si alguien me puede dar un codigo fuente para integrar en mi pagina web para poder crear comentarios en un espacio para escribir texto y luego poniendo un correo enviarse 1 saludo a todos y gracias


En línea

DarK_FirefoX


Desconectado Desconectado

Mensajes: 1.263


Be the change you wanna see in te world


Ver Perfil
Re: envio correos desde pagina web
« Respuesta #1 en: 28 Abril 2008, 08:09 am »

Aqui te dejo....El código para enviar el mensaje, aunque tienes que crear el formulario y enviar los datos mediante el metodo POST al siguiente Script (puedes hasta adjuntar archivos, lo quitas si quieres)

Código
  1. <html>
  2.   <head>
  3.      <title>ENVIO DE CORREO</title>
  4.      <meta http-equiv="espires" content=0>
  5.      <link rel="stylesheet" href="css/barras.css" type="text/css">
  6.   </head>
  7.  
  8.   <body class="barras" bgcolor="#000000" text="#FFFF00">
  9.  
  10.      <center>
  11.         <font face="Tahoma,Verdana,Arial">
  12.            <h1>Env&iacute;o de mensaje realizado.</h1>
  13.         </font>
  14.      </center>
  15.  
  16.      <?
  17.  
  18. /* Este script está diseñado para gestionar el envío de correo electrónico
  19. con archivos adjuntos incluidos. Los nombres de las siguientes variables
  20. proceden del formulario HTML que llama al script, por lo que, si lo usas, deberás cambiar estas variables por las que tenga tu formulario.
  21.  
  22. $morigen
  23. $mnombre
  24. $medad
  25. $mcorreo
  26. $mconocido
  27. $mespecificar
  28. $mcomentarios
  29. $adjunto
  30.  
  31. La ultima es el fichero adjunto
  32. */
  33.  
  34.  
  35. /*Determinamos si hay un fichero adjunto mediante la clave "size"
  36. de la matriz asociativa HTTP_POST_FILES. Si lo hay, lo leemos y lo
  37. preparamos para luego adjuntarlo al correo.*/
  38.  
  39.         if ($HTTP_POST_FILES['adjunto']['size']!=0)
  40.         {
  41.            $fichero = fopen($adjunto, 'r');
  42.            $contenido = fread($fichero, filesize($adjunto));
  43.            $encoded_attach = chunk_split(base64_encode($contenido));
  44.            fclose($fichero);
  45.         }
  46.  
  47. //Se recogen los datos del formulario para montar el cuerpo del mensaje.
  48.         $mensaje ="ESCRITO DESDE: $morigen\n";
  49.         $mensaje .="NOMBRE: $mnombre\n";
  50.         $mensaje .="EDAD: $medad\n";
  51.         $mensaje .="CONOCIDO: $mconocido\n";
  52.         $mensaje .="ESPECIFICAR: $mespecificar\n";
  53.         $mensaje .="COMENTARIOS: $mcomentarios";
  54.  
  55. // Se monta la cabecera del mensaje.
  56.         $cabeceras = "From:<$mcorreo>\n";
  57. //   $cabeceras .= "Reply-To:$mcorreo \n";
  58.         $cabeceras .= "MIME-version: 1.0\n";
  59.  
  60.         if ($HTTP_POST_FILES['adjunto']['size']!=0)
  61.         {
  62.            $cabeceras .= "Content-type: multipart/form-data; ";
  63.            $cabeceras .= "boundary=\"Message-Boundary\"\n";
  64.            $cabeceras .= "Content-transfer-encoding: 7BIT\n";
  65.  
  66. /*Si hay fichero adjunto, lo adjuntamos ahora.*/
  67.            $cabeceras .= "X-attachments:".$fichero;
  68.  
  69. //Se configuran las propiedades del cuerpo del mensaje
  70.            $body_top = "--Message-Boundary\n";
  71.            $body_top .= "Content-type: text/plain;charset=US-ASCII\n";
  72.            $body_top .= "Content-transfer-encoding: 7BIT\n";
  73.            $body_top .= "Content-description: Mail messagebody\n\n";
  74.         }  
  75.         $cuerpo = $body_top.$mensaje;
  76.         if ($HTTP_POST_FILES['adjunto']['size']!=0)
  77.         {
  78.            $nombref=$HTTP_POST_FILES['adjunto']['name'];
  79.            $cuerpo .= "\n\n--Message-Boundary\n";
  80.            $cuerpo .= "Content-type: Binary;name=\"$nombref\"\n";
  81.            $cuerpo .= "Content-Transfer-Encoding: BASE64\n";
  82.            $cuerpo .= "Content-disposition: attachment;filename=\"$nombref\"\n\n";
  83.            $cuerpo .= "$encoded_attach\n";
  84.            $cuerpo .= "--Message-Boundary--\n";
  85.         } else {
  86.            $nombref="";
  87.         }
  88.  
  89. /*Se establece el destino del mensaje. Aqui pondrás
  90. tu propia dirección de correo electrónico*/
  91.         $destino = "admin@mail.com"; //CORREO DE DESTINO
  92.  
  93.         echo ("<center><font face='Tahoma,Verdana,Arial'><h1>");
  94.  
  95.         if (mail($destino,$morigen,$cuerpo,$cabeceras))
  96.         {
  97.            echo ("REALIZADO CON &Eacute;XITO.");
  98.         } else {
  99.            echo ("SE HA PRODUCIDO UN ERROR");
  100.         }
  101.  
  102.         echo ("</center></font></h1>");
  103.  
  104.      ?>
  105.      <center>
  106.         <input class="botones" type="button" value="CERRAR ESTA PÁGINA" onClick="self.close();">
  107.      </center>
  108.   </body>
  109. </html>
  110.  
  111.  



En línea

ActiveSheet


Desconectado Desconectado

Mensajes: 389


Feeling Jazz


Ver Perfil WWW
Re: envio correos desde pagina web
« Respuesta #2 en: 30 Abril 2008, 08:26 am »

Que transa y el estilo de cascada? pongalo bien.

jaja na, la verdad es que esta muy bien ese codigo solo le faltaria actualizarlo a la 5.
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Nueva campaña de envío de correos, hora a los senadores, para detener la 'Ley...
Noticias
wolfbcn 0 1,451 Último mensaje 7 Febrero 2011, 18:31 pm
por wolfbcn
No puedo leer correos desde la página de Hotmail o.O
Dudas Generales
Eleкtro 3 3,270 Último mensaje 20 Marzo 2013, 01:08 am
por HdM
envio de correos (masivos) desde sistema php
PHP
Anteros 3 5,121 Último mensaje 9 Septiembre 2013, 20:04 pm
por Diabliyo
Gmail: cómo desactivar el envío de correos desde Google+
Noticias
wolfbcn 0 1,489 Último mensaje 12 Enero 2014, 14:07 pm
por wolfbcn
Error en el envio de correos
Redes
huerto123 0 2,196 Último mensaje 16 Agosto 2014, 16:27 pm
por huerto123
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines