Domino 9 und frühere Versionen > Entwicklung
Object Variable not set
(1/1)
Steffen_Albrecht:
Hallo,
beim Einsetzen dieses Quellcodes, bekomme ich immer die Meldung "Object variable not set". Der Debugger bleibt bei Set
doc = view.getdocumentbykey( key ) stehen.
Weiß jemand warum? ???
Gruß
Steffen
Function Ok2Save( source As NotesUIDocument ) As Variant
Dim view As NotesView
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim s As New NotesSession
Dim key As String
Dim key2 As String
Dim item As NotesItem
' get the current database and view
Set db = s.CurrentDatabase
Set view = db.GetView("LieferantenKey") ' this is the view created in step 1 above
' refresh document for validation formulas and get key for this document
Call source.Refresh
key = source.fieldgettext("key")
' check to see if the document key already exists....
Set doc = view.getdocumentbykey( "key" )
If doc Is Nothing Then
' first time saved
Ok2Save = True
Exit Function
Else
Set item = doc.GetFirstItem("key")
key2 = item.values(0)
If key2 = key Then
' key matched...possible duplicate"
' subsequent saves
If doc.UniversalID = source.document.UniversalID Then
'saving same document
'unid matched, same doc, saving..."
Ok2Save = True
Exit Function
Else
' duplicate document
' unid is different with same key...duplicate document"
Messagebox "Sie dürfen keine Dublikate von Dokumenten anlegen.",64,"Fehler beim Speichern"
Ok2Save = False
End If
Else
' keys dont match not the same document
'keys dont match...saving"
Ok2Save = True
End If
End If
End Function
Grabby:
Hi Steffen.
Belegt er denn überhaupt die View beim Durchlauf Deines Scriptes? Ich hatte ein ähnliches Problem, hab' 'n Wert aus einer Ansicht gesucht und eben diese Fehlermeldung bekommen. Hab mich in meinem Script im Ansichtsnamen verschrieben, so dass er die view gar nicht belegen konnte. Daraufhin natürlich auch nicht bezüglich des Keys fündig wurde.
Gruß
Grabby
Steffen_Albrecht:
Klasse! Daran hat es gelegen... Danke! :D
Ich Depp hab die Klammern um den Ansichtsnamen vergessen!
Navigation
[0] Themen-Index
Zur normalen Ansicht wechseln