Domino 9 und frühere Versionen > ND8: Administration & Userprobleme

Webzugriff zeitlich beschränken?

<< < (2/2)

atbits:
Wenn Du den Weg über das Setzen des Passwortes gehts, dann solltest Du in jedem Fall ein Zufalsspasswort wählen.

Sonst bringt dich vermutlich Euer Datenschutzbeauftragter persönlich in der Hölle vorbei ;-)

Grüße David

fuppy:
ascagb's Vorschlag hört sich sehr gut an. So würde sich das wirklich gut realisieren lassen. Einfach dann bei den gefundenen Personendokumenten das Internet PW löschen und schon ist der Zugriff "gesperrt"

Danke für die Denkanstöße! :)

Gruß
fuppy

ascabg:
Hier noch ein kleiner weiterer Denkanstoss.


--- Code: ---Sub Initialize

Dim s As New NotesSession
Dim db As NotesDatabase
Dim vw As NotesView
Dim doc As NotesDocument

Dim varRc As Variant
Dim strSearch As String
strSearch = |@Date(@Certificate([Expiration]; Certificate))|

'Set db = s.CurrentDatabase
If Not db.IsOpen Then Exit Sub

Set vw = db.GetView("People")
If vw Is Nothing Then Exit Sub

Set doc = vw.GetFirstDocument
Do While Not (doc Is Nothing)

varRc = Evaluate(strSearch, doc)

// hier nun Dein Vergleich mit aktuellem Datum und varRc

Set doc = vw.GetNextDocument(doc)

Loop

End Sub

--- Ende Code ---


Andreas

fuppy:
Danke!
Jetzt juckt es mir schon in den Fingern den Designer zu starten  ;)

Vielen vielen Dank nochmal!

Navigation

[0] Themen-Index

[*] Vorherige Sete

Zur normalen Ansicht wechseln