Probleme email avec winsock
Bonjour
Je suis débutant en visual basic, et je viens à peine quelques heures de connaitre l'existance de winsock (j'insiste la dessus pour vous dire que je suis débutant)
Je souhaite faire un prog de mail, envoyer et recevoir.
J'ai aucun probleme à envoyer un email avec winsock mais j'ai des problemes a les recevoir, car lorsque je fais
Après avoir entré tous les paramètres de connexion, j'arrive au probleme, la ou je récupere le nombre de messages normalement
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
Dim nextSend As Boolean
Dim answer As String
Dim nbrecept As Long
Dim tmp As String
Winsock.LocalPort = 0
Winsock.Protocol = MSWinsockLib.ProtocolConstants.sckTCPProtocol
Winsock.Connect("pop.monSite.fr", 110)
Winsock.SendData("USER login" & vbCrLf)
Winsock.SendData("PASS mdp" & vbCrLf)
Winsock.SendData("LIST" & vbCrLf)
Dim data As String
Winsock.GetData(data, vbString, 500)
MsgBox(data.ToString())
Winsock.Close() |
alors la j'obtiens pour la msgbox(data.ToString())
http://img181.imageshack.us/img181/26/sanstitrfemf3.jpg
Bref je vois pas comment récuperer le nombre de nouveaux emails, et ca autant avec le serveur de ma fac, avec free et avec neuf
Aidez moi:)
Merci
