Domino 9 und frühere Versionen > ND6: Entwicklung

Image Ressource exportieren

(1/2) > >>

robertpp:
Hallo,

Kann man per Script die Image Ressourcen ( eine bestimmte) aus einer DB exportieren?
Hintergedanke:

Ich will dann in ein Exceldokument eine Image mit
ActiveSheet.Pictures.Insert("C:\_ICON\home.gif").Select
einfügen.
Oder ist es auf dem direkten Weg aus der Notes db möglich, was ich mir aber nicht so ganz vorstellen kann.

Oder welche Möglichkeit hab ich sonst noch?

danke robert

Tode:
mit Hilfe der NotesNoteCollection (neu seit R6) ist das gar kein Problem.

Beispiel: Siehe Designer- Hilfe...

Tode

Glombi:
Es geht auch einfach ohne Programmierung:

In der Datenbank ein Dokument erstellten welches ein Rich Text hat. Dort mit Erstellen - Bildressource diese einfügen und speichern. Dann Aktion - Vorschau im Webbrowser aufrufen. Dort kann dann das Bild wie gewohnt gespeichert werden.

Andreas

robertpp:
@Andreas:

Ich weiß nicht ob ich mit dem weiter komme. Ich will ja im Notes per Agent oder zb als Button per Script ein Excel doc erstellen und dann eben
ActiveSheet.Pictures.Insert("C:\_ICON\home.gif").Select
machen?
Da komm ich ja garnicht ins web und außerdem ist ja da eine Benutzeraktion notwendig. Oder hab ich das falsch verstanden?

@Tode: Hab ich jetzt gefunden und ebenfalls notesNoteCollection.SelectImageResources

Aber damit bekomm ich ja nicht meine ImageRessource als file auf die Platte?

danke robert

robertpp:
Also ich hab das jetzt noch gefunden:

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument

Set db = session.CurrentDatabase

REM Create note collection
Dim nc As NotesNoteCollection
Set nc = db.CreateNoteCollection(False)
nc.SelectImageResources = True
Call nc.BuildCollection

nid = nc.GetFirstNoteId
For i = 1 To nc.Count
Set doc = db.GetDocumentByID(nid)
Set item = doc.GetFirstItem("$Title")
Messagebox item.text
nid = nc.GetNextNoteId(nid)
Next


Das sag mir schon mal den Namen aller Images.
Wie kann ich die dann noch exportieren?

Navigation

[0] Themen-Index

[#] Nächste Seite