Hi Tom

Actually i have been looking for something like this and have some great places to use it in my program - thanks a lot.

k

>Hi Karen,
>
>I did this once with CTRL+A and CTRL+C over WSH. Not elegant but it did the job :-)
>
>

>#DEFINE WSNORMAL 1
>WshShell = CreateObject([wscript.Shell])
>* Winword normal startenl
>WshShell.Run([WinWord],WSNORMAL)
>* CTRL+a
>WshShell.SendKeys([^a])
>* STRG+c
>WshShell.SendKeys([^c])
>* ALT+F4
>WshShell.SendKeys([%{F4}])
>* Now everything is to be found in _cliptext
>?_cliptext
>

>
>>I would like to convert .doc into plain text - i have opened the doc - how can i transfer the text to my m.txt file? Perhaps there is a more direct route than the one i have started.
>>
>>many thanks
>>k
>>
>>

>>objWord = CreateObject("Word.Application")
>>objWord.Documents.Open ("C:\mydirectory\mydata.doc")
>>objWord.visible = .F.
>>
>>??? move text to m.txt
>>
>>modify file m.txt
>>