Openoffice 3.3 Writer, Drucken, VB6

[Bullseye76]

Hallo zusammen,

ich möchte gerne eine Dokument per VB6 2 mal drucken. Das öffnen und befüllen des Dokumentes habe ich hin bekommen, aber das 2 mal drucken nicht. Er druckt mir das Dokument immer nur 1 mal aus.

Code: Alles auswählen

Dim arg(0) As Object
Set arg(0) = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
arg(0).Name = "Copies"
arg(0).Value = 2
CallByName oDoc, "print", VbMethod, arg()

Was mache ich falsch oder fehlt da noch was?

Edit:
Gibt es da irgendwelche Verweise die ich erst noch setzen muß um die OOo API benutzen zu können?

Gruß
Heiko