Newsgroup: it.comp.lang.visual-basic
Titolo: Winsock (perfavore aiutatemi)

Mi spieghereste perfavore dove sbaglio, xchè non riesco proprio ad inviare
nessuna E-MAIL con questo codice.
Private Sub Command1_Click()
With ws
.SendData ("HELO 
tin.it
" & vbCrLf)
.SendData ("MAIL From: mia e-mail" & vbCrLf)
.SendData ("RCPT TO: sua e-mail" & vbCrLf)
.SendData ("DATA")
.SendData ("PROOOOOOOOOOOVA")
End With
End Sub
Private Sub Form_Load()
With ws
.RemoteHost = "
mail.tin.it
"
.RemotePort = 25
.Connect
End With
End Sub
GRAZIE 1000 per l'interesse

 nessuna E-MAIL con questo codice.
Il problema può risiedere in diverse cose:
Innanzitutto tu saluti con HELO, mentre alcuni server vogliono essere
salutati con EHLO.
Poi non sai se ogni comando viene accettato o meno, ed inizi a spedire prima
di avere avuto l'OK.
Poi non vedo la terminazione del messaggio (puntoacapopunto), che indica al
server che hai finito.
Se hai studiato le RFC del protocollo SMTP, saprai che ad ogni tuo comando
deve sempre corrispondere un messaggio di risposta.
Se il messaggio che torna è un codice 2, tutto bene, puoi andare con il
comando successivo, se è un codice 3 il server ti sollecita ad inviare i
dati, se è un codice 5 c'è un errore.
La cosa più semplice è imparare aprendo una sessione telnet sulla porta 25
del server, da finestra dos.
Infine, come ultima possibilità di errore, considera che tin accetta e-Mail
solo da IP di Tin stessa, quindi se sei collegato con Libero o Tiscali non
riuscirai mai ad ottenere l'OK dal server SMTP.
Ciao
Alberto

 Mi spieghereste perfavore dove sbaglio, xchč non riesco proprio ad inviare

Allora ,il protocollo SMTP prevede che da parte del CLIENT ci sia una
richiesta e una relativa risposta dal SERVER,risposta che tu non aspetti.
Prima di tutto devi darti una bella letta all'RFC riguardante il protocollo
SMTP
A grandi linee funziona cosě:
HELO <server>  oppure  EHLO <server> , comunque HELO č standard da quando
esiste il protocollo SMTP e praticamente tutti i server lo utilizzano
MAIL FROM:<tuoindirizzo>
RCPT TO:<indirizzo>
DATA
data
<crlf>
.
<crlf>
la sequenza finale dopo DATA permette al server di capire che č finita
l'immissione del messaggio e quindi lo puň inviare.
Fai delle prove con telnet e vedi come funziona.
Ricorda che all'interno di DATA vengono specificati tutti i parametri
relativi al SUBJECT all'ora di arrivo etc. etc. ,comunque trovi tutto
sull'RFC 0821 relativo ( lo trovi su 
ftp://ftp.isi.edu/in-notes/rfc821.txt
).
Inoltre, ricorda che non puoi inviare mail tramite i server SMTP di
libero,iol etc se non sei connesso tramite i loro pop e invii utilizzando
una mail libero o iol.
Se tutto questo ti serve per mandare mail anonime forse stai sprecando tempo
e ti consiglio di leggere Kriptonite 
www.ecn.org/kriptonite
, altrimenti puoi
cercare qualche pezzo di codice su 
www.planetsourcecode.com
Ciao
Fabio

 ha scritto nel messaggio
news:aibm6a$gro$1...@fe1.cs.interbusiness.it...


 GRAZIE ANCORA
già che ci sei.. studia anche un po' il quoting... :-|
Stefano
--
che differenza c'è tra windows e linux?
Piu' o meno quella che passa tra un Water e una vasca da bagno.
In entrambi ti ci puoi sciaquare, entrambi sono sanitari, entrambi
sono in ceramica ma in uno solo dei due ci devi cacare. (cit. Lup Man)