Erro em página de indicação de site

[Célio-Ctba 0]

Estou tentando reaproveitar um cód. de indicação de site

está me gerando o seguinte erro:

 

 

Tipo de erro:

(0x80040108)

/indique/indique22.asp, line 29

 

 

 

 

 

variavel.to = xxxxx

variavel.from = xxx@xx.xx.xx

variavel.Send

 

if variavel.Send = true then

response.redirect "parabens.asp"

else

response.redirect "index.asp"

 

end if

 

 

Em negrito está a linha do erro

[Generation 0]

Célio, qual componente voce esta usando?Se for Cdonts ele nao aceita esse tipo de verificação creio que só os componentes que usam SMTP na configuração aceitam esse tipo de verificação que voce esta fazendo.[]'s

[Célio-Ctba 0]

Exato, estou usando CDONTS, então devo utilizar um outro componente?

[Mário Monteiro 179]

eh melhor usar outro simdee preferencia que autentique o SMTP como foi dito acima...ou então não fazer esta verificação e sempre mandar pra pagina de sucesso...

[Célio-Ctba 0]

Podem me dar dica de qual outro usar, lembro + ou -de um tal de (smtp. **), ou algo parecido, não lembro a sintaxe exata.

[Generation 0]

Este ja tem até um codigo de exemplo:

 

http://www3.imagelink.com.br/aspmail/ASPMAIL4.HTM

 

 

[]'s

[Célio-Ctba 0]

Correto se eu usar entao esse componente e gerar este erro:

 

Tipo de erro:

Objeto Server, ASP 0177 (0x800401F3)

Seqüência de classe inválida

/indique/indique2.asp, line 10

 

 

linha 10 = Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

 

 

 

é porque onde minha página está hospedada, não possui a DLL instalada?

[Generation 0]

Correto, veja antes quais componentes seu verver tem disponivel para voce utilizar a partir dai comece a programar, para evitar isso.[]'s

[Célio-Ctba 0]

Bom aceita-se estes, mas não sei a sintaxe esse é o problemaDundas - ASPMailer Dundas MailerDynu EmailPersits - ASPEmailServer Objects - ASPMailServer Objects - ASPQMailw3 JMailCDONTS

[Generation 0]

Documentação - AspMail - ServerObjects

 

http://www.serverobjects.com/comp/Aspmail3.htm

http://www.serverobjects.com/comp/Aspmail4.htm

 

ASP

[*]

 

[*]Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

 

[*]Mailer.FromName  = "Seu Nome"

 

[*]Mailer.FromAddress= "site@site.com.br"

 

[*]Mailer.RemoteHost = "mail.site.com.br" 'Configuração do servidor SMTP

 

[*]Mailer.AddRecipient "Generation", "email@site.com.br"

 

[*]Mailer.Subject = "Assunto"

 

[*]Mailer.BodyText  = "Olá" & VbCrLf & "Este exemplo deve funcionar"

 

[*]if Mailer.SendMail then

 

[*] Response.Write "E-Mail enviado"

 

[*]else

 

[*] Response.Write "Ocorreram alguns erros" & Mailer.Response

 

[*]end if

 

 

[]'s