Delphi mondială - de procesare a mesajelor folosind delphi
Procesarea corespondenței cu Delphi
Aplicația procesează valorile câmpurilor și le înregistrează în baza de date Access, în cazul în care câmpurile au același nume ca și cea a matriței. Astfel, datele stocate pe calculator în birou și au fost ascunse de pe Internet - hackeri.
Această aplicație poate scrie pe aproape orice disponibile pentru tine limba. Vă sugerez să ia în considerare o astfel de cerere în Delphi și a discuta despre principiile programului. Pentru protocoalele Internet in sectiunea Delphi Componenta Paletă este destinat Fastnet. Fastnet
Pentru a primi e-mail, avem nevoie de protocolul POP3 (Post Office Protocol - Version3) pentru acest protocol este rezervat 110 de port, componenta corespunzătoare din secțiunea Fastnet - NMPOP3.
Cu NMPOP3 poate: conecta la server, trimite auntifikatsionnuyu informații către server pentru a obține informații despre o cutie poștală (număr de litere, dimensiune) pentru a primi mesaje de la server, ștergeți mesaje.
Principiul dialogului cu serverul de protocol POP3 este format din trei etape: stabilirea unei conexiuni (auntifikatsiya), citiți lista de e-mail și selectând litera dorită, încheierea conexiunii. protocol pentru a lucra cu serverul trebuie să știți, deoarece oferă ample oportunități nu numai pentru programatori, dar, de asemenea, pentru utilizatori. Am de multe ori a avut scrisoarea de dimensiuni incredibile, au un număr mare de imagini. După zece minute de Outlook Express doar se blochează. A trebuit să ștergeți corespondență, efectuarea de dialog cu serverul POP3 înscriindu-l prin telnet la portul 110.
Luați în considerare dialogul cu serverul de protocol POP3.
După conectarea la serverul de e-mail, a emis un șir de felicitare + serverul POP3 OK gata. Utilizatorul trimite o comandă de conectare de conectare de utilizator și parola parola TRECERE. Dacă datele de autentificare și parola sunt introduse corect, puteți începe navigarea pe e-mail.
Comanda LIST, puteți vedea cât de multe scrisori pentru tine si este dimensiunea literelor. Răspunsul serverului este după cum urmează:
Utilizator: LIST
Server: + OK 2 mesaje (400) octets
Server: 1250
Server: 2150
Acest mesaj afirmă că serverul este de două posturi ridica la 400 bytes, primul mesaj de 250 de octeți, a doua -150 octeți. Dacă doriți să vedeți dimensiunea unei anumite litere, cum ar fi al cincilea trebuie să fie trimise la lista de comandă serverului 5. Ca rezultat, terminalul va afișa Server: + OK 2 200. În cazul în care o scrisoare cu acest număr nu există apare eroare
Server: -ERR nici un astfel de mesaj, doar 2 mesaje în maildrop.
Această eroare indică faptul că serverul este doar două litere. Pentru a obține o scrisoare de la server folosind m comanda RETR, unde m - numărul scrisorii. În cazul în care scrisoarea este prea lung, nu se poate citi complet, și numai primele n - liniile acestei scrisori, este o echipa TOP msg n. Pentru eliminarea litere servește m comanda DEL. Dacă mesajul este șters, mesajul mesajul + OK 1 șters, dacă nu există o scrisoare cu numărul de server-ul va returna o eroare -ERR nici un astfel de mesaj. procesarea corespondenței complete și a ieși din fereastra de dialog, puteți comanda QUIT. Mai protocol este descris în RFC1081 și RFC 1460.
De exemplu nostru, aveți nevoie de o cutie poștală, să-l pe Internet nu va fi deosebit de dificil. Să luăm, de exemplu, un cont de e-mail gratuit pe serverul www.rambler.ru .Server mail de ieșire de pe Rambler mail.rambler.ru (o puteți găsi cu ușurință de la administratorul de server sau pe server), va trebui să se conecteze la protocolul POP3. Deci, să începem.
Pentru a face acest lucru, avem nevoie de a programa butonul Button1 de pe următorul algoritm:
Procedura TForm1.Button1Click (Expeditor: TObject);
începe
NMPOP31.Connect;
NMPOP31.GetMailMessage (1);
Edit1.Text: = NMPOP31.MailMessage.Subject;
Memo1.Lines: = NMPOP31.MailMessage.Body;
NMPOP31.Disconnect;
se încheie;
Și alte domenii, dintre care mai pot fi citite în RFC 822 documente.
Având în vedere cele de mai sus, putem considera dialogul server cu datele de intrare de utilizator după echipă:
Utilizator: De la: "Test"
Utilizator: La: „nou“
Utilizator: Subiect: Verificarea
utilizator:
Utilizator: Buna ziua! Acesta este un mesaj de test
Utilizator: Pa!