Thanks, that works great in selecting the page, but it does not copy to clipboard <s>

tried
oWord.Activedocument.Range(lnStart,lnEnd).Selection.copy()

but that reports an error that selection is not an object or such


Peter

>Something like this:
>

>=YSelectOnePage(4)  && paste text from page 4 into the text file c:\hi.txt
>
>Procedure YSelectOnePage
>lParameter pnPage
>oWord = Getobject(,"Word.Application")
>lnPageCount=oWord.ActiveDocument.ComputeStatistics(2)
>with oWord.Selection
>	if lnPageCount<pnPage
&gt;		* error message go here
&gt;	else
&gt;		.GoTo(,,,pnPage)
&gt;		lnStart=.Range.Start
&gt;		if lnPageCount >pnPage
>			.GoToNext(1)
>			lnEnd=.Range.Start - 1
>		else
>			.Endkey(6)
>			lnEnd=.Range.Start
>		endif
>		oWord.Activedocument.Range(lnStart,lnEnd).Select
>		>                =strtofile(_cliptext,"c:\hi.txt")
>				>	endif
>endwith
>
>oWord=.NULL.
>release oWord
>

>
>
>>I need to read a word document one page at a time
>>
>>How can I retrieve a word page into the clipboard so I can paste it into another application?
>>
>>
>>Thanks
>>
>>
>>Peter