Domino 9 und frühere Versionen > ND6: Entwicklung
Vorläufer
shiraz:
Hi,
was will diese Meldung mir sagen???
:-:
Gruß
Christian
TMC:
Würde mir mal die Fehlermeldung auf Englisch anzeigen lassen, dazu in der Notes.ini die Zeile "UserInterface=de" auskommentieren, also:
--- Code: ---;"UserInterface=de"
--- Ende Code ---
Dann poste nochmal die Fehlermeldung, oder such auch mal im LDD / KBase danach.
koehlerbv:
Das ist eine sichere Variante, um danach die KBase zu befragen, Matthias. Christian sollte das zunächst befolgen.
Es wäre aber auch sehr hilfreich, wenn man jetzt wüsste, ob das in einer selbstprogrammierten Anwendung passiert, in welchem Kontext dieses dann passiert und so weiter.
Bisher wissen wir nur, dass etwas programmiert wurde, das dem Spruch "Die Katze beisst sich in den Schwanz" entspricht ("circular reference").
Mehr input, mehr output. Wie immer.
Bernhard
shiraz:
Hallo Jungs,
ich habe eine Aktion Programmiert damit die User ihre Bestellungen sehen, ab und zu erscheint diese Fehlermeldung.
Hier die Code:
--- Zitat ---Sub Click(Source As Button)
Dim session As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim localView As NotesView
Dim dc As NotesDocumentCollection
Dim docTemp As notesdocument
Dim doc As NotesDocument
Dim uidoc As NotesUIDocument
Dim nam As NotesName
Set nam = session.CreateName( session.UserName )
Set db = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.document
key = doc.K_SortID(0)
Set localView = db.GetView("($AllOrders)")
Set dc = localView.GetAllDocumentsByKey(key, False)
For j% = 1 To dc.Count
Set doc = dc.GetNthDocument(j%)
If nam.Common = doc.guest(0) Then
Call workspace.EditDocument(False, doc)
Exit Sub
End If
Next
Dim askme As Integer
askme = workspace.Prompt(PROMPT_OK, _
"Achtung", "Es liegt keine Anmeldung für " & key & " vor!")
End Sub
--- Ende Zitat ---
Gruß
Christian
klaussal:
Schon mal den Debugger bemüht ?
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln