Ir para conteúdo
Fórum Script Brasil
  • 0

Como Enviar E-mail?


iblop

Pergunta

Ola, estou precisando anexar em meu programa uma forma de enviar curtos e-mails.

Andei pesquisando e aprendi a enviar usando o controle de MAPI , porem ele requer permisão do usuario para enviar o e-mail...

alguém poderia me ensinar outra forma de enviar e-mails pelo vb?

OBS: estou usando o VB 6

Link para o comentário
Compartilhar em outros sites

17 respostass a esta questão

Posts Recomendados

  • 0
Eu tentei dar download do Py.Sendmail, mas o download termina +- em 4%

O problema está no arquivo ou na minha conexão?

Acabei de fazer um teste aqui e o arquivo foi baixado corretamente. Utilizei o Mozilla Firefox para baixar.

Obrigado por indicar o site, gostei muido do conteudo =)

Obrigado. :)

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Consegui baixar o arquivo, mas quando fui testar o exemplo em VB, ocorre um erro em :

Set k = CreateObject("Py.SendMail")

no Private Sub cmdEnviar_Click()

(diz que não pode criar o objeto...)

Como posso arrumar isto?

Você não leu como instalar o componente? Dê uma olhada no LEIA-ME.txt que acompanha o pacote. É necessário registrar o componente com o regsvr32.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Oque eu devo colocar em "Servidor:" para que ele mande a mensagem para este e-mail:

iblop@bol.com.br ?

O seu servidor SMTP, ou seja, o servidor pelo qual você envia suas mensagens. Pode ser qualquer servidor STMP ao qual você tenha acesso. Por exemplo, se você é assinante do provedor Inter.net (http://www.br.inter.net/) o seu servidor é smtp.br.inter.net. Se você utiliza a iG, o seu servidor é smtp.ig.com.br. Se não me engano, o do BOL é smtp.bol.com.br mesmo, porém você tem que acessar a conta via POP3 (para receber os e-mails) antes de poder enviar algum (e isso é uma limitação imposta pela BOL).

Se antes você estava enviando e-mails via MAPI é porque você tinha uma conta configurada no Outlook ou no Outlook Express. E na configuração desta conta entra o endereço do servidor. Dê uma olhada lá.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Quer dizer que o servidor smtp serve para pegar a mensagem que o computador envia e manda-a para o e-mail, e não tem nada a ver com o e-mail nem com a conexão?

Então mesmo eu usando um destinatario da BOL, estar conectado usando uma conexão IG e o servidor SMTP que o programa está utilizando é o da hotmail por exemplo vai enviar ?

Link para o comentário
Compartilhar em outros sites

  • 0

Quer dizer que o servidor smtp serve para pegar a mensagem que o computador envia e manda-a para o e-mail, e não tem nada a ver com o e-mail nem com a conexão?

Então mesmo eu usando um destinatario da BOL, estar conectado usando uma conexão IG e o servidor SMTP que o programa está utilizando é o da hotmail por exemplo vai enviar ?

Sim, o SMTP só tem relação com o e-mail do remetente (de quem envia). Se você quer passar um e-mail para iblop@bol.com.br, pelo servidor da iG você precisa especificar que o remetente é um usuário do SMTP da iG (como iblop@ig.com.br). O mesmo vale para o Hotmail, ou seja, você tem que passar por um e-mail do Hotmail, mas o destinatário pode ser qualquer um. Isso, é claro, se o Hotmail tiver um servidor SMTP.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Bom, eu já configurei tudo, mas não manda o e-mail mesmo assim O.O

Não estou entendendo oque esta acontecendo...

Olha como esta:

Servidor: smtp.mail.yahoo.com.br

De: matheus4569@yahoo.com.br

Para: matheus4569@hotmail.com

Assunto: Teste

Mensagem: Teste de mensagem

-Não anexei nada

-Não tem imagens

e mesmo assim aparece a mensagem: "Retorno: Connection unexpectedly closed"

ao tentar enviar o e-mail, e não envia =/

Link para o comentário
Compartilhar em outros sites

  • 0

Você sabe se o servidor requer autenticação? Se for o caso, você precisa preencher as propriedades User com o nome do usuário (que, geralmente, é o próprio e-mail do remetente ou só a parte antes da arroba) e Password com a senha. A maioria dos servidores SMTP exige isso, a fim de que não sejam mal utilizados (para envio de spam em massa, por exemplo).

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Eu já testei colocar a autenticação destas duas maneiras, mas ele retorna uma mensagem dizendo que não foi possivel autenticar("apenas quando eu coloco para autenticar")

O.o acho que não vou conseguir nunca

Qual servidor você está utilizando? De qualquer maneira, criei uma conta lá no meu servidor para você poder fazer um teste aí:

    Set k = CreateObject("Py.SendMail")
    
    k.SMTPServer = "mail.gs.kitbr.com"
    k.To = "QUALQUER E-MAIL"
    k.From = "teste@gs.kitbr.com"
    k.Subject = "Assunto"
    k.Body = "Mensagem"
    k.User = "teste+gs.kitbr.com"
    k.Password = "1234"

    retorno = k.Send()
    MsgBox "Retorno: " & retorno

Veja se dá certo com esse.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0

Oo Nossa agora quaseee deu....

Aparece:

"Retorno: ok"

Mas não chegou o e-mail para mim =P

Sera que demora algum tempo? ou não deu mesmo?

OBS: neste code que você me mandou

Set k = CreateObject("Py.SendMail")

k.SMTPServer = "mail.gs.kitbr.com"

k.To = "QUALQUER E-MAIL"

k.From = "teste@gs.kitbr.com"

k.Subject = "Assunto"

k.Body = "Mensagem"

k.User = "teste+gs.kitbr.com"

k.Password = "1234"

retorno = k.Send()

MsgBox "Retorno: " & retorno

Tem duas linhas adicionas em relação ao meu que estavam nas minhas sources:

retorno = k.Send()

MsgBox "Retorno: " & retorno

Isso tem algo a ver com o problema que estava dando?

Obrigado.

retorno = k.Send()

MsgBox "Retorno: " & retorno

Link para o comentário
Compartilhar em outros sites

  • 0

Oo Nossa agora quaseee deu....

Aparece:

"Retorno: ok"

Mas não chegou o e-mail para mim =P

Sera que demora algum tempo? ou não deu mesmo?

O teste que fiz aqui chegou, mas talvez possa demorar um pouco.

OBS: neste code que você me mandou

Set k = CreateObject("Py.SendMail")

k.SMTPServer = "mail.gs.kitbr.com"

k.To = "QUALQUER E-MAIL"

k.From = "teste@gs.kitbr.com"

k.Subject = "Assunto"

k.Body = "Mensagem"

k.User = "teste+gs.kitbr.com"

k.Password = "1234"

retorno = k.Send()

MsgBox "Retorno: " & retorno

Tem duas linhas adicionas em relação ao meu que estavam nas minhas sources:

retorno = k.Send()

MsgBox "Retorno: " & retorno

Isso tem algo a ver com o problema que estava dando?

Não, e estas duas linhas estão lá sim (só que ao invés de um MsgBox eu mostro o resultado em uma Label, mas o efeito é o mesmo).

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

  • 0
Guest Visitante

Au tava olhando esse projeto ai e achei muito util...

mas tipow...

não tem como incluir esse componente "Py.SendMail" no executavel?

e quando o programa for executado ele já registra o componente

automatico?

falou

Link para o comentário
Compartilhar em outros sites

  • 0

Até seria possível, mas a meu ver não há necessidade disto já que:

1º - o executável ficaria grande desnecessariamente;

2º - para todo programa em VB você precisa de outras DLLs, as quais você não poderia fazer este mesmo processo;

3º - é muito mais elegante (e prático) criar um programa de instalação para o seu aplicativo, que conteria os arquivos do Py.Sendmail, além das DLLs do VB6 necessárias à execução do seu aplicativo.

Abraços,

Graymalkin

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...