[VB.NET] Inviare email con un proxy

[morpheus86]

Buongiorno a tutti,

Ho ideato un programma per cucinare le ROM per Android, ed ho inserito la possibilità di potermi contattare tramite email con un apposito form, ed anche l'invio dei log di errore.
Un utente mi ha chiesto se fosse possibile settare un proxy per il mio programma. Per il download dei file, ho risolto, ma non riesco a farlo per l'invio delle email, ed anche dei report.
Quancuno può aiutarmi?

Per l'invio delle email, ovviamente, utilizzo System.Net.Mail

Il codice è il seguente

Public Sub send_email(ByVal mittente As String, ByVal oggetto As String, ByVal messaggio As String)
Try

Dim oMsg As New MailMessage()
oMsg.From = New MailAddress("mittente", "MorphDroid User")
oMsg.To.Add(New MailAddress("destinatario", "Assistenza"))
If oggetto = "" Then 
oMsg.Subject = "Assistenza MorphDroid"             
Else
oMsg.Subject = oggetto
End If 
oMsg.Body = messaggio
oMsg.IsBodyHtml = True
Dim oSmtp As New SmtpClient(SMTP, PORTA)
oSmtp.DeliveryMethod = SmtpDeliveryMethod.Network
Dim oCredential As New Net.NetworkCredential("username", "password")
oSmtp.UseDefaultCredentials = False
oSmtp.Credentials = oCredential
oSmtp.EnableSsl = True

If proxy <> "" Then
ORA COME FACCIO AD IMPOSTARE IL PROXY?
End If
oSmtp.Send(oMsg)
MsgBox("Message sent successfully", MsgBoxStyle.Information, "Info")
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Email error")
End Try
Me.Cursor = Cursors.Arrow
End Sub

[LeleFT]

Originariamente inviato da morpheus86
Buongiorno a tutti,

Ho ideato un programma per cucinare le ROM per Android [...]

Sarebbe a dire?

[morpheus86]

Non è questa la risposta che mi aspettavo..cmq:

http://www.androidiani.com/forum/sam...d-romcook.html

Aspetto suggerimenti al problema..

[rs9000]

anch'io ho il tuo stesso problema...
morpheus se sei riuscito a risolvere puoi scrivere come pls??

[morpheus86]

No mi dispiace...non riesco a trovare una soluzione..

[rs9000]

il problema è che in System.Net.Mail non c'è un componente "proxy" ...
se uso ad esempio il componente GoogleSearchService per cercare una cosa su google tramite proxy c'è il componente proxy e quindi basta scrivere

Dim cerca As New Google.GoogleSearchService
Dim prox As New System.Net.WebProxy("proxy", 80)
cerca.Proxy = prox

nella mail invece non c'è... se infatti scrivo ad esempio

Dim miamail As New MailMessage()
Dim prox As New System.Net.WebProxy("proxy", 80)
miamail.Proxy = prox

ottengo come errore che proxy non è un membro di mailMessage

please nessuno può aiutarci ???