Domino 9 und frühere Versionen > ND7: Administration & Userprobleme

Object variable not set?? beim abspeichern des bildes?

(1/2) > >>

MasterJedi:
Man soll aus dem Portal aus ein BILD auswählen und abspeichern können!!
Das BILD kommt vom DESKTOP und soll unter Gemeinsame Ressourcen gespeichert werden!

Bei mir kommt nach der er fragt ob es gespeichert werden soll die Nachricht: "object variable not set"!!!

---------------------------------------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------------
Mein CODE:

Sub Querysave(Source As Notesuidocument, Continue As Variant)
REM Bilder in die Bild-Ressourcen einfügen!
   Dim doc As NotesDocument
   Dim rtitem As Variant
   Dim object As NotesEmbeddedObject
   Set rtitem = doc.GetFirstItem("body")
   Set object = rtitem.GetEmbeddedObject
   
   
%REM   
   
   For i = 1 To nc.Count
      Set docnc = dbnc.GetDocumentByID(nid)
      Set item = docnc.GetFirstItem("$Title")
      If Ubound(item.Values) = 1 Then
         If item.values(1) = "StartSeite1024" Then
            name1024= item.Values(1)
         End If
         If item.Values(1)= "StartSeite1280" Then
            name1280=item.Values(1)
         End If
      End If   
      nid = nc.GetNextNoteId(nid)   
   Next
   Messagebox ("Bildname 1024: " + name1024)
   Messagebox ("Bildname 1280: " + name1280)
REM Agent aufrufen (startbildaktuell)   
%END REM   
End Sub
---------------------------------------------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------------

PS: BIN ABSOLUTER LOTUS NOTES NOOB! Wurde gezwungen vom Ausbilungsleiter ;D ;D ;D

klaussal:
Wo stoppt der Debugger ?

m3:
Drei Wörter: "on error goto"

koehlerbv:

--- Zitat von: klauss am 23.10.06 - 11:55:21 ---Wo stoppt der Debugger ?
--- Ende Zitat ---

Da: Set rtitem = doc.GetFirstItem("body")

Bernhard

m3:

--- Zitat von: koehlerbv am 23.10.06 - 11:56:42 ---
--- Zitat von: klauss am 23.10.06 - 11:55:21 ---Wo stoppt der Debugger ?
--- Ende Zitat ---

Da: Set rtitem = doc.GetFirstItem("body")
--- Ende Zitat ---
  ;D Und da heißt es immer, ich wäre böse.  >:D

Navigation

[0] Themen-Index

[#] Nächste Seite