Jump to content
Fórum Script Brasil
  • 0

E-mail Automático Ao Operador


BuSaReLLo

Question

10 answers to this question

Recommended Posts

  • 0

Faça um busca pelo fórum sobre CDONTS.

Você achará muito coisa sobre este componente!

biggrin.gif

Link to comment
Share on other sites

  • 0

Ahm..

Antes de mais nada..

Veja qual o COmponente que seu servidor suporta.

Depois, que você souber isso, podemos criar o codigo que envia e-mails

t+

Link to comment
Share on other sites

  • 0

olá

desculpe a demora

só recebi as informacoes de meu servidor agora

aki estao as especificacoes que meu servidor suporta

valeo

CDONTS Object: Versão: 1.2 INSTALADO

--------------------------------------------------------------------------------

ADO DB Object: Versão: 2.5

--------------------------------------------------------------------------------

File System Object INSTALADO

--------------------------------------------------------------------------------

ASPMail Object INSTALADA

Para Mais Informações www.serverobjects.com

--------------------------------------------------------------------------------

ASPImage Object NÃO INSTALADO

Para Mais Informações www.serverobjects.com

--------------------------------------------------------------------------------

ASPUpload Object NÃO INSTALADO

Para Mais Informações www.persits.com

--------------------------------------------------------------------------------

ASPEmail Object NÃO INSTALADO

Para Mais Informações www.persits.com

--------------------------------------------------------------------------------

JMail Object INSTALADO

Para Mais Informações www.dimac.net

--------------------------------------------------------------------------------

Bamboo.SMTP Object NÃO INSTALADO

Link to comment
Share on other sites

  • 0

Olá..

você tem 2 componentes de email instalado!

QUal dos dois você prefere? Cdonts, ou AspMail?

Veja:

- AspMail X Cdonts

t+

Link to comment
Share on other sites

  • 0

hehe

tudo bem..

no link que te passei, mostra como enviar com os dois

tenta montar alguma coisa aí

qualquer duvida, estamos aqui

t+

Link to comment
Share on other sites

  • 0

Da uma olhada e ve se isso ai te ajuda....

<FORM METHOD="post" ACTION="enviar_email.asp" name="">

<p>Digite a baixo o assunto e o texto da mensagem que será enviada a todos os cadastrados.</p>

Assunto: <INPUT TYPE="text" NAME="assunto" SIZE="20">

Texto: <TEXTAREA NAME="texto" cols="25" rows="10"></textarea>

<INPUT type="submit" name="Submit" value="Enviar"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">

</FORM>

Abaixo segue a programação!

<%

ConnString="DBQ=d:\algumacoisa\teste.mdb;Driver={Microsoft Access Driver (*.mdb)}"

sqlstmt = "select nome, email from cadastro"

Set Conn = Server.CreateObject("ADODB.Connection")

set rsquery = conn.execute(sqlstmt)

nr_emails_corretos = 0

nr_emails_errados = 0

nr_geral = 0

while not rsquery.eof

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

Mailer.ContentType = "text/html"

Mailer.RemoteHost = "smtp.algumacoisa.com.br"

Mailer.FromName = "TESTE - ASPL"

Mailer.FromAddress = "contato@algumacoisa.com.br"

Mailer.AddRecipient rsquery("nome"),rsquery("email")

Mailer.Subject=request.form("assunto")

Mailer.Bodytext = "Caro <b>" & rsquery("nome") & ",</b><BR>" & request.form("texto")

x = Mailer.SendMail

if x = true then

MSG = "E-MAIL ENVIADO COM SUCESSO!"

nr_emails_corretos = nr_emails_corretos + 1

Else

MSG = " O E-MAIL NÃO FOI ENVIADO COM SUCESSO!"

nr_emails_errados = nr_emails_errados + 1

end if

nr_geral = nr_geral + 1

Response.write nr_geral & " - " & MSG

rsquery.movenext

wend

Response.write "Numero Total de Emails: " & nr_geral & "<BR>"

Response.write "Numero de Emails enviados: " & nr_emails_corretos & "<BR>"

Response.write "Numero de Emails não enviados: " & nr_emails_errados & "<BR>"

rsquery.close

set rsquery = nothing

set conn = nothing

%>

Ajudou ? qualquer coisa posta ai. wink.gif

Abraço...

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152.2k
    • Total Posts
      652.1k
×
×
  • Create New...