Erstellen einer Textdatei mit LotusScript

[LordKiri]

Tach, mal wieder

ich möchte per LN Variablen in eine Textdatei schreiben zur weiterverarbeitung durch andere Programme.... bis jetzt hab ich das ganze ienfach per @environment in die notes.ini geschrieben ist aber zum Teil doch ein wenig doof...

also hab ich jetzt einen neuen code der das ganze in eine .txt datei schreibt....

Mein Problem: kann man per LN diese txt-Datei auch erstellen lassen falls sie nicht vorhanden ist, derzeuit kann ich mit dem Code nur auf eine bestehende Datei zugreifen.

Code

	Dim workspace As New NotesUIWorkspace
	Dim uidoc As NotesUIDocument
	Set uidoc = workspace.CurrentDocument
	Set doc = uidoc.Document
	
	Dim realText As String 
	Dim fileNum As Integer 
	realText = uidoc.FieldGetText("Test") 
	fileNum = Freefile 
	
	Open "c:\\notes\\derb.txt" For Append As fileNum 
 
	Print #fileNum, realText 

	Close #fileNum 

[klaussal]

Unter dem Stichwort "open & filenum" findest Du in der Hilfe genau das passende....

[koehlerbv]

Lesen bildet. Aus der DesignerHelp unter "Open statement":

If you specify a fileName that does not exist, LotusScript generates an error if the mode is Input; for all other modes, LotusScript creates the file and opens it.

Weiters: Die doppelten Slashes sind falsch, hier gehören einfache hin.

Wenn der Code auf dem Domino liegt: Hat der Account des Dominos die erforderlichen Rechte?

Bernhard

[LordKiri]

Ja gut aber dann versteh ich nicht warums mit "Append" nicht geht.... hab es mir aber nochmal überlegt und "For Output" ist doch besser, damit funktioniert es einwandfrei....

danke schön