Bem galera essse � meu primiero topico aqui, peguei esse script no site do forum e gostaria de saber o que tenho que altera nele para que ele funcione corretamente.
os 3 arquivos ASP, s�o eles:
ENVIAR
<%
'Declarando variveis
Dim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto
'Pegando os dados digitados nos campos e colocando em variaveis
sNameFrom = Request.Form("nome")
sEmailFrom = Request.Form("email")
sEmailTo = "seuemail@seudominio.com.br"
sNameTo = "Nome do Site"
sText = Request.Form("mensagem")
sAssunto = Request.Form("assunto")
'Cria o objeto
set mailer = server.createobject("SMTPsvg.Mailer")
Mailer.FromName = sNameFrom
Mailer.FromAddress = sEmailFrom
'Host para envio de emails
'CONFIGURE ESTA LINHA !
Mailer.RemoteHost = "smtp.servidor.com.br"
Mailer.AddRecipient sEmailTo, sNameTo
Mailer.Subject = sAssunto & " - E-mail"
'Monta a texto para o envio
strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf
strMsgFooter = sText
Mailer.BodyText = strMsgHeader & strMsgFooter
' Se for enviado redirecionar para obrigado.asp
if Mailer.SendMail then
Response.Redirect "obrigado.asp"
else
' Se n�o for enviado mostra o erro que ocoreu
Response.Write ("Ocorreu um erro.<BR>")
Response.Write ("O Erro � " & Mailer.Response)
end if
%>
DEFAULT
<html><head>
<title>Fale Conosco</title>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" width="266">
<tr>
<td width="258" valign="top" height="1">
<form method="POST" action="enviar.asp">
<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 type="text" name="nome" 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">E-mail:</font></td>
</tr>
<tr>
<td width="96%">
<p align="left"><font size="2" face="Verdana"><input type="text" name="email" 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">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%"> </td>
</tr>
<tr>
<td width="96%">
<p align="center"><font face="Verdana"><input type="submit" value="Enviar >>" name="enviar"></font></td>
</tr>
</table>
</center>
</div>
</form>
</center>
</td>
</tr>
</table>
</div>
</body>
</html>
OBRIGADO
<html><head>
<title>Fale Conosco</title>
</head>
<body topmargin="0" leftmargin="0">
<div align="center">
<center>
<table border="0" width="439">
<tr>
</center>
<p align="center"><font color="#00B0FF" size="3"><b>Muito Obrigado !!</b></font><p align="center"><font size="2"></font><p align="center"><font size="2">
Sua Mensagem foi enviada com sucesso.</font>
</td>
</tr>
</table>
</div>
</td>
</body>
</html>
desde ja agrade�o a colabora��o de todos
Formul�rio
Started By Red_Slack, 18/07/2006, 16:13
3 replies to this topic
#2
Generation
-
- Usuários
-
- 1546 posts
Super Veterano
- Sexo:Masculino
- Localidade:Curitiba - PR
Posted 24/07/2006, 22:48
Bom, se nao resolveu...basta voce configurar a linha do smtp do seu site e ver se esse componente existe no seu servidor 
[]'s
'CONFIGURE ESTA LINHA ! Mailer.RemoteHost = "smtp.servidor.com.br"
[]'s
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)
#3
Red_Slack
-
- Usuários
-
- 4 posts
Novato no fórum
- Sexo:Não informado
Posted 24/07/2006, 23:39
Bom, se nao resolveu...basta voce configurar a linha do smtp do seu site e ver se esse componente existe no seu servidor
'CONFIGURE ESTA LINHA ! Mailer.RemoteHost = "smtp.servidor.com.br"
[]'s
cara desculpa minha ignorancia mas eu uso o email yahoo no caso é so colocar "smtp.mail.yahoo.com.br"? sem as " " (aspas) ou com elas? é isso mesmo?
#4
Generation
-
- Usuários
-
- 1546 posts
Super Veterano
- Sexo:Masculino
- Localidade:Curitiba - PR
Posted 24/07/2006, 23:56
vc deve colocar o stmp do servidor que esta hospedado...Algo como...
mail.seusite.com.br ou smtp.seusite.com
entre em contato com o suporte de onde esta hospedando e peça o smtp
[]'s
mail.seusite.com.br ou smtp.seusite.com
entre em contato com o suporte de onde esta hospedando e peça o smtp
[]'s
Favoritos : | OpenSuse | Opera | Firefox | NetBeans | GMail | Leia As Regras | Use a Busca | Como fazer Perguntas Inteligentes |
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)
“Obstáculos são aquelas coisas medonhas que você vê quando tira seus olhos de seu objetivo” (Henry Ford)
“É impossível para um homem aprender aquilo que ele acha que já sabe.” (Epíteto)
“A única razão da existência do tempo é para que todas as coisas não aconteçam de uma vez.”(Albert Einstein)
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
