Uso del costrutto Select Case

[Napster]

Salve a tutti, sto creando un mail sender che manda mail attraverso le winsock. Per far mandare i comandi al server uno dopo l'altro ho sentito che si usa "Select Case" ma nn ho capito bene come usarlo e come far capire al programma che inoltre deve parlare al server dopo aver ricevuto una risposta dallo stesso...

[hkproj]

non è necessario il winsock in vb.net, cè il namespace System.Web.Mail (non sono sicuro che fosse così)
Ciao

[Napster]

si lo sò...però lo voglio fare più manuale...ho studiato un pò il select Case e ho scritto questo pezzo di codice :

Private Sub SendMail()
        Dim SendStat As Integer
        Select Case SendStat
            Case 0 : wsk.Connect("mail.tin.it", "25")
            Case 1 : wsk.SendData("Helo default" & vbCrLf)
            Case 2 : wsk.SendData("Mail from: <" & Mittente.Text & ">" & vbCrLf)
            Case 3 : wsk.SendData("Rcpt to: <" & Destinatario.Text & ">" & vbCrLf)
            Case 4 : wsk.SendData("data" & vbCrLf)
            Case 5 : wsk.SendData("Date: " & Today & " " & TimeOfDay & vbCrLf & "MIME-Version: 1.0" & vbCrLf & "Content-Type: text/plain; charset=iso-8859-1; format=flowed" & vbCrLf & "From: <" & Mittente.Text & ">" & vbCrLf & "To: <" & Destinatario.Text & ">" & vbCrLf & "Subject: " & Soggetto.Text & vbCrLf & vbCrLf & Messaggio.Text & vbCrLf & vbCrLf & "." & vbCrLf)
            Case 6 : wsk.CloseWinsock()
        End Select
        SendStat = SendStat + 1
    End Sub

ma per inviare la mail devo cliccare per 6 volte sul bottone invia...

[alka]

Una domanda: hai capito come si usa il costrutto Select...Case? o stai forzando il costrutto a funzionare così come tu pensi che debba essere?

[motogpdesmo16]

come diceva giustamente hkproj in vb.net esiste il namespace System.web.mail.smtpmail.
Anche io l'ho usato e devo dire che funziona benissimo.

 System.Web.Mail.SmtpMail.SmtpServer = "mail.tin.it"
    System.Web.Mail.SmtpMail.Send(mittente, destinatario, oggetto, testo)

Il metodo send è parametrico (e ti ho indicato i parametri) mentre smtpserver devi valorizzarlo con il tuo server smtp.

personalmente non vedo la necessità di utilizzare il costrutto "selectcase...end select" anche perchè, a dirla tutta, non ho capito cosa intendi fare....