Inputbox-Eingabe verschlüsseln

[KiTaMann]

Hallo @ All,

gibt es eine Möglichkeit, die Eingabe in eine Inputbox zu verschlüsseln, also etwa analog dem "Kennwortfeld"?

Danke!

Klaus

[koehlerbv]

Nein, Inputbox sieht das nicht vor. Du musst also auf eine Dialagbox ausweichen, um wieder zum Kennwortfeld zu kommen.

Bernhard

[KiTaMann]

... habe ich befürchtet   

Danke Dir, Bernhard

[LN4ever]

Was möchtest du ?

1. Eingabe nicht sichtbar. geht mit workspace.prompt(PROMPT_PASSWORD, ... )

Beispiel:
This PROMPT_PASSWORD example displays a dialog box where the user can enter a password. Notes/Domino does not display the password on  the screen. If the password supplied is not xyzabc the user is prompted two times to enter the correct password.
Sub Click(Source As Button)
  Dim workspace As New NotesUIWorkspace
  Dim askme As Variant
  Dim  count As Integer
  count = 0
  Do Until askme = "xyzabc"
    askme = workspace.Prompt(PROMPT_PASSWORD, _
    "Password", "Please type your password.")
    count = count + 1
    If count > 2 Then
      Messagebox "Invalid password."
      Exit Sub
    End If
  Loop
End Sub

2. Die Eingabe selbst wird verschlüsselt hinterlegt.
Geht mit der @Password-Funktion, die du über ein EVALUATE aus dem Input-String bilden lassen kannst. Schau dir in der Hilfe einmal die Funktionen @Password, @HashPassword und @VerifyPassword an.

Als Beispiel für die Anwendung davon kannst du einmal auf der Lotus-Seite nach DigestSearch suchen. Dort wird eine sehr schnelle Suche in Dokumenten darüber realisiert, daß man die Sucbegriffe mit @Password verschlüsselt und Dokumente mit einen UNID anlegt, die dem Ergebnis der @Password-Funktion entspricht.