Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Gogun_Beokz am 02.08.05 - 11:22:32

Titel: Export in LS
Beitrag von: Gogun_Beokz am 02.08.05 - 11:22:32
Hallo zusammen,

ich hab folgendes Problem, ich habe einen Agenten der ein Dokument im Backend erzeugt und nun möchte ich dieses Dokument als .txt Datei exportieren. Ich habe jedoch keine entsprechende Funktion gefunden und

eval = s.Evaluate(|@Command([FileExport];"ASCII";"| & Pfad & |"|)

scheint nicht zu funktionieren...

Mit freundlichen Grüßen

G0guN_B3okZ
Titel: Re: Export in LS
Beitrag von: diali am 02.08.05 - 11:32:59
schau mal in der Hilfe nach "Open statement". Damit kannst Du eine Datei erstellen und selber beschreiben.
Titel: Re: Export in LS
Beitrag von: umi am 02.08.05 - 11:47:14
Via LS musst Du den Export "von Hand" durchführen.

In Dateien schreiben kannst Du wie von diali schon erwähnt mit "Open Statement" oder aber auch mit der Notesstream Klasse.

gruss
umi
Titel: Re: Export in LS
Beitrag von: Axel am 02.08.05 - 12:18:12
eval = s.Evaluate(|@Command([FileExport];"ASCII";"| & Pfad & |"|)

scheint nicht zu funktionieren...

Hi,

mit Evaluate funktionieren keine @Command - Befehle.


Axel
 
Titel: Re: Export in LS
Beitrag von: 0xse am 02.08.05 - 12:38:43
Hier mal ein kleines Beispiel wie sich in eine beliebige Datei Daten schreiben lassen. Die Transferleistung wie man aus einer Datei Daten ausliest sollte bei dem einfachen Quellcode kein Problem sein. (Siehe unten.)

Speichern
' Deklarationen
Dim FileHandle As Integer
Dim FileName As String

' Einstellungen
FileName = "c:\AccWCexport.csv"

' Code
FileHandle = Freefile()
Open FileName For Output As FileHandle  ' Ist wie der C fopen() Modus "w". Datei wird, wenn nicht existent, erstellt.

Print #FileHandle, "blaaa"

Close FileHandle

Laden
 Deklarationen
Dim FileHandle As Integer
Dim FileName As String
Dim str as String

' Einstellungen
FileName = "c:\AccWCexport.csv"

' Code
FileHandle = Freefile()
Open FileName For input As FileHandle 

While not eof(FileHandle)
   Line Input #FileHandle, stringlein
   MsgBox "Xte Zeile der Datei " & FileName & " beinhaltet " & stringlein;
Wend

Close FileHandle



Und keine Anmerken von wegen Variablenvernwendung, Korrektheit des Codes, etc... das sind Code Schnipsel die ich mir zur Auffrischung meines Gedächtnisses aufhebe und bei Bedarf hervorkrame :)