MAPI - tvorba zprßv

NejjednoduÜÜφ cestou, jak vytvo°it a odeslat novou zprßvu je, ₧e veÜkerou Üpinavou prßci nechßte ud∞lat VßÜ defaultnφ poÜtovnφ program, nap°φklad takto:

Private Sub Form_Load()

   MAPISession1.SignOn

   MAPIMessages1.SessionID = MAPISession1.SessionID

   MAPIMessages1.Compose
   MAPIMessages1.Send True

   MAPISession1.SignOff

End Sub

Jist∞, je to velmi jednoduchΘ, ale p°ichßzφte o mo₧nost kontroly chovßnφ VaÜφ aplikace. Pokud chcete mφt kompletnφ kontrolu nad VaÜφ aplikacφ, pou₧ijte tento k≤d:

Private Sub Form_Load()

   MAPISession1.SignOn

   MAPIMessages1.SessionID = MAPISession1.SessionID

   MAPIMessages1.Compose
   MAPIMessages1.RecipAddress = "bozena@army.cz"
   MAPIMessages1.MsgSubject = "Tvoje strßnky jsou nejlepÜφ"
   MAPIMessages1.MsgNoteText = "Tv∙j serißl o MAPI je skuteΦn∞ u₧iteΦn²"

   MAPIMessages1.Send False

   MAPISession1.SignOff

End Sub

Tφm, ₧e zaÜlete metod∞ Send parametr False zabrßnφte tomu, aby zobrazil sv∙j formulß° pro sestavenφ novΘ zprßvy. Je t°eba si jen dßt pozor, aby RecipAddress byla korektnφ. Zkuste p°idat tento k≤d p°ed °ßdek s p°φkazem Send:

   MAPIMessages1.Show

Tato °ßdka zobrazφ Adresß°, tak₧e u₧ivatel si pak m∙₧e vybrat jednoho nebo vφce p°φjemc∙ zprßvy. Pokud nastavφte vlastnost AddressModifiable na True, pak m∙₧e u₧ivatel v adresß°i d∞lat ·pravy p°φjemcovi adresy.

Zp∞t DalÜφ

Autor: The Bozena