- Gabriel Pacheco -

estou com um problema no mesmo formmail, a unica diferença que o meu diz que o FromAddress não pode ficar vazio.. porem nao tá vazio.. olhe o codigo..

Formulario de Contato

<div id="formcontato">
  <div align="center">
<center>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table border="0" width="266">
<tr>
<td width="258" valign="top" height="1">
<form action="enviar.asp" method="POST" enctype="multipart/form-data">
<div align="center">
<center>
<table border="0" width="50%" cellspacing="0" cellpadding="0">
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Nome:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input name="nome" type="text" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1" size="25">
</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">E-mail:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input name="email" type="text" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1" size="25">
</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Assunto:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input type="text" name="assunto" size="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></font></td>
</tr><tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana">Mensagem:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><textarea rows="5" name="mensagem" cols="25" style="font-family: Verdana; font-size: 10 pt; border-style: solid; border-width: 1"></textarea></font></td>
</tr><tr>
<td width="96%">&nbsp;</td>
</tr>
<tr>
<td width="96%">
<p align="center"><font face="Verdana"><input type="submit" src="images/more2.gif" value="Enviar" name="enviar">
</font></td>
</tr>
</table>
</center>
</div>
</form>
</td>
</tr>
</table>
</div>
</div>
</div>

Enviar.asp

<%
Dim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto

sNameFrom = Request.Form("nome")
sEmailFrom = Request.Form("email")
sEmailTo = "contato@gabrielpacheco.com.br"
sNameTo = "Gabriel Pacheco"
sText = Request.Form("mensagem")
sAssunto = Request.Form("assunto")


  set mailer = server.createobject("SMTPsvg.Mailer")
  Mailer.FromName = sNameFrom
  Mailer.FromAddress = sEmailFrom

  Mailer.RemoteHost = "smtp.gabrielpacheco.com.br"
  Mailer.AddRecipient sEmailTo, sNameTo
  Mailer.Subject = sAssunto  & " - E-mail"


  strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf
  strMsgFooter = sText
  Mailer.BodyText = strMsgHeader & strMsgFooter

  if Mailer.SendMail then
	 Response.Redirect "obrigado.html"
  else

	 Response.Write ("Ocorreu um erro.<BR>")
	 Response.Write ("O Erro é " & Mailer.Response)
  end if
%>

O que será que estou errando.. nao intendo muito de asp.. to aprendendo agora..