Das Notes Forum
Domino 9 und frühere Versionen => ND7: Administration & Userprobleme => Thema gestartet von: MasterJedi am 23.10.06 - 11:47:19
-
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
-
Wo stoppt der Debugger ?
-
Drei Wörter: "on error goto"
-
Wo stoppt der Debugger ?
Da: Set rtitem = doc.GetFirstItem("body")
Bernhard
-
Wo stoppt der Debugger ?
Da: Set rtitem = doc.GetFirstItem("body")
;D Und da heißt es immer, ich wäre böse. >:D
-
Ja kann mir bitte jemand helfen! habe schon vieles selber probiert bzw. viel gegoogelt? O0
-
Ja kann mir bitte jemand helfen!
Ja, dein Ausbildungsleiter. Der ist dafür angestellt worden und wird dafür bezahlt!
-
Bernhard hat dir die Lösung doch schon gegeben. Wo ist dein "Doc" denn definiert???
Davon abgesehen. Wenn du das gelöst hast wird er dir als nächstes hier:
For i = 1 To nc.Count
und dann hier (gleich drei Fehler in einer Zeile docnc, dbnc und nid)
Set docnc = dbnc.GetDocumentByID(nid)
auf die Nase fliegen.
Mit den Klassenpostern von IBM würdest du vielleicht auch sehen warum das nicht funktionieren kann was du machst.
Wenn dein Ausbildungsleiter dich zu Lotus Domio Entwicklung verdonnert hat, dann geh zu ihm zurück und lass dir entweder die Schulungsunterlagen von Herdt geben oder einen (mehrere) Kurs(e) genehmigen. Oder er soll dich gefälligst selber ausbilden und diese hehre Aufgabe nicht an ein Forum delegieren.
-
Alternativ kann dein Ausbildungsleiter diese Aufgabe ja auch delegieren. Zum Beispiel an einen der hier in durchaus nennenswerter Zahl vertretenen CLPs oder CLIs.