Autor Thema: @Command([EditClear])  (Gelesen 1277 mal)

Offline robertpp

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 940
  • Geschlecht: Männlich
@Command([EditClear])
« am: 14.08.03 - 13:08:11 »
Ich habe vor kurzen eine Db gesehen bei der wenn man ein doc aus einer ansicht löscht per @Command([EditClear])  abgfragt würde ob überhaupt ein doc vorhanden ist!! hat das jemand?
Wie zb per script da kann ich ja auch nachfragen if doc is nothing -> then
------------------------------------------------------------
1250 Notes User Client von 5.0.5 bis 6.5.4     WIN2000, XP
14 Notes Server von 6.5 bis 6.5.4 WIN2000, XP

32   Notes Server von 5.0.1 bis 6.5.4 in unserer Domain
323 Notes Server weltweit mit 38000 User in einem Adressbuch

Offline Christian97

  • Aktives Mitglied
  • ***
  • Beiträge: 182
  • Geschlecht: Männlich
Re:@Command([EditClear])
« Antwort #1 am: 14.08.03 - 13:49:26 »
Hallo,

wie meinst Du das? z.B. wenn man auf eine Kategorie klickt und dann den Button betätigt, soll eine Fehlermeldung kommen?
Wenn's das ist, dann geht's so:

_Check := @Command([EditClear]);
@If(@IsError(_Check); @Prompt([OK]; "Fehler"; "Bitte wählen Sie ein Dokument aus  -  keine Kategorie!"); @Success)

Ciao,
Christian

Offline robertpp

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 940
  • Geschlecht: Männlich
Re:@Command([EditClear])
« Antwort #2 am: 14.08.03 - 14:26:34 »
ja so ungefähr hätte ich mir das gedacht aber ich meinte wenn überhaupt kein doc in der ansicht ist dann soll er mir ausgeben das das löschen nicht möglich ist.
So wie du es gemacht hast geht es aber auch nicht.
Ich hab das beim Script so gemacht:

Sub Click(Source As Button)
   Dim s As New NotesSession
   Dim db As NotesDatabase
   Dim docCol As NotesDocumentCollection
   Dim doc As NotesDocument
   Dim ws As New NotesuiWorkSpace
   Set db = s.CurrentDatabase
   Set docCol = db.unprocessedDocuments
   Set doc = docCol.GetFirstDocument
   If doc Is Nothing Then
      Messagebox "no document selected"
   Else
      Call doc.Remove(True)
   End If
   ws.ViewRefresh   
End Sub

Aber ich hab das in einer DB in Formelsprache gesehen.

------------------------------------------------------------
1250 Notes User Client von 5.0.5 bis 6.5.4     WIN2000, XP
14 Notes Server von 6.5 bis 6.5.4 WIN2000, XP

32   Notes Server von 5.0.1 bis 6.5.4 in unserer Domain
323 Notes Server weltweit mit 38000 User in einem Adressbuch

Driri

  • Gast
Re:@Command([EditClear])
« Antwort #3 am: 14.08.03 - 17:01:15 »
Hi,

ich hab so was ähnliches mal verwendet, um beim Anlegen eines Dokuments zu prüfen, ob ein anderes in der View gewählt ist (für Übernahme von Daten).

Dazu hab ich folgende Formel benutzt :

@If(@IsAvailable(Feld); @Command([Compose]; "Maske"); @Prompt([OK]; "FEHLER"; "blabla"))

Vielleicht kannst du da was drüber machen ?

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz