VFP and WordAutomation

[Charly Pruemm]

Hallo,

ich möchte den aus VFP erzeugten _CLIPTEXT (darin steht eine Anschrift)
direkt in das Worddokument stellen (ohne manuelles STRG+V)

IN VFP:

_Cliptext='Fachbetrieb'+CHR(13)+cBetrieb+CHR(13) ;
+ cAdrZusatz+CHR(13) ;
+ cStrasse+CHR(13)+CHR(13) ;
+ cPLZORT

dann Wordaufruf:

Local oWord as Word.application

oWord=CREATEOBJECT("Word.Application")
oWord.visible=.T.
oWord.windowstate=0
oWord.Documents.Add
oWord.Activate
*** jetzt Cliptext einkopieren.. was soll dafür hier rein? ****
oWord.ScreenRefresh

Gruss
CHARLY

[Ralph Esters]

Hallo Charly,

bei mir klappts mit oWord.Selection.paste

Damit wird die gefüllte Zwischenablage eingefügt.

Viel Spass mit

--
Schöne Grüße aus dem sonnigen Schwarzwald

Ralph

(aktuell VFP9_SP1 unter XP_SP1 und XP_SP2)

"Charly Pruemm" <kpr...@t-online.de> schrieb im Newsbeitrag
news:e6e4p9$2u1$02$1...@news.t-online.com...

[Olaf Doschke]

Hi Charly,

wozu überhaupt erst in _Cliptext schreiben, und dann der Paste()-Aufruf?

oWord=CREATEOBJECT("Word.Application")
oWord.Documents.Add
oWord.ActiveDocument.Range.InsertAfter("Adresse hier einfügen")
oWord.visible=.T.
oWord.windowstate=0
oWord.Activate

Oder an einer Textmarke einfügen, oder, oder, oder....

Das einzige, woran Foxpro oder OLE manchmal scheitert, ist Ausdrücke
als Methodenparameter. Man setzt also den Text vorher in einer Variable
zusammen und nimmt die Variable als InsertAfter()-Parameter:

lcText = "Adresse hier einfügen"
...
...InsertAfter(lcText)
...

Wenn es irgendeinen Sinn haben soll, die eingefügte Adresse gleich auch
in der Zwischenablage zu haben, kann diese Variable auch _cliptext sein,
dann kann sich der User STRG+A, STRG+C noch sparen, okay. Aber
im allgemeinen will man ja nicht unbedingt über den Kanal Zwischenlage
arbeiten, wenn man nicht muß, oder?

Tschüß, Olaf.