Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: zapfbay am 22.06.10 - 11:04:09

Titel: Messagebox mit Eingabefenster
Beitrag von: zapfbay am 22.06.10 - 11:04:09

Hallo zusammen!

Ich hätte da mal eine (dumme) Frage! Gibt es in Notes eine Art Messagebox mit einer Eingabezeile, wie man das z.B. aus JavaScript kennt?
Möchte den User bitten, eine kurze Eingabe zu machen und diese Eingabe auch weiter verarbeiten...
Geht sowas in Notes?

Sorry, wenn die Frage vielleicht etwas komisch klingt, aber so fit bin ich in der Notes Programmierung leider (noch) nicht.

Vielen Dank schon mal für Eure Hilfe.
Gruß, Markus

Titel: Re: Messagebox mit Eingabefenster
Beitrag von: eknori am 22.06.10 - 11:09:59

Eine Messagebox mit Eingabefenster nennt man in Notes Dialogbox.

Titel: Re: Messagebox mit Eingabefenster
Beitrag von: Fedaykin am 22.06.10 - 11:12:46

Hallo Markus

Oder in sehr einfachen Fällen ist auch eine Inputbox möglich.

Beispiel:

Code

Dim strAnswer As String
strAnswer=Inputbox("Prompt","Titel","Default")

Für weiteres Hilfe bemühen.

Gruss
Remo

Titel: Re: Messagebox mit Eingabefenster
Beitrag von: zapfbay am 22.06.10 - 13:11:50

Danke, Inputbox war genau das, was ich gesucht habe!
Vielen Dank

Titel: Re: Messagebox mit Eingabefenster
Beitrag von: Axel am 22.06.10 - 13:15:23

Zitat von: zapfbay am 22.06.10 - 11:04:09

Gibt es in Notes eine Art Messagebox mit einer Eingabezeile, wie man das z.B. aus JavaScript kennt?
Möchte den User bitten, eine kurze Eingabe zu machen und diese Eingabe auch weiter verarbeiten...
Geht sowas in Notes?

Das geht in Notes. Du hast leider nicht dazugeschrieben welche Sprache du meinst, LotusScript oder die Formelsprache.

Formelsprache:
@Prompt( [style] : [NoSort] ; title ; prompt ; defaultChoice ; choiceList ; filetype )

LotusScript:
InputBox[$] ( prompt [ , [ title ] [ , [ default ] [ , xpos , ypos ] ] ] ) (das hat Remo dir ja schon geschrieben)

2.Möglichkeit:
variant = notesUIWorkspace.Prompt( type%, title$, prompt$ [, default ] [, values ] )

Beisp.:

Code

  Dim workspace As New NotesUIWorkspace
  Dim askme As Integer
  askme = workspace.Prompt(PROMPT_OK, "Reminder", "Don't forget to run backup tonight.")

Die einzelnen Parameter zu beschreiben würde den Rahmen sprengen. Die kannst du aber in der Designer-Hilfe nachlesen. Da gibt's auch eine ganze Reihe an Beispielen.

Axel