How do I "Highlight All" and then "Save to Clipboard" in MS Word?

[teiferma]

I am trying to write a script that will run on a form in MS Word. The script will select the entire document and save it to the clipboard. Then it will open Outlook Web Access, open a new message and paste the document into the message.

I can't get the "Send" command to work in MS Word. Should I be using the Send command or some other? Please give me all the help you can, I've never scripted before.

I am using the cursor control in Outlook Web Access to open a new message. Is there another way to do this?

Thanks, Ted Eiferman

teiferma@paulsboro.k12.nj.us

[Locodarwin]

I am trying to write a script that will run on a form in MS Word. The script will select the entire document and save it to the clipboard. Then it will open Outlook Web Access, open a new message and paste the document into the message.

I can't get the "Send" command to work in MS Word. Should I be using the Send command or some other? Please give me all the help you can, I've never scripted before.

I am using the cursor control in Outlook Web Access to open a new message. Is there another way to do this?

Thanks, Ted Eiferman

teiferma@paulsboro.k12.nj.us

I can answer the first part. Here's the solution using a bit of COM:

$sFilePath = "C:\Doc.doc"   ; path to the document you want to copy from

; Create COM object
$oWord = ObjCreate("Word.Application")

; Open the specified document
$oWord.Documents.Open($sFilePath)

; Make visible (optional!)
$oWord.Visible = 1

; Copy entire thing to clipboard
$oWord.Activedocument.Select
$oWord.Selection.Copy

; Put clipboard into variable
$sText = ClipGet()

; Switch to window you want to copy to
WinActivate("Untitled - Notepad")  ; or whatever

; Send variable contents to it
Send($sText)

As for how to control Outlook Web Access directly, perhaps someone else has an idea. This should give you the gist of the process, though.

-S