Hola,
Estuve probando con algunos formularios para no tener que redirigirme a una página externa
y coneguí lo siguiente.
El único problema lo tengo con el contact.php porque al enviar el formulario me sale una página con códigos raros.
El servidor soporta php.
Agradeceré resolver este problema, desde ya mil gracias!
Archivo html:
<html>
<body>
<font face=Arial size=2>
<form method="post" action="contact.php">
<table bgcolor=#ffffcc align=center>
<tr>
<td colspan=2><strong>Formulario de contacto:</strong></td>
</tr>
<tr>
<td><font color=red>*</font> Nombre:</td>
<td><input size=25 name="Nombre"></td>
</tr>
<tr>
<td><font color=red>*</font> Email:</td>
<td><input size=25 name="Email"></td>
</tr>
<tr>
<td>Empresa:</td>
<td><input size=25 name="Empresa"></td>
</tr>
<tr>
<td>Asunto:</td>
<td><input size=25 name="Asunto"></td>
</tr>
<tr>
<td colspan=2>Mensaje:</td>
</tr>
<tr>
<td colspan=2 align=left><textarea name="Mensaje" rows=7 cols=32></textarea></td>
</tr>
<tr>
<td colspan=2 align=center><input type=submit name="send" value=" Enviar "> <input type=reset name="borrar" value=" Borrar "></td>
</tr>
<tr>
<td colspan=2 align=center><small><font color=red>*</font> campo requerido</small></td>
</tr>
</table>
</form>
</body>
</html>
archivo contact.php:<?php
// get posted data into local variables
$EmailTo = "
[email protected]";
$Subject = "Website Contact Form";
$Nombre = Trim(stripslashes($_POST['Nombre']));
$Email = Trim(stripslashes($_POST['Email']));
$Empresa = Trim(stripslashes($_POST['Empresa']));
$Asunto = Trim(stripslashes($_POST['Asunto']));
$Mensaje = Trim(stripslashes($_POST['Mensaje']));
// validation
$validationOK=true;
if (Trim($Nombre)=="") $validationOK=false;
if (Trim($Email)=="") $validationOK=false;
if (!$validationOK) {
print "
<meta http-equiv=\"refresh\" content=\"0;URL=error.htm\">
";
exit;
}
// prepare email body text
$Body = "";
$Body .= "Nombre: ";
$Body .= $Nombre;
$Body .= "\n";
$Body .= "Email: ";
$Body .= $Email;
$Body .= "\n";
$Body .= "Empresa: ";
$Body .= $Empresa;
$Body .= "\n";
$Body .= "Asunto: ";
$Body .= $Asunto;
$Body .= "\n";
$Body .= "Mensaje: ";
$Body .= $Mensaje;
$Body .= "\n";
// send email
$success = mail($EmailTo, $Subject, $Body);
// redirect to success page
if ($success){
print "
<meta http-equiv=\"refresh\" content=\"0;URL=
http://www.diriperu.com/DIRIPERU/Contacto.html\">
";
}
else{
echo "
<script>";
echo "alert('El formulario no ha sido enviado correctamente');";
echo "</script>
";
}
}
?>