Beiträge von nashieli

    hab meine Exe aus dem Notes-Verzeichnis ausgeführ. Jedoch bekomme ich dieselbe Meldung.


    Mein LOG bekomme ich aus:


    MessageBox.Show(importer.Log + " ++++ " + importer.LogComment + " ++++ " + e.ToString());


    importer ist bei mir wie folgt deklariert:


    Domino.NotesDXLImporter importer = null;
    importer = m_session.CreateDXLImporter();


    bei der Zeile:


    stream.Open(szFileName, ""); gebe ich ihm kein pCharset mit... unter Script wird es nicht gebraucht, aber unter C# muss ich das angeben.


    rausfliegen tut er bei importer.Import(stream,db);

    das ist der Fehler der im log ist... wenn der aber nicht voran kommt, weil der Pfad nicht hinhaut dann kann ich auch kein richtige LOG-Ausgabe liefern... Der Pfad zur xml-Datei ist korrekt.


    Ich schau erstmal, ob ich eine Meldung bekomme, wenn ich die exe aus dem Notes-Verzeichnis starte

    so, jetzt hab ich es....
    LOG:


    "<?xml version='1.0'?>\n<DXLImporterLog>\n<error>LotusScript Error - Cannot load resource string or resource file missing (nse*, nsk*, etc).</error>\n<error>DXL importer operation failed</error>\n</DXLImporterLog>"


    hmmmmmmmmm... die xml-habe ich ja in mein ersten posting drin, die ich zu importieren versuche... aber verstehen tu ich die Meldung nicht.

    sorry, aber die an die LOG's bin ich noch nicht gekommen. Die beiden Codebeispiele sind identisch bis auf, dass im Designer der Befehl Precess existiert und bei C# nicht. Dort binde ich ja das Domino-Object ein.

    hmmmmmmmm... hiermit geht es und seh ehrlich gesagt kein unterschied zu meine C#-Code. Der einzige Unterschied ist, dass das Script im Designer läuft und C# eine Anwendung ist.


    ####################################
    Const DXLIMPORTOPTION_CREATE = 1
    Const DXLIMPORTOPTION_IGNORE = 2
    Const DXLIMPORTOPTION_REPLACE_ELSE_IGNORE = 5
    Const DXLIMPORTOPTION_REPLACE_ELSE_CREATE =6
    Const DXLIMPORTOPTION_UPDATE_ELSE_IGNORE =9
    Const DXLIMPORTOPTION_UPDATE_ELSE_CREATE =10


    Dim session As New NotesSession
    Dim db As NotesDatabase
    Set db = session.CurrentDatabase
    filename$ = Left(db.FileName, Len(db.FileName) - 4)


    REM Open dxl file named after current database
    Dim stream As NotesStream
    Set stream = session.CreateStream
    If Not stream.Open("D:\DVP\Sonstiges\LotusAgenten\os_archivieren.xml") Then
    Messagebox "Cannot open " & filename$,, "Error"
    Exit Sub
    End If
    If stream.Bytes = 0 Then
    Messagebox "File did not exist or was empty",, filename$
    Exit Sub
    End If


    REM Import DXL into new database
    Dim importer As NotesDXLImporter
    Set importer = session.CreateDXLImporter(stream, db)
    importer.ReplicaRequiredForReplaceOrUpdate = False 'Database doesn't need to be a replica
    importer.DesignImportOption = DXLIMPORTOPTION_REPLACE_ELSE_CREATE
    Call importer.Process


    ####################################

    Hallo,


    ich habe folgenden Code für den Import von Bildern und Agents:


    //###############################


    Domino.NotesSession m_session = new Domino.NotesSession();
    m_session.Initialize("xxxx");


    NotesDatabase db = m_session.GetDatabase("", "bookmark.nsf",false);


    Domino.NotesStream stream = null;
    stream = m_session.CreateStream();
    stream.Open(szFileName, "");
    if(stream.Bytes == 0)
    {
    return;
    }


    Domino.NotesDXLImporter importer = null;
    importer = m_session.CreateDXLImporter();
    importer.ReplaceDBProperties = true;
    importer.ReplicaRequiredForReplaceOrUpdate = false;
    importer.ACLImportOption = Domino.DXLIMPORTOPTION.DXLIMPORTOPTION_REPLACE_ELSE_IGNORE;
    importer.DesignImportOption = Domino.DXLIMPORTOPTION.DXLIMPORTOPTION_CREATE;
    importer.Import(stream,db);


    stream.Close();
    stream = null;
    importer = null;
    db = null;
    m_session=null;


    //###############################


    Die Bilder werden damit importiert. Jedoch schläg es bei den Agenten fehl. Im Dateianhang habe ich mal den Agenten als xml-Datei angeghangen die ich versuche zu importieren.


    Hab ich etwas übersehen?


    Danke und gruß


    Asim

    hmmm, dann hast Du mein Problem nicht verstanden. Es ist mir schon klar, dass ich im Designer (fast) alles machen kann. Aber mein Button muss dann auf das Script verweisen. Den Weg den Du beschreibst wollte ich eben nicht gehen.


    Gruß


    Asim

    also die Com-exe ist registriert. DIe kann ich aus anderen Programmen mit CreateObject ansprechen.


    Zurzeit steht hinter mein Button im Formelfenster:
    @Command( [RunAgent];"os_bearbeiten")


    Da wird ein Agent aufgerufen. Wenn ich Dich jetzt richtig verstanden habe, kann ich im Formelfenster einfach createobject schreiben?


    Gruß


    Asim

    Hallo,


    hab es endlich geschafft mit C# Bilder und Toolbar in die aktuelle bookmark.nsf zu importieren.


    Jetzt will ich, dass die Buttons eine Aktion ausführen ohne, dass ich einen Agenten schreiben muss.


    Kann ich hinter dem Button in der Toolbar in dem Formelfenster sowas wie:


    dim x as object
    set x = createobject("www.YY")
    x.DoEtwas


    schreiben.


    Oder eine andere Möglichkeit beim einfügen einer Entry einen Aktion mitgeben.


    Danke


    Gruß aus Berlin


    Asim

    ich habe den Beitrag gelesen gehabt... jedoch hab ich da nix gefunden... ist diese bookmark auf den Clients... wie öffne diese überhaupt in dem Designer...


    wie Du gemerkt hast, bin ich ein absoluter Anfänger... komme eher von der Ouitlook-Seite... daher muss ich mein Verständnis etwas umkrempeln...


    gruß


    Asim

    Zitat

    Doch auch das geht.


    Hallo,


    geht ganz gut. Danke für den Tip. Einen Entry kann ich jetzt mit Bildern anzeigen. Weiss Duu ob ich in so ein Outline programmtechnisch auch eine von mir definierte Toolbar samt Buttons hinzufügen kann oder muss das im Domino-Serer gemacht werden.


    Mein Ziel ist es eine Exe zu haben, die der Kunde praktisch startet und er dann meine Toolbar XYZ nutzt mit samt den Code der hinter den Buttons ist.


    Danke


    Gruß


    Asim

    ich habe diesen Code zum anhängen in eine outline:


    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim outline As NotesOutline
    Dim entry As NotesOutlineEntry
    Dim workspace As New NotesUIWorkspace

    Set db = session.CurrentDatabase
    Set outline = db.GetOutline("Contact Outline")
    Set entry = outline.CreateEntry("TEST")

    entry.ImagesText = "C:\document_exchange.png"
    entry.Label = "OS_2"
    Call entry.SetAction({@Command([ToolsRunMacro];"(TESTOS)") })

    Call outline.AddEntry(entry)
    Call outline.Save()

    Call workspace.OutlineReload("Contact Outline","")


    Ich seh jetzt OS_2. Jedoch sind die Icons von meine Ansicht weg. Welches Format muss das ImageText angeben. OS_2 will ich programmtechnisch ein Icon hinzufügen.


    Danke


    Gruß


    Asim


    Ich habe bei ImageText

    Zitat

    schau Dir mal ind er Designer-Hilfe CreateEntry und CreateEntryFrom an. dort stehen auch Beispiele.



    Ich habe dieses Beispiel:



    Dim session As New NotesSession
    Dim db As NotesDatabase
    Dim outline As NotesOutline
    Dim oe As NotesOutlineEntry

    Set db = session.CurrentDatabase
    'Set outline = db.GetOutline("OS")
    Set outline = db.CreateOutline("OS")
    Set oe = outline.CreateEntry("OOS")
    oe.ImagesText = "C:\logo.jpg"
    oe.Label = "TEST"
    Call outline.AddEntry(oe)
    Call outline.Save()


    Geht auch durch ohne Fehler. Jedoch seh ich nichts im Lotus Client. Was muss ich noch machen?


    Danke


    Gruß
    Asim