OpenOffice.info

RobertG hat geschrieben: Ich habe das gerade einmal in einer Testdatenbank laufen lassen. Natürlich wird der Username erst geschrieben, wenn abgespeichert wird - weil Du ja "Vor der Datensatzaktion" geschrieben hast. Gehe ich also zurück zu dem Datensatz, so steht dort mein Nutzername (der, wie ich ja jetzt weiß, unter Linux dann einfach über "USER" zu erreichen ist).

Jetzt kommt es natürlich auf die folgenden Komponenten an:
- Die Variablen sind bisher nicht definiert worden. Wenn Du irgendwo "option explicit" in den Makros angegeben hast funktioniert das Makro entsprechend nicht. Muss also mit "DIM oDoc AS OBJECT" usw. nachgebessert werden.

- Du hast vorher noch gar keine Makros verwandt und eventuell die Makrosicherheit noch so eingestellt, dass Makros grundsätzlich nicht ausgeführt werden. Einstellbar ist die Sicherheit unter Extras → Optionen → OpenOffice → Sicherheit → Makrosicherheit (Muss auf Mittel eingestellt sein, damit Du wenigstens gefragt wirst, ob Makros ausgeführt werden; ich gebe einen Pfad an, der als Vertrauenswürdige Quelle angesehen werden soll)
- Du hast in dem Dokument noch keine Makros stehen gehabt. Dies war also das erste Makro. Dann kann ja die Sicherheitsabfrage noch nicht gekommen sein. Folglich sind die Makros erst einmal deaktiviert, bis das Dokument einmal geschlossen und anschließend wieder aufgerufen wurde.

Hast Du denn irgendwelche Fehlermeldungen? Willst Du den Eintrag vor dem Abspeichern sehen (dann besser an ein Feld binden, in dem eine Eingabe erfolgen soll - dort mit Fokusverlust koppeln ...)?

F3K Total hat geschrieben: ich würde es mal mit "Nach der Datensatzaktion" (Änderung) versuchen.

SUB Benutzername_einfuegen
oDoc=thisComponent
oDrawpage=oDoc.Drawpage
REM Lage des Feldes in dem entsprechenden Formular aufsuchen
oForm=oDrawpage.Forms.getByName("TAGEBUCH.FUS")
oFeld=oForm.getByName("Benutzer")
oFeld.BoundField.updateString(Environ("USERNAME"))
END SUB

Blackavar hat geschrieben: Ich habe das Makro dem "Vor der Datensatzaktion" zugewiesen, es schein aber nicht zu funktionieren.

RobertG hat geschrieben:Am besten gehst Du folgendermaßen vor:

Code: Alles auswählen

SUB Benutzername_einfuegen
oDoc=thisComponent
oDrawpage=oDoc.Drawpage
REM Lage des Feldes in dem entsprechenden Formular aufsuchen
oForm=oDrawpage.Forms.getByName("NameFormular")
oFeld=oForm.getByName("NameFeld")
oFeld.BoundField.updateString(Environ("USERNAME"))
END SUB

Das Feld ist das, was den Usernamen aufnehmen soll. Das Makro lässt Du bei jedem neu gegründeten Datensatz ablaufen - oder sobald ein Feld in einem neuen Datensatz den Focus verliert, damit nicht jeder neue Datensatz sofort mit dem Usernamen beschrieben wird.

F3K Total hat geschrieben: vielleicht liege ich völlig daneben, aber ich kann meinen Usernamen unter W7 so auslesen:

Code: Alles auswählen

function f_getuser as string
f_getuser = Environ("USERNAME")
end function

Sub showUser
msgbox f_getuser
end sub

Gast hat geschrieben:Ich nehme an, dass die Datenbank nur mit den Rechten eines Users genutzt wird und damit der Trigger immer nur brav den entsprechenden Namen nutzen würde.

Gast hat geschrieben:Praktischer wäre da ein Listfeld mit allen Nutzernamen im Hauptformular - eventuell auch als Tabellenkontrollfeld. Der User wählt seinen Namen, der dann anschließend in alle Datensätze des Subformulars übertragen wird. Setzt natürlich voraus, dass niemand einem anderen etwas unterschieben will.

Blackavar hat geschrieben:für eine MySQL-Datenbank