Insert text???? Please Help!

[WorkHorse]

Can I get an example of how to insert text in an open Outlook reply window? Pretty, pretty, please.

[WorkHorse]

OK, here's what I came up with:

Private Sub UpdateMailReply()
    
    'Add text to the top-most Outlook message window.
 
    Dim objOutlook As Outlook.Application
    Dim objOutlookInspector As Outlook.Inspector
    Dim objOutlookAttach As Outlook.Attachment
    
    'Create the Outlook session.
    Set objOutlook = CreateObject("Outlook.Application")
 
    'Get the top-most message window.
    Set objOutlookInspector = objOutlook.ActiveInspector
 
    'Add text to the message.
    objOutlookInspector.CurrentItem.Body = "Hello World!" & objOutlookInspector.CurrentItem.Body
 
    'Add attachment to the message.
    Set objOutlookAttach = objOutlookInspector.CurrentItem.Attachments.Add("C:\MyTextDoc.txt", 1)
    
    Set objOutlook = Nothing
End Sub

But that kills all the pictures and formatting in the message and replaces it with straight text. Isn't there a way to just add text to the body without replacing the entire body? Or better yet, can I insert a file as text? Outlook lets you do this, but I couldn't find any InsertText method or something to use in VB.

[WorkHorse]

*BUMP*

Anyone? Insert file text or add text to outlook reply without changing body format. Anyone? Please!

[3MeMoS]

sorry dont know

[WorkHorse]

Anyone know anywhere where I might even be able to find a clue to the answer? or something close? or anything?

I can't believe this is this hard. Nobody seems to know how to do this. Is this impossible? Doesn't a mail item have a range or something? This has to be possible. I really need this. Anyone?

[mendhak]

This is just a hunch, don't rely on me.

Try getting the handle on the Open Outlook Window,
go through your API Text Viewer, there must be some function for adding text to an open window.

It's just a hunch. I'm a mid-newbie thing guy.

[WorkHorse]

I wrote a stupid workaround that works for now, but I will find the answer someday, someday.