Conexión con la BD --------------- J. Eusebio Bolon [SEBI] - 29/12/2006 ---+ // | REALIZADO EN | HOBERON DESARROLLO E INNOVACION | // | PAGINA | FormContact.php | // | DESCRIPCION | Archivo que contiene la gestión integral del envio de email de contacto. | // +----------------------------------------------------------------------------------------------+ if ( (md5('HfJ-(·)|(·)'.$_POST['TimeStamp']) == $_POST['IdSecure']) && (strpos($_POST['Coments'], "http")=== false ) ) { $Destinatario1 = 'soporte@medweb.es'; $Destinatario2 = $_POST['Email']; $AsuntoEmail = 'Formulario de contacto www.gestionhistoriasclinicas.com'; $Contenido = 'Nombre
'.$_POST['Name'].'

' . 'Email
'.$_POST['Email'].'

' . 'Asunto
'.$_POST['Asunto'].'

' . 'Comentarios
'.$_POST['Coments'].'

'; if ( FenvioEmail($AsuntoEmail, $Destinatario1, $Contenido) == true ){ $html = '

Su información ha sido enviada correctamente, en breves recibirá una respuesta en '. $_POST['Email'] .'

Gracias por su colaboración.

'; FenvioEmail($AsuntoEmail, $Destinatario2, $Contenido); }else{ $html = '

Se ha producido un error en el en envio de su información.

Gracias por su colaboración.

'; } //echo Ftemplate($html); } else { //Muestro el formulario $html = '
' .'' .'' .'

Nombre

' .'

Email

' .'

Asunto

' .'

Comentarios

' .'

' .'
'; //echo Ftemplate($html); } function FenvioEmail($Asunto, $Destinatario, $Contenido){ // +----------------------------------------------------- J. Eusebio Bolon [SEBI] - 03/11/2005 ---+ // | Función que realiza el envío de un email de notificacion. | // +----------------------------------------------------------------------------------------------+ $Ejecucion = false; //Asunto del correo $mail_asunto = $Asunto; $mail_para = $Destinatario; # Las tres líneas que vienen a continuación son necesarias para que la cabecera del mensaje esté en formato HTML $mail_header = 'MIME-Version: 1.0'. "\n"; $mail_header .= 'Content-Type: text/html; charset=iso-8859-1'. "\n"; $mail_header .='From: GHC '. "\n"; $mail_header .='X-Mailer: PHP/'. phpversion(); $mail_mensaje ='' .'' .'' .'CONTACT FORM' .'' .''."\n" .'' .'' . $Contenido .'



'. date("Y-m-d H:i:s") .'

' .'' .''; // Envio del correo mail($mail_para, $mail_asunto, $mail_mensaje, $mail_header); $Ejecucion = true; return $Ejecucion; } ?> CONTACTO | SOTFWARE GESTIÓN DE HISTÓRIAS CLÍNICAS

Software médico para la gestión de historias clínicas y médicas

CONTACTO