suporte / windows

A Digiweb disponibiliza um modelo de formulário ASP para seu site. O formulário utiliza o componente AspMail.

FormASP

Para utilizar o FormAsp, é necessário criar dois arquivos. O primeiro arquivo é responsável por receber as informações e "chamar" os códigos ASP para o envio do formulário. O segundo receberá as informações preenchidas para envia-las ao e-mail do destinatário.

O FormAsp* já está ativo em todas as contas Windows/SQL, para utilizá-lo, siga os passos abaixo:

1. Copie abaixo os códigos <--Início formasp.asp--> e salve com o nome desejado para o formulário (ex: formasp.asp). Esse será o primeiro arquivo.

2. Copie os códigos <--Início enviaemail.asp--> e salve com o nome "enviaemail.asp". Esse será o segundo arquivo.

Para o funcionamento correto do script, em <-Início enviaemail.asp->, altere apenas os campos abaixo:

Na linha Mailer.RemoteHost = "smtp.seudominio.com(.br)" substitua
a parte "seudominio.com(.br)" pelo nome correspondente ao de seu domínio.

Na linha Mailer.AddRecipient "Formulário" ,
"seu_nome@seudominio.com.br", substitua o endereço de e-mail
"seu_nome@seudominio.com.br" pelo endereço de e-mail que receberá os dados do formulário.

Na linha Response.redirect "http://seudominio.com.br/", preencha com a URL que deve ser apresentada após o envio do formulário.

Escolha um diretório de sua preferência e faça o upload dos arquivos no mesmo diretório (dentro do htdocs).

Copie os códigos aqui:

<--Início formasp.asp--> (não copie essa linha)

<title>Digiweb - Exemplo Formulário ASP</title>
<form action="enviaemail.asp" method="POST">
<div align="left"> <font size="2" face="Arial"> Nome:
<input type="text" size="50" maxlength="50" name="nome">
<br> E-mail:
<input type="text" size="50" maxlength="50" name="email">
<br>
Mensagem: <br>
<textarea name="mensagem" rows="5" cols="50"></textarea>
<br>
</font>
<input type="submit" value="Enviar">
</div>
</form>

<--Fim formasp.asp--> (não copie essa linha)

<--Início enviaemail.asp--> (não copie essa linha)

<%
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = request("nome")
Mailer.FromAddress = request("email")
Mailer.RemoteHost = "smtp.seudominio.com(.br)"
Mailer.AddRecipient "Formulário" , "seu_nome@seudominio.com.br"
Mailer.Subject = "Formulário"

Mailer.BodyText = "Nome..........: " & request.form("nome") & vbcrlf
Mailer.BodyText = "E-mail.........: " & request.form("email") & vbcrlf
Mailer.BodyText = "Mensagem..: " & request.form("mensagem") & vbcrlf

if Mailer.SendMail then
Response.redirect "http://seudominio.com.br/obrigado.asp"
else
Response.Write mailer.response
end if
%>

<--Fim enviaemail.asp--> (não copie essa linha)

* Por se tratar de programação ASP, não ofereceremos suporte se os códigos do exemplo forem alterados para inclusões de campos adicionais ou demais alterações