Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Moin am 16.10.08 - 13:25:08

Titel: Beliebig große Liste(32k Grenze) anzeigen, ohne Schreibrechte auf DB
Beitrag von: Moin am 16.10.08 - 13:25:08
Hallo Notes Freunde,

ich befinde mich einer Ansicht einer DB auf die der User nur Leserechte hat.
Aus einer Ansicht starte ich per Button eine Funktion die Daten per ODBC liefert.
Diese möchte ich in irgeneiner Art-und Weise zum Drucken darstellen.

In einem Listenfeld scheitere ich an der 32k Grenze und mit einer RTItem
müsste ich das Doc speichern.

Ein Export kommt nicht in Frage, auch ein PDF scheidet aus.

Hat jemand eine Idee ??

Viele Grüße Thomas O0

Titel: Re: Beliebig große Liste(32k Grenze) anzeigen, ohne Schreibrechte auf DB
Beitrag von: atbits am 16.10.08 - 13:39:05
Wie wärs mir einem PublicAccess Document - das könnte man den User dann speichern lassen?

Was spricht gegen PDF mittels iText?

Grüße David
Titel: Re: Beliebig große Liste(32k Grenze) anzeigen, ohne Schreibrechte auf DB
Beitrag von: Fedaykin am 16.10.08 - 15:44:01
Hallo Thomas

Warum musst Du bei RTItem das Document speichern?

Beispiel:
Sub Initialize
   Dim session As New NotesSession
   Dim ws As New NotesUIWorkspace
   Dim db As NotesDatabase
   Dim doc As NotesDocument
   Dim rtitem As NotesRichTextItem
   Dim i As Long
   
   Set db=session.CurrentDatabase
   Set doc=New NotesDocument(db)
   
   doc.Form="Test"
   doc.SaveOptions="1"
   Set rtitem=doc.CreateRichTextItem("Body")
   
   For i=1 To 32000
      rtitem.AppendText "ddddd"
   Next i
   rtitem.Update
   ws.EditDocument True,doc
End Sub

Nie gespeichert und das Teil ist trotzdem sichtbar.

PS:
Zum ausdrucken könntest Dir natürlich auch ein Word per OLE hochziehen und ausdrucken wenn ein Word da ist und sonst nix hilft.

Gruss
Remo