ich habe ein Codeschnipsel schon gefunden, um die Benutzerdaten (Extras-Optionen-Benutzerdaten) auszulesen. Leider ist dieses Property schreibgeschützt, so dass ich es nicht verändern kann. Auch XRAY gab mir da keinen Anhaltspunkt und meinte auch "read-only". Gibt es vieleicht noch eine andere Möglichkeit, an diese Infos zu kommen, wo man auch schreiben kann?
sub testscripte_userinfolesen
Dim regval(0) as new com.sun.star.beans.PropertyValue
userdaten = createUnoService("com.sun.star.configuration.ConfigurationProvider")
regval(0).Name = "nodepath"
regval(0).Value = "org.openoffice.UserProfile/Data"
benutzerdaten = userdaten.createInstanceWithArguments("com.sun.star.configuration.ConfigurationAccess", regval())
msgbox benutzerdaten.sn
xray benutzerdaten
benutzerdaten.sn = "neuer Nachname" ' Hier knallt es
end sub
PS: Verwende OO 2.3 unter Windows.
Wie richtet man einen Betrieb zu Grunde?
mit Frauen - das ist am Schönsten
mit Spielen - das geht am Schnellsten
mit Computern - das ist am Sichersten
Die Steigerung sind dann die spielenden Frauen am Computer....
danke, ein bischen weiter ist man mit "ConfigurationUpdateAccess" da man tatsächlich Schreibzugriff auf die Struktur "benutzerdaten" bekommt. Dort kann man schreiben und diese Änderung auch wieder auslesen. Leider wird das (noch) nicht in die Konfiguration zurückgeschrieben, so dass bei einem erneuten Start des Makros wieder der urspüngliche Wert gezogen wird. Vielleicht gibt es da noch eine Methode zum Zurückschreiben?
