Erro no envio de email

[gmendes 0]

fala aew galera, to tentando mandar uma msg pra qnd uma pessoa efetua um cadastro, so q ta dando o seguinte erro: Erro no envio Object requirednao sei oq poder ser, a programação é essa, se alguem puder me fala oq to fazendo de errado!vlwSUB sendNewUserMail(nome, email, fHtml) Dim newMailObj Dim sMailBody Set Mailer = CreateObject("CDONTS.NewMail")Mailer.From = "rockcityweb@rockcityweb.com.br" ' e-mail de quem esta enviando a mensagem Mailer.To = email ' e-mail de quem vai receber a mensagem 'Mailer.CC = com copiaMailer.BodyFormat = 1 ' parametro de formatação Mailer.MailFormat = cdoMailFormatText ' parametro de formatação Mailer.AttachFile 'caso queira anexar algum arquivo ao seu e-mailMailer.Subject = "teste" Mailer.Body = "testando" Mailer.Send Set Mailer = Nothing END SUB On error resume next Mail.Send if err <>0 then Response.write("<br>Erro no envio " & err.description) else Response.write("<br>Email foi enviado com sucesso ") end if set Mail=nothing %>

[CarlosNet 0]

c você nao vai enviar anexo comenta essa linha

Mailer.AttachFile 'caso queira anexar algum arquivo ao seu e-mail

[dark0 0]

ele dá a linha do erro?Se a linha do erro for a Create Object, você precisa ver se o componente está instalado no seu servidor!