Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: OliverII am 12.08.05 - 14:28:32

Titel: Zeichenanzahl
Beitrag von: OliverII am 12.08.05 - 14:28:32

Hallo Zusammen,

habe mal wieder eine Frage:

Habe eine Inputbox bei der ich die einzugebenden Zeichen begrenzen möchte:
------------------------------         
inputr = Inputbox ("Grund für die Änderung des Feldes --> erledigen bis:", "Sie haben das Feld -erledigen bis- geändert...")    
         doc.userReason = inputr
         datum_old = doc.TaskDuedate_old
--------------------------------

Ist es möglich, die Inputbox über einen Scriptbefehl zu begrenzen???
Formelmodus funktioniert es aber ich bekomme es im Script nicht gebacken! @If(@Length(xy)>50;@Failure("Hinweistext!");@Success)

Grüße Oliver
 ???

Titel: Re: Zeichenanzahl
Beitrag von: Glombi am 12.08.05 - 14:31:20

Du musst die Script Funktion len verwenden.

Andreas

Titel: Re: Zeichenanzahl
Beitrag von: Thomas Schulte am 12.08.05 - 14:31:59

if len(input)>50 then
Fehler Message
Goto inputbox...
end if

Titel: Re: Zeichenanzahl
Beitrag von: OliverII am 12.08.05 - 14:38:07

super - vielen DANK!
Das werde ich gleich versuchen..............

Titel: Re: Zeichenanzahl
Beitrag von: OliverII am 12.08.05 - 14:49:09

kenn mich im script absolut nicht aus und versuch mich gerade ein wenig einzulesen!
Habe jedoch noch große Schwierigkeiten damit.

Könnt Ihr mir deshalb evtl. nochmals helfen?
Könntet Ihr mir sagen was ich da falsch mache und vor allem warum?
Habe auch mal in der LN-Hilfe nachgeschaut, komme jedoch nicht damit klar.....

..............................................
inputr = Inputbox ("Grund für die Änderung des Feldes --> erledigen bis:", "Sie haben das Feld -erledigen bis- geändert...")    
doc.userReason = inputr
If Len(inputr)>50 Then
Fehler Message
Goto Inputbox
      End If
............................................

Titel: Re: Zeichenanzahl
Beitrag von: koehlerbv am 12.08.05 - 15:43:54

Zitat von: OliverII am 12.08.05 - 14:49:09

inputr = Inputbox ("Grund für die Änderung des Feldes --> erledigen bis:", "Sie haben das Feld -erledigen bis- geändert...")    
doc.userReason = inputr
If Len(inputr)>50 Then
Fehler Message
Goto Inputbox
      End If

Was ist "Fehler Message" ?
Wo ist das Label "Inputbox" definiert ?
Warum speicherst Du eine ggf. zu lange Eingabe schon in das Dokument ?

Vor allem: Was willst Du überhaupt wissen ? Die eigentliche Frage geht mit irgendwie ab ...

Bernhard

Titel: Re: Zeichenanzahl
Beitrag von: rar am 12.08.05 - 15:51:41

Hi,
Fehler Message und Goto Inputbox kannst du so nicht schreiben.
Fehlermeldungen gibt man mit Msgbox (siehe Designerhilfe) aus.
Und wenn du mit Goto irgendwo hin hüpfen möchtest , brauchst du ein label dass Notes weiß, wo es hin soll

zB.:

Code

hierhin:   '<---- das ist das label
inputr = Inputbox ("Grund für die Änderung des Feldes --> erledigen bis:", "Sie haben das Feld -erledigen bis- geändert...")    
If Len(inputr)>50 Then
  Msgbox
  Goto hierhin
End If
doc.userReason = inputr

(Abspeichern solltest du das Doc dann aber auch.)

HTH

Titel: Re: Zeichenanzahl
Beitrag von: Glombi am 12.08.05 - 15:54:20

Hier mal was ohne goto  ;D

defaultvalue = ""
While inputr = "" Or Len(inputr) > 50
      inputr = Inputbox ("Grund für die Änderung des Feldes --> erledigen bis:", "Sie haben das Feld -erledigen bis- geändert...", defaultvalue)   

              If Len(inputr)>50 Then
         Msgbox "Bitte maximal 50 Zeichen eingeben!",0+16,"Fehler"
         defaultvalue = Left$(inputr,50)
   Elseif  inputr = ""  Then
         Msgbox "Bitte eine Begründung eingeben (maximal 50 Zeichen)!",0+16,"Fehler"
   End If
Wend
   
doc.userReason = inputr
   

Andreas

Titel: Re: Zeichenanzahl
Beitrag von: Thomas Schulte am 12.08.05 - 15:56:01

Stimmt ist eindeutig schöner.

Titel: Re: Zeichenanzahl
Beitrag von: rar am 12.08.05 - 15:58:23

3 Schönheitspunkte für Andreas.  ;)

Titel: Re: Zeichenanzahl
Beitrag von: Glombi am 12.08.05 - 15:59:30

Danke schön  ;)


Ich bin aber kein Goto Hasser muss ich gestehen. Aber für Oliver2 ist es vielleicht hilfreich...

Andreas