Re: item

Am Mon, 09 Jan 2006 18:43:16 GMT schrieb Paula:

Example for getting the first item from the drafts:

dim oMail as Outlook.MailItem
dim obj as object
with application.Session.GetdefaultFolder(olFolderDrafts).Items
if .count Then
Set obj=.Item(1)
If TypeOf obj is Outlook.MailItem Then
' Get a copy of the draft
Set oMail = obj.Copy
endif
endif
End with


--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook



> I send email through Word creating an outllok.object and i put as body
this
> routine
>
> Open txtFile For Input As #1
> Do While Not EOF(1)
> Line Input #1, cTemp
> ll = ll & cTemp & vbNewLine
> Loop
> Close #1
>
> with objItem
> .body = ll
> ....
> end with
>
> There is a way to use a saved messaged in drafts and reading it or
copying
> it
> instead of this code?
>
> tia, Paula
.

Relevant Pages

  • fw email
    ... Example for getting the first item from the drafts: ... dim oMail as Outlook.MailItem ... dim obj as object ...
    (microsoft.public.outlook.program_vba)
  • Re: Get address from body of message macro ?
    ... "Michael Bauer" wrote in message ... > Hi Stacy, ... > Dim oMail as Outlook.MailItem ... >> In other words open the mail message, click the macro and vola it ...
    (microsoft.public.outlook.program_vba)
  • Whether SSH2_MSG_IGNORE message is "ignored" in OpenSSH ??
    ... Whether SSH2_MSG_IGNORE message is ignored by OpenSSH Server? ... Drafts tells that this message should be ignored at all time (after receiving ... the protocol version)... ... Regards ...
    (comp.security.ssh)