Hi Karen,
I'm glad that it might help you in your work.
However, if you want to work with _cliptext this sample might be better:
CopyDoc2Clip(GETFILE())
FUNCTION CopyDoc2Clip as Boolean
LPARAMETERS pcFile as String
LOCAL loWord as Object, llReturn as Boolean
llReturn = .F.
IF FILE(pcFile)
TRY
loWord = CREATEOBJECT([Word.Application])
loWord.documents.open(pcFile)
loWord.ActiveDocument.Content.Copy
loWord.quit
loWord = .null.
RELEASE loWord
llReturn = .T.
CATCH
ENDTRY
ENDIF
RETURN llReturn
ENDFUNC
Best Regards
-Tom
Debugging is twice as hard as writing the code in the first place.
Therefore, if you write the code as cleverly as possible, you are,
by definition, not smart enough to debug it.
Oh, and BTW: 010101100100011001010000011110000101001001101111011000110110101101110011