OKB-000264 | Private Benutzereigenschaften auslesen

Betrifft: ab orgAnice SQL

Frage:

Wie kann ich die privaten Benutzereigenschaften auslesen?

Lösung:

Public Sub ShowPrivatePropertyForAllUsers(psProperty As String)

'Zeigt den Wert der übergebenen privaten Benutzereigenschaft bei allen Benutzern

Dim usr As OrgDbServer31.User

Dim objConfig As New CConfig

For Each usr In Database.Users

Debug.Print usr.FullName, objConfig.ReadPrivateSetting(psProperty, , usr)

Next usr

End Sub

Public Sub ShowPrivatePropertyForAllUsers(psProperty As String)

'Zeigt den Wert der übergebenen privaten Benutzereigenschaft bei allen Benutzern

Dim usr As OrgDbServer31.User

Dim objConfig As New CConfig

For Each usr In Database.Users

Debug.Print usr.FullName, objConfig.ReadPrivateSetting(psProperty, , usr)

Next usr

End Sub

Was this helpful?

1 / 0