GMAIL BLOQUEANDO APLICA?ÃO
Solução Alternativa!
Desisti do Gmail e aderi ao HOTMAIL. Quem precisar fica aqui:
================================
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Try
Dim message As New Net.Mail.MailMessage(TextBox1.Text, TextBox3.Text, TextBox4.Text, TextBox5.Text) [ô]TextBox3 = Destinatário, TextBox4 = Assunto, TextBox5 = Corpo[ô]
Dim smtp As New Net.Mail.SmtpClient([Ô]smtp.live.com[Ô], 587)
Dim credentials As New Net.NetworkCredential(TextBox1.Text, TextBox2.Text) [ô]TextBox1 = Seu Hotmail, TextBox2 = Sua Senha[ô]
smtp.EnableSsl = True
smtp.Credentials = credentials
smtp.Port = 587
smtp.Host = [Ô]smtp.live.com[Ô]
smtp.Timeout = 900000
Dim attachment As New Attachment([Ô]C: este.txt[Ô])
message.Attachments.Add(attachment)
smtp.Send(message)
MsgBox([Ô]E-mail Enviado![Ô])
message.Dispose()
Attachments.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Class
================================
OBS: Enviou sem problemas, não precisa autenticar (Hotmail só precisar validar quando se envia o 1° e-mail após ter criado a conta) Nenhum problema com o Avast e outros antivÃrus!
No meu caso deixei o Timeout com 900000 pois testei uma pasta zipada com o limite de megas que o hotmail permite anexar (testado com inernet de 1 mb) = lenta. e tudo funcionando perfeitamente.
Obrigado KERPLUNK pela ajuda, mas chegou a dar dor de cabeça de tantas pesquisas e tantas tentativas no vb de diversas formas e códigos. Deixo aberto por mais um tempo pois deve ter vários modos de se fazer e se alguém souber pode compartilhar.
Desisti do Gmail e aderi ao HOTMAIL. Quem precisar fica aqui:
================================
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Try
Dim message As New Net.Mail.MailMessage(TextBox1.Text, TextBox3.Text, TextBox4.Text, TextBox5.Text) [ô]TextBox3 = Destinatário, TextBox4 = Assunto, TextBox5 = Corpo[ô]
Dim smtp As New Net.Mail.SmtpClient([Ô]smtp.live.com[Ô], 587)
Dim credentials As New Net.NetworkCredential(TextBox1.Text, TextBox2.Text) [ô]TextBox1 = Seu Hotmail, TextBox2 = Sua Senha[ô]
smtp.EnableSsl = True
smtp.Credentials = credentials
smtp.Port = 587
smtp.Host = [Ô]smtp.live.com[Ô]
smtp.Timeout = 900000
Dim attachment As New Attachment([Ô]C: este.txt[Ô])
message.Attachments.Add(attachment)
smtp.Send(message)
MsgBox([Ô]E-mail Enviado![Ô])
message.Dispose()
Attachments.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Class
================================
OBS: Enviou sem problemas, não precisa autenticar (Hotmail só precisar validar quando se envia o 1° e-mail após ter criado a conta) Nenhum problema com o Avast e outros antivÃrus!
No meu caso deixei o Timeout com 900000 pois testei uma pasta zipada com o limite de megas que o hotmail permite anexar (testado com inernet de 1 mb) = lenta. e tudo funcionando perfeitamente.
Obrigado KERPLUNK pela ajuda, mas chegou a dar dor de cabeça de tantas pesquisas e tantas tentativas no vb de diversas formas e códigos. Deixo aberto por mais um tempo pois deve ter vários modos de se fazer e se alguém souber pode compartilhar.
Pessoa só para constar HOTMAIL é UM LIXO! E não presta é a coisa mais podre que inventaram Não usem hotmail é o verdadeiro lixo kkkkk estou indignado!
Pelos simples fato de que mandei 10 e-mail hoje ou nem isso. e a conta foi bloqueada para enviar e-mail dizendo:
Vocês atingiu o limite diario de envio de e-mail, pediu ainda para verificar com celular coloquei recebi o código e enviei e não adiantou, foi bom não ter fechado o tópico.
Viram o absurdo do hotmail? LIXO!
Pelos simples fato de que mandei 10 e-mail hoje ou nem isso. e a conta foi bloqueada para enviar e-mail dizendo:
Vocês atingiu o limite diario de envio de e-mail, pediu ainda para verificar com celular coloquei recebi o código e enviei e não adiantou, foi bom não ter fechado o tópico.
Viram o absurdo do hotmail? LIXO!
Então, eu aconselhei o cliente a abrir uma conta no KingHost,
19,00 mensais. E ele ainda tem tudo o que precisamos para Backup via FTP e outros.
A Anos eu utilizo isso com outros clientes, é que esse estava resistente, depois se convenceu.
19,00 mensais. E ele ainda tem tudo o que precisamos para Backup via FTP e outros.
A Anos eu utilizo isso com outros clientes, é que esse estava resistente, depois se convenceu.
Obrigado NILSONTRES vou pesquisar.
Mas indignado com o hotmail, segundo eles é limitado para reduzir spans mas na verdade o motivo é para que paguem pelo plus que é ilimitado, deve ser coisa da Dilma kkkk
Mas indignado com o hotmail, segundo eles é limitado para reduzir spans mas na verdade o motivo é para que paguem pelo plus que é ilimitado, deve ser coisa da Dilma kkkk
Voltando aqui e tentando usar o gmail.
KERPLUNK qual API eu uso a Email Migration API v2 ou Gmail API v1?
KERPLUNK qual API eu uso a Email Migration API v2 ou Gmail API v1?
Se não está migrando nada, nenhuma delas...
Existem vários exemplos do uso da API, até mesmo uma biblioteca pronta para facilitar o uso
Faça seu login para responder