- iPhone topik
- Honor Magic6 Pro - kör közepén számok
- Azonnali mobilos kérdések órája
- Poco M8 Pro 5G gyorsteszt
- Apró változásokkal, elődjénél jobb áron kezd a Google Pixel 10a
- Mobil flották
- Google Pixel topik
- Megtartotta Európában a 7500 mAh-t az Oppo
- Apple iPhone Air - almacsutka
- Huawei Pura 80 Pro – a másik zsebbe
Új hozzászólás Aktív témák
-
manrick
tag
Sziasztok.
Adott a következő forrás:
private void button1_Click(object sender, EventArgs e)
{
// kapcsolódás
Chilkat.Imap imap = new Chilkat.Imap();
imap.UnlockComponent(''UnlockCode'');
imap.Connect(''név.domain.hu'');
imap.Login(''user'', ''pass'');
imap.SelectMailbox(''Inbox'');
if (imap.IsConnected())
{
textBox1.Text = (''Csatlakozva...'');
}
// levelek listázása
Chilkat.MessageSet msgSet;
msgSet = imap.Search(''ALL'', true);
Chilkat.EmailBundle bundle = new Chilkat.EmailBundle();
bundle = imap.FetchBundle(msgSet);
Chilkat.Email email;
listBox1.Items.Clear();
int i;
for (i=0; i<bundle.MessageCount; i++)
{
email = bundle.GetEmail(i);
listBox1.Items.Add(email.From + '': '' + email.Subject);
richTextBox1.Text = email.Body;
}
// XML-be mentés
bundle.SaveXml(''bundle.xml'');
imap.Disconnect();
}
Szépen működik is, a listBox1-be bekerülnek a levelek (feladó: tárgy)
A richTextBoxba pedig az utolsó levél szövege.
Azt szeretném elérni, hogy ha kattintok a listBoxban az egyik levélre, akkor azt mutassa a richTextBoxba.
Tudna nekem valaki segíteni?
Előre is köszi!
Manrick
Új hozzászólás Aktív témák
● ha kódot szúrsz be, használd a PROGRAMKÓD formázási funkciót!
- Proxmox VE
- iPhone topik
- Feltörték a regisztrációmat vagy elvesztettem a belépési emailcímet, 2FA-t
- BMW topik
- Honor Magic6 Pro - kör közepén számok
- Horgász topik
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Téli Olimpiai játékok Milano - Cortina 2026
- Azonnali mobilos kérdések órája
- Home server / házi szerver építése
- További aktív témák...
- Keresünk Galaxy S22/S22+/S22 Ultra
- GYÖNYÖRŰ iPhone 12 Pro Max 128GB Pacific Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3938
- GYÖNYÖRŰ iPhone 12 Mini 64GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS4516, 100% Akkumulátor
- BESZÁMÍTÁS! 1TB Samsung 980 M.2. NVMe SSD meghajtó garanciával hibátlan működéssel
- Samsung Evo 970 Plus 500GB Nvme SSD!
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest


