Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá Galera ASP!!!
Bom, to garrado com um formulário aqui galera mas não faço nem ideia o porque dele não funcionar.
O terra mandou pra mim o arquivo mail.asp e eu pesquisando alguns tutoriais na net tentei modificar, mas quando clico em enviar no formulario ele diz que a página mail.asp não existe.
Será que vocês podem me dar uma mãozinha!?
Valeu galera!
Abs
segue o código:
Contato.html
<form id="form1" name="form1" method="post" action="mail.asp">
<table width="310">
<tr>
<td width="302"><span class="style1">Empresa</span></td>
</tr>
<tr>
<td><label>
<input type="text" name="empresa" id="empresa" class="campo1" />
</label></td>
</tr>
<tr>
<td class="style1">Contato</td>
</tr>
<tr>
<td><label>
<input type="text" name="contato" id="contato" class="campo1" />
</label></td>
</tr>
<tr>
<td><span class="style1">Telefone / Fax:</span> <span class="style2">(ex: 313222-2222/313222-3221)</span></td>
</tr>
<tr>
<td><label>
<input type="text" name="telefone" id="telefone" class="campo1"/>
</label></td>
</tr>
<tr>
<td class="style1">E-mail</td>
</tr>
<tr>
<td><label>
<input type="text" name="email" id="email" class="campo1"/>
</label></td>
</tr>
<tr>
<td class="style1">Comentários/Dúvidas/ Sugestões</td>
</tr>
<tr>
<td><label>
<textarea name="mensagem" id="mensagem" cols="45" rows="5" class="campo2"></textarea>
</label></td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td><label>
<div align="center">
<input type="submit" name="Submit" id="button" value="Enviar" />
</div>
</label></td>
</tr>
</table>
</form>
Segue o código do mail.asp
<%
Dim empresa, contato, telefone, email, mensagem
empresa = Request("empresa")
contato = Request("contato")
telefone = Request("telefone")
email = Request("email")
mensagem = Request("mensagem")
corpo = corpo & "<b>Formulario de Contato Fale Conosco</b>" &" " & "<BR><BR>"
corpo = corpo & "<b>Empresa:</b>" &" " & empresa & "<BR><BR>"
corpo = corpo & "<b>Contato:</b>" &" " & telefone & "<BR><BR>"
corpo = corpo & "<b>E-mail:</b>" &" " & email & "<BR><BR>"
corpo = corpo & "<b>Telefone:</b>" &" " & telefone & "<BR><BR>"
corpo = corpo & "<b>Comentários:</b>" &" " & mensagem & "<BR><BR>"
'Implementando o ASPMAIL em seu site:
' Cria o componente aspmail
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
' Nome do Remetente
Mailer.FromName = empresa
' E-mail do Rementente
Mailer.FromAddress= email
' Servidor de envio de e-mail
Mailer.RemoteHost = "mail-fwd"
' Nome / Endereço de quem recebera o E-mail
Mailer.AddRecipient "endereco@dominio.com.br"
' Assunto do E-mail
Mailer.Subject = "Formulário de Contato"
' Campo da mensagem
Mailer.BodyText = corpo
if Mailer.SendMail then
response.redirect "resposta.htm"
else
Response.Write "Erro no envio do e-mail. Erro: " & Mailer.Response
end if
%>
Muito obrigado Galera!
Carregando comentários...