Inviare una Mail in Visual Basic

[Cuuuurzel]

ciao a tutti, sto provando a fare un programma che mandi una mail al mio indirizzo...

Private Sub Form1_Load...........
Dim MailMittente As String = "mittente@hotmail.it"
Dim MailDestinatario As String = "destinatario@hotmail.it"
Dim oggetto As String = "oggetto"
Dim testo As String = "testo"

Call InviaMail(MailMittente, MailDestinatario, oggetto, testo)
End Sub

e in un modulo...
Public Sub InviaMail(ByVal MailMittente As String, ByVal MailDestinatario As String,
ByVal oggetto As String, ByVal testo As String)

Dim Msg As New System.Net.Mail.MailMessage(MailMittente, MailDestinatario,
oggetto, testo)

Dim Smtp As New System.Net.Mail.SmtpClient("smtp.nomeserver.it")
Smtp.Send(Msg)
End Sub


ho capito come funziona,
ma nn sò cosa devo mettere al posto di "smtp.nomeserver.it"
ho provato, cercando su internet con "smtp.gmail.com",
ma è "protetto" e mi da problemi.. che devo scrivere?

[kalosjo]

l'smtp è quello del tuo provider

Quindi se hai adsl alice sarà out.alice.it
Gli altri non me li ricordo.

Ma basta cercare su internet e li trovi.

[MdE2005]

Originariamente inviato da Cuuuurzel
ciao a tutti, sto provando a fare un programma che mandi una mail al mio indirizzo...

Private Sub Form1_Load...........
Dim MailMittente As String = "mittente@hotmail.it"
Dim MailDestinatario As String = "destinatario@hotmail.it"
Dim oggetto As String = "oggetto"
Dim testo As String = "testo"

Call InviaMail(MailMittente, MailDestinatario, oggetto, testo)
End Sub

e in un modulo...
Public Sub InviaMail(ByVal MailMittente As String, ByVal MailDestinatario As String,
ByVal oggetto As String, ByVal testo As String)

Dim Msg As New System.Net.Mail.MailMessage(MailMittente, MailDestinatario,
oggetto, testo)

Dim Smtp As New System.Net.Mail.SmtpClient("smtp.nomeserver.it")
Smtp.Send(Msg)
End Sub


ho capito come funziona,
ma nn sò cosa devo mettere al posto di "smtp.nomeserver.it"
ho provato, cercando su internet con "smtp.gmail.com",
ma è "protetto" e mi da problemi.. che devo scrivere?

Ti stai riferendo ovviamente alla versione .NET di VB.

Cosa intendi per "protetto" ? Che tipo di problemi riscontri?

Voglio solo anticiparti questo problema da me riscontrato tempo fa: avendo un collegamento AliceADSL, non posso leggere/scrivere mail di account diversi da Alice.

Rispondi alle domande e vediamo dove è il problema.

[Cuuuurzel]

l'errore è "il server indicato è protetto"
dopodichè ho capito che dovevo mettere anche la password e l'id dell'email del mittente

grazie a tutti comunque

[MdE2005]

In effetti prima di spedire occorre specificare le proprie credenziali:

Dim msgsmtp As New Mail.SmtpClient
Dim msg As New Mail.MailMessage

msg.From = New Mail.MailAddress(mia_mail)
msgsmtp.Credentials = New NetworkCredential(mia_mail, password)

Ciao

[Cuuuurzel]

si, il codice è quello