Hi,
noch was : Speichern des Dokumetes nicht vergessen, bei Nutzung von Apprentice bietet sich hier die "flush to file" Methode an.
Beispiel :
' Vars für Apprentice
Dim oA As New ApprenticeServerComponent
Dim oADoc As ApprenticeServerDocument
Dim oPsets As PropertySets
Dim DocFullFilename as string
'***** init Apprentice
Set oADoc = oA.Open(DocFullFilename)
Set oPsets = oADoc.PropertySets
'**** Set Property values..
'**** Save the Props in inventordoc
oPsets.FlushToFile
Frohes Schaffen noch,
Thomas
------------------
Thomas Sch
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP