Domino 9 und frühere Versionen > ND6: Entwicklung

Maske übernehmen

<< < (2/7) > >>

animate:
öffne doch mal die Designer Hilfe und such nach der GetDocumentByKey-Methode.
Dann schaust du dort, was die Parameter bedeuten, die du der Methode mitgeben musst und dann hast du dein Problem schon gelöst.

TripleH:
Hallo!
Du hast recht! Doch das ist meon großes Prob die Hilfe ist nicht installiert und ich kann sie erst Moantag nachinstallieren.
Und jetzt häng ich in der LUFT WEIL MÖCHT SCHON WAS TUN BIS DAHIN:
Ich hoffe du bringst es übers Herz und bist heut mal meine Hilfe:)

TMC:
Download hab ich Dir ja glaub ich schon gepostet:

Download Designer Hilfe

Hier gibts die Hilfe online, also per Browser lesbar:
http://www-12.lotus.com/ldd/doc/domino_notes/5.0.1/help5_designer.nsf

TMC

Axel:
Hi,

erstmal alles gute im neuen Jahr.

Versuch's mal so:

Sub Querysave(Source As Notesuidocument, Continue As Variant)
   
  Dim session As New NotesSession
  Dim db As NotesDatabase
  Dim view As NotesView
  Dim doc As NotesDocument
  Dim docLookup As NotesDocument
  Dim strKey As String

  set doc = Source.Document
  Set db = session.CurrentDatabase
  Set view = db.GetView( "doppelt" )  'Verweis auf Ansicht
 
  strKey = doc.Name(0) & ", " & doc.Vorname(0) 'Suchstring zusammensetzen

  Set docLookup = view.GetDocumentByKey( strKey, True )
  If Not (docLookup Is Nothing) Then
    Messagebox "Ein Kunde mit diesem Namen ist bereits vorhanden"
    Continue = False  'Speichern verhindern
  End If

End Sub

So sollte das funktionieren. Unter Umständen musst du die Feldnamen und/oder den Namen der Ansicht anpassen.

Axel

animate:
Gib einem Hungernden einen Fisch, und er wird für einen Tag satt....

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete

Zur normalen Ansicht wechseln