Archief - VB.NET - Mail sturen

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.

zaffah

Legacy Member
Het lukt me dus niet om een mailtje te sturen vanuit vb.net.
Iemand enig idee wat ik verkeerd doe? Ik krijg de foutmelding could not contact server.

telnet smtp.gmail.com 465 werkt wel :)

Ik gebruik volgende code die gewoon achter een knopje zit:
(het kan zijn dat je dit moet importen: Imports System.Net.Mail)
Code:
        Try
            Dim smtpserver As New SmtpClient()
            Dim mail As New MailMessage


            smtpserver.Credentials = New Net.NetworkCredential("[email protected]", "MyPassword")
            smtpserver.Port = 465
            smtpserver.Host = "smtp.gmail.com"
            smtpserver.EnableSsl = True
            'smtpserver.UseDefaultCredentials = False
            'smtpserver.DeliveryMethod = SmtpDeliveryMethod.Network

            mail = New MailMessage
            mail.From = New MailAddress("[email protected]") 'mail to send from
            mail.To.Add("[email protected]") 'mail that will receive the information
            mail.Subject = "test"
            mail.Body = "werkt deze test wel?"
            smtpserver.Send(mail)
        Catch ex As Exception
            MsgBox("Could not contact the server")

        End Try

zatalian

Legacy Member
Natuurlijk zegt het programma "Could not contact the server"...

Probeer eens :

MsgBox(ex.Message)

en laat eens weten wat hij dan zegt.

zaffah

Legacy Member
zatalian zei:
Natuurlijk zegt het programma "Could not contact the server"...

Probeer eens :

MsgBox(ex.Message)

en laat eens weten wat hij dan zegt.

Jup, weet ik wel :D. Maar dat was ook effectief de foutboodschap. Iets van could not contact remote server. Ik zal morgen de fout eens posten.

zaffah

Legacy Member
Het heeft wat langer geduurd, maar heb nu pas tijd gehad :(

de errorcode dus:

System.Net.Mail.SmtpException: Failure sending mail. ---> System.Net.WebException: Unable to connect to the remote server ---> System.Net.Sockets.SocketException: An attempt was made to access a socket in a way forbidden by its access permissions 209.85.229.108:587
at System.Net.Sockets.Socket.DoConnect(EndPoint endPointSnapshot, SocketAddress socketAddress)
at System.Net.ServicePoint.ConnectSocketInternal(Boolean connectFailure, Socket s4, Socket s6, Socket& socket, IPAddress& address, ConnectSocketState state, IAsyncResult asyncResult, Int32 timeout, Exception& exception)
--- End of inner exception stack trace ---
at System.Net.ServicePoint.GetConnection(PooledStream PooledStream, Object owner, Boolean async, IPAddress& address, Socket& abortSocket, Socket& abortSocket6, Int32 timeout)
at System.Net.PooledStream.Activate(Object owningObject, Boolean async, Int32 timeout, GeneralAsyncDelegate asyncCallback)
at System.Net.PooledStream.Activate(Object owningObject, GeneralAsyncDelegate asyncCallback)
at System.Net.ConnectionPool.GetConnection(Object owningObject, GeneralAsyncDelegate asyncCallback, Int32 creationTimeout)
at System.Net.Mail.SmtpConnection.GetConnection(ServicePoint servicePoint)
at System.Net.Mail.SmtpClient.Send(MailMessage message)
--- End of inner exception stack trace ---
at System.Net.Mail.SmtpClient.Send(MailMessage message)
at WindowsApplication1.AdminTool.SendMail() in C:\Users\tswa550\Documents\visual studio 2010\Projects\AdminTool - Copy\AdminTool\Forms\Form1.vb:line 127

zatalian

Legacy Member
zet de port eens op 587 en enablessl op false. Lukt het dan?

zaffah

Legacy Member
Mijn code werkt perfect als je het op port 587 zet. Had ik al lang getest maar blijkbaar was het probleem met mijn firewall.

Te weten gekomen door de code eens te draaien op andere pc :). Nu eens zoeken wat we er moeten voor openzetten :p.

Thanks anyway guys !
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan