Beiträge von ekznamu

  • Alarm bei ganztägigen Terminen um 4:00 Uhr

    Da wird das Startdate scheinbar beim Speichern auf 4:00 Uhr gesetzt. Andererseits kann ich den Alarm nur auf einen Tag vorher einstellen. Das heißt bei mir:


    wenn ich so einen Termin auf mein Handy übertrage, gibts um 4 Uhr einen Alarm.


    Ich habe nicht entdeckt, wo man die Startzeit bei ganztägigen Terminen ändern kann (bzw. die Alarmzeit).


    Ich habe Client 7.0 (ist aber bei älteren Versionen das gleiche)


    Danke

  • 'Recipients'-Feld mit mehreren Werten befüllen

    Hallo,


    ich generiere per Script direkt eine Mail in der Mailbox des Servers. Das klappt wunderbar. Nun sollen diese Mail mehrere bekommen. Das geht nur, wenn ich das ggf. mit Liste belegte 'SendTo'-Feld als Item in 'Recipients' komplett übernehme (Code1).
    Wenn ich mehrere Werte per Scipt reinmache (Code2), gibt es eine Fehlermeldung vom Router:


    Message xxxx contains no recipients.



    Der Code1 sieht so aus:


    Set doc_mail =db_mail.createdocument()
    doc_mail.form="Memo"
    doc_mail.from=session.UserName
    Set item2=doc.GetFirstItem("SendTo")
    Set item=item2.CopyItemToDocument(doc_mail,"SendTo")
    Set item=item2.CopyItemToDocument(doc_mail,"Recipients")
    doc_Mail.PostedDate=Cdat(Date$ + " " + Time$)
    doc_mail.Subject=doc.subject(0)
    Set rtitem = doc_mail.CreateRichTextItem( "BODY" )
    Call rtitem.AppendText(doc.Briefanrede(0))
    Call rtitem.AppendText(Chr(10) + Chr(10))
    ...
    Call doc_mail.Save(True,False)




    Der Code2 sieht so aus:


    Set doc_mail =db_mail.createdocument()
    doc_mail.form="Memo"
    doc_mail.from=session.UserName
    Set item=New NotesItem(doc_mail,"SendTo","")
    item.AppendToTextList("adr1@blabla.de")
    item.AppendToTextList("adr3@blabla.de")
    Set item=New NotesItem(doc_mail,"Recipients","")
    item.AppendToTextList("adr1@blabla.de")
    item.AppendToTextList("adr3@blabla.de")
    doc_Mail.PostedDate=Cdat(Date$ + " " + Time$)
    doc_mail.Subject=doc.subject(0)
    Set rtitem = doc_mail.CreateRichTextItem( "BODY" )
    Call rtitem.AppendText(doc.Briefanrede(0))
    Call rtitem.AppendText(Chr(10) + Chr(10))
    ...
    Call doc_mail.Save(True,False)


    Warum geht das in Code2 nicht ?


    Danke

  • Stylesheet und Tabelle

    Du hast mich falsch verstanden, ich sagte ja, es funktioniert generell, also ist die CSS-Datei auch eingebunden. Nur im Designer kann ich in der Wysiwyg-Ansicht den Zellen nicht global die (vorhandenen) Klasse zuweisen.

  • Stylesheet und Tabelle

    Ich habe eine komplexe Tabelle in einer Maske angelegt, die ich im Browser öffne. Nun möchte ich die Farbgestaltung mit einem Stylesheet beeinflussen. Dazu kann ich in den Zelleneigenschaften auch Klassen eintragen. Schön und gut: funktioniert, aber das gilt immer nur für eine Zelle ! Wenn ich im Designer die ganze Tabelle markiere und den Eintrag der Klasse mache, ist auch immer nur eine Zelle belegt !!
    Bin ich jetzt blöd, oder ist das ein Feature ???
    Wie kann ich einfach alle Zellen entsprechend setzen ?

  • !DOCTYPE - Tag generell ändern

    normalerweise generiert unser Domino-Server die HTML-Seiten mit:


    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">


    Dies möchte ich in:


    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"


    ändern. Kann man das und wenn ja wo ?


    Danke
    Uwe

  • Picklistcollection langsam

    Ich habe in einer Maske einen Knopf mit Picklistcollection realisiert.
    Dort kann der Anwender sich aus einer bestimmten Ansicht Dokumente rauspicken:


    Set doc_c=workspace.PickListcollection(1, True, "zeus/server/domain", "DokuLib.nsf", "Alles_10", "Dateiauswahl", "Bitte wählen Sie ein oder mehrere Dokumente")



    Allerdings geht die Dialogbox nur nach längerer Wartezeit auf (etwa 20 Sekunden), da die Ansicht relativ groß ist. Komisch ist nur, daß die Ansicht direkt in der DB auf dem gleichen Server geöffnet ziemlich fix geht (etwa 1-2 Sekunden).


    Woran kann das liegen, gibt es eine Alternative zu Picklist ? (ich vermute hier liegt das Problem)

  • Website auf Lotus Notes übertragen?

    Zitat

    taurec schrieb:
    Also die HTML Dateien kannst du einfach in das domino\html Verzeichnis kopieren. Nur bei den PHP Dateien musst du entweder die Funktionalität unter Domino nachprogrammieren oder PHP im Domino miteinbinden


    PHP kann man in Domino einbinden ? Hast Du Informationen dazu, wie das geht ?


    Danke
    Uwe

  • periodischer Import-Agent erstellen

    Ein Script, welches eine CSV Datei zeilenweise einließt und pro Zeile ein Dokument erstellt. Die Werte der Felder pro Zeile befinden sich im Array readlist(n):


    Sub Initialize

    Dim db As NotesDatabase
    Dim doc As NotesDocument
    Dim readlist List As String


    'LogFile öffnen
    Dim currentLog As New NotesLog("Import")
    Call currentLog.OpenNotesLog ("server/domain","agentlog.nsf")
    currentLog.LogErrors=True

    Dim session As New NotesSession
    Set db = Session.Currentdatabase


    filename="c:\import.csv"

    Dim txt As String
    Dim fileNum As Integer
    Dim counter As Integer

    fileNum = Freefile()
    Dlm=";" 'Trennzeichen
    zaehler=0 'Zeilenzähler
    Open filename For Input As fileNum
    Do While Not Eof(fileNum)
    Line Input #fileNum, txt$
    zaehler=zaehler+1
    If txt<>"" Then
    n=1 'Beginn-Position des nächsten Feldes
    DCnt=0 'Delimiter Count
    pos=1
    Do While pos<>0 pos=Instr(n,txt,Dlm)
    length=pos-n
    DCnt=DCnt+1
    If length>=0 Then
    readlist(DCnt)=Mid(txt,n,length)
    Else 'das letzte Feld hat kein DLM !
    readlist(DCnt)=Right (txt,Len(txt)-n+1)
    End If
    n=pos+1
    Loop
    'hier das Dokument erzeugen:
    Set doc = New Notesdocument (db)
    doc.form="Maskenname"
    doc.feld1=readlist(1)
    doc.feld2=readlist(2)
    '........
    call doc.save (true,true)
    Loop

    Call currentLog.LogAction("insgesamt importiert: " +Cstr(zaehler))


    'Verbindung beenden

    Call currentLog.LogAction("Import beendet")
    Call currentLog.Close
    Close filenum

    End Sub