ENVIAR E-MAIL SMTPCLIENT X PROXY COM VB.NET
TENHO ESTA FUNÇÃO PRA ENVIO DE E-MAIL.
Dim m As MailMessage = New MailMessage
m.From = New MailAddress([Ô]oiselc@gmail.com[Ô], [Ô]Clesio Santos[Ô])
m.To.Add(New MailAddress([Ô]oiselc@bol.com.br[Ô], [Ô]Clesio Santos[Ô]))
m.Subject = [Ô]IP Externo[Ô]
[ô] Specify an HTML message body
m.Body = [Ô]<html><body><h1>IP Externo</h1><br>[Ô] & MeuIP & [Ô].</body></html>[Ô]
m.IsBodyHtml = True
[ô] Send the message
[ô]Dim client As New SmtpClient([Ô]192.168.1.1[Ô], 8080)
Dim Client As New SmtpClient()
Client.Credentials = New System.Net.NetworkCredential([Ô]EMAIL@gmail.com[Ô], [Ô]SENHA[Ô])
Client.Port = 587
Client.Host = [Ô]smtp.gmail.com[Ô]
Client.UseDefaultCredentials = True
Client.EnableSsl = True
QUANDO NÃO TENHO UM PROXY, ESTA FUNÇÃO FUNCIONA LEGAL, MAS NA EMPRESA ONDE TRABALHO TEM UM PROXY ISA2006, LA NÃO FUNCIONA.
Dim m As MailMessage = New MailMessage
m.From = New MailAddress([Ô]oiselc@gmail.com[Ô], [Ô]Clesio Santos[Ô])
m.To.Add(New MailAddress([Ô]oiselc@bol.com.br[Ô], [Ô]Clesio Santos[Ô]))
m.Subject = [Ô]IP Externo[Ô]
[ô] Specify an HTML message body
m.Body = [Ô]<html><body><h1>IP Externo</h1><br>[Ô] & MeuIP & [Ô].</body></html>[Ô]
m.IsBodyHtml = True
[ô] Send the message
[ô]Dim client As New SmtpClient([Ô]192.168.1.1[Ô], 8080)
Dim Client As New SmtpClient()
Client.Credentials = New System.Net.NetworkCredential([Ô]EMAIL@gmail.com[Ô], [Ô]SENHA[Ô])
Client.Port = 587
Client.Host = [Ô]smtp.gmail.com[Ô]
Client.UseDefaultCredentials = True
Client.EnableSsl = True
QUANDO NÃO TENHO UM PROXY, ESTA FUNÇÃO FUNCIONA LEGAL, MAS NA EMPRESA ONDE TRABALHO TEM UM PROXY ISA2006, LA NÃO FUNCIONA.
ok ISA SERVER 2006 com proxy, mas da algum erro de autenticação ? Nao tem de fazer nenhuma autenticação a mais no ISA SERVER ?
cola o log do erro aqui..
Farebem...
cola o log do erro aqui..
Farebem...
sei que o erro e o 407.
Opa olha isso...
Proxy Authentication Error 407
Tu tem que passar os dados do login de autenticação para o Proxy, antes de passar e-mail
de uma olhada nesse codigo:
Segue links abaixo:
http://www.vbforums.com/showthread.php?t=560619
http://translate.googleusercontent.com/translate_c?hl=pt-BR&langpair=en%7Cpt&u=http://www.codeproject.com/KB/webservices/web_service_by_proxy.aspx&rurl=translate.google.com.br&usg=ALkJrhjRXYtBoSfnCRwAt9GQ_Sd9jxYmBQ
Proxy Authentication Error 407
Tu tem que passar os dados do login de autenticação para o Proxy, antes de passar e-mail
de uma olhada nesse codigo:
(
System.Net.WebException: O servidor cometeu uma violação de protocolo. ResponseStatusLine secção =
na System.Net.WebClient.DownloadFile (Uri endereço, String fileName)
na System.Net.WebClient.DownloadFile (String endereço, String fileName)
)
E este é o meu código
{
Dim proxy As New WebProxy ([Ô]172.25.6.41[Ô], 25)
proxy.Credentials = Nova NetworkCredential ([Ô]Usuário[Ô], [Ô]senha[Ô], [Ô]domÃnio[Ô])
Dim WeCSl Como WebClient Nova
WeCSl.Proxy proxy =
WeCSl.DownloadFile ([Ô]http://www.codeproject.com/KB/vb/autoupdate/autoupdate.zip[Ô], [Ô]D: / file.zip[Ô])
}
Segue links abaixo:
http://www.vbforums.com/showthread.php?t=560619
http://translate.googleusercontent.com/translate_c?hl=pt-BR&langpair=en%7Cpt&u=http://www.codeproject.com/KB/webservices/web_service_by_proxy.aspx&rurl=translate.google.com.br&usg=ALkJrhjRXYtBoSfnCRwAt9GQ_Sd9jxYmBQ
Tópico encerrado , respostas não são mais permitidas