Domino 9 und frühere Versionen > ND9: Entwicklung

Mailkonfiguration auslesen

<< < (2/2)

Legolas:
Hallo Bernhard,

jetzt bin ich völlig verwirrt!
Laut Doku soll es ja das 28 Bit sein.
Wie können dann die folgenden Werte gespeichert werden?


Grüße
Bernd

koehlerbv:
Achtung, Bernd: Es gibt keine Doku (ganz im Gegenteil: IBM lehnt diese ab), sondern nur ältere Reverse-Engineering-Ergebnisse.

Bernhard

Legolas:
Ok Bernhard,

gibt es vielleicht sonst noch eine Workaround um die Einstellungen vom Notescouent auslesen zu können?

Grüße
Bernd

Tode:
Zunächst Mal hat Bernhard natürlich recht, was die Geschichte von wegen "Doku" angeht. In Deinem Fall ist es aber so, dass man die Doku nur "richtig" lesen muss (hatte ich auch nicht gemacht):

Beim Bit 11 steht "see 28". Und das kann ich bestätigen:
Man muss auf jeden Fall "von hinten" zählen, und wenn man zu wenige Bits hat, dann mit Nullen auffüllen.

"Always keep" ist in dem Fall: 28.Bit 0 und 11. Bit 1:
00000000000000100110001110001

Bei never sind beide Bits null:
00000000000000100010001110001

Und bei Ask ist das vordere 1:
10000000000000100010001110001

Technisch ist die Abfrage also ziemlich einfach, man kann das Ganze per AND rausfinden:


--- Code: ---Dim ses as New NotesSession
Dim lngPreferences as Long
Dim isAsk as Boolean
Dim isSave as Boolean
lngPreferences = Clng( ses.GetEnvironmentString( "Preferences", True ) )
isAsk = ((lngPreferences AND 2^28)=2^28)
isSave = ((lngPreferences AND 2^11)=2^11)
msgbox isAsk
msgbox isSave
--- Ende Code ---

Legolas:
Hi Torsten,

spätestens jetzt hast Du dir dein Bier redlich vedient!

Danke
Bernd

Navigation

[0] Themen-Index

[*] Vorherige Sete