Ciao e buon natale a tutti!
Sto cercando di implementare un client di posta con vb.net importando system.net. Posto il codice.
--Code
Private Sub btnMail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMail.Click
Dim connesso As Boolean
Dim serverString As String
Dim sckStreamSocket As Net.Sockets.NetworkStream
Dim sckStream As Net.Sockets.NetworkStream
Dim sckTcpClient As New Net.Sockets.TcpClient
'dichiaro la matrice di byte
Dim byteServer(sckTcpClient.ReceiveBufferSize) As Byte
sckTcpClient.Connect("pop3.safosistemi.it", 110)
sckStreamSocket = sckTcpClient.GetStream
'leggo l'array di byte che mi restituisce il server
sckStream.Read(byteServer, 0, byteServer.Length)
'ricavo la risposta del server
serverString = System.Text.Encoding.ASCII.GetString(byteServer)
'controllo le prime tre letter del messaggio
'se sono +OK l'operazione è stata eseguita con successo
If Left(serverString, 3) = "+OK" Then
connesso = True
Else
connesso = False
Response.Write("Connessione fallita!")
End If
End Sub
Code--
mi da errore alla riga
sckStream.Read(byteServer, 0, byteServer.Length)
come mai?
Grazie

Rispondi quotando