Fiz um código com AspUpload e o anexo vai para o servidor...Ai fiz um código de Cdonts, normal, ele diz que não tem erro e que foi enviado, mas não chega.
Aqui está o código:
<%
On Error Resume Next
nome = Request.Form("nome")
nomevem = Request.Form("nomevem")
deemail = Request.Form("deemail")
paraemail = Request.Form("paraemail")
corpo = Request.Form("corpo")
Dim Mailer
Set Mailer = Server.CreateObject("CDONTS.NewMail")
Mailer.To = paraemail & " (" & nome & ")"
Mailer.From = deemail & " (" & nomevem & ")"
Mailer.Subject = "Teste CDONTS com anexo"
Mailer.Body = corpo
Mailer.attachfile arquivo
Mailer.Send
x=Mailer.Send
if x= True then
response.write("Coloca a msg e o que mais desejar")
else
response.write("seu email foi emviado e o que mais desejar")
end if
Set Mailer = nothing
%>
OBS.: a variável arquivo que se encontra na linha do anexo tem o endereço e nome do arquivo.
Pergunta
luka_lua
Fiz um código com AspUpload e o anexo vai para o servidor...Ai fiz um código de Cdonts, normal, ele diz que não tem erro e que foi enviado, mas não chega.
Aqui está o código:
<% On Error Resume Next nome = Request.Form("nome") nomevem = Request.Form("nomevem") deemail = Request.Form("deemail") paraemail = Request.Form("paraemail") corpo = Request.Form("corpo") Dim Mailer Set Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.To = paraemail & " (" & nome & ")" Mailer.From = deemail & " (" & nomevem & ")" Mailer.Subject = "Teste CDONTS com anexo" Mailer.Body = corpo Mailer.attachfile arquivo Mailer.Send x=Mailer.Send if x= True then response.write("Coloca a msg e o que mais desejar") else response.write("seu email foi emviado e o que mais desejar") end if Set Mailer = nothing %>OBS.: a variável arquivo que se encontra na linha do anexo tem o endereço e nome do arquivo.
Por favor me ajudem...
Obrigada.
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.