Domino 9 und frühere Versionen > Entwicklung

Wordexport

<< < (3/4) > >>

Don Pasquale:
aber klar probier mal das,
aber gib nicht wieder gleich auf nur weil
mal ein fehler kommt :-)

Dim uiws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim session As New NotesSession
Dim doc As NotesDocument
 
Set uidoc = uiws.CurrentDocument
Set doc = uidoc.Document

Dim s As New notessession
'Dim todaydate As New notesdatetime("Today")

Dim word As Variant
Dim worddoc As Variant
Dim orderid As String


orderid = uidoc.fieldgettext("deinfeldname")


Set word = CreateObject("Word.Application") 'Create Word object
Call word.documents.add("Return and Uplift.dot") 'Create a new document based on the template "Return and Uplift.Dot"
Set worddoc = word.activedocument 'Get a handle for the active document

'Assign the field values:
worddoc.FormFields(2).result = orderid

MartinG:
 :)    -    Don Pasquale Du bist der beste!!!

Jetzt funktionierts absolut perfekt... - vielen Dank. Sorry wenn ich mich etwas dämlich anstelle. Habe auch bei Deinem Script sicherlich eine Stunde rumgemacht bin aber einfach nicht weitergekommen.  

:) :) :) :) :)

wflamme:
@martin,
kannst auch mal hier gucken:
http://www.sns1.de/partner/flamme/wflamme.nsf/WordInterface1

ata:
@wflamme

... sorry, der Link geht bei mir nicht...

ata

Don Pasquale:
try this

http://www.sns1.de/partner/flamme/wflamme.nsf/Shortcut/WordInterface1

ciao
Don Pasquale

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete