Autor Thema: Print-Befehl ohne Zeilenschaltung ? Wie ?  (Gelesen 1060 mal)

Offline jeff1961

  • Frischling
  • *
  • Beiträge: 3
  • Ich liebe dieses Forum!
Print-Befehl ohne Zeilenschaltung ? Wie ?
« am: 25.07.04 - 22:42:36 »
Hallo liebe Gemeinde,

ich möchte über Script eine ASCII-Datei erzeugen, bei der die
ausgegebenen Datensätze nicht durch eine Zeilenschaltung
getrennt werden. Ich habe mir einen Wolf gesucht und keinen
Parameter beim "Print-Befehl" gefunden die die Zeilenschaltung
unterdrückt !

Bin für jeden Tipp dankbar !

Ziel: Bestimmte Felder eines Doc´s aller Datensätze einer Ansicht sollen nacheinander ohne Zeilenschaltung in eine ASCII-Datei geschrieben werden !

Danke
Jeff

Hier mein Script

   Dim Sess As New NotesSession
   Dim DB As NotesDatabase
   Dim View As NotesView
   Dim Doc As NotesDocument  
   
   REM Variablen für die DTA-Datei
   
   Dim sTxt As String
   Dim fileNum As Integer
   
    REM Variablen für den Schlußsatz  
   Dim Anz As Variant
   Dim GesKto As Variant
   Dim GesBlz As Variant
   
   Set DB = Sess.currentdatabase  
   Set view = DB.GetView("DTA")
   Set doc = view.GetFirstDocument
   
   sFile = "F:\DTAUS1.txt"
   fileNum = Freefile()
   Open sFile For Output As fileNum
    REM As fileNum
   Print #fileNum , "A-Satz"
   While Not(doc Is Nothing)
      REM Print "1..!"  
      Anz=anz+1
      GesKto=GesKto+Doc.BelKonto(0)
      GesBlz=GesBlz+9999999999
      REM Print doc.DTASOLL(0)      
      Print #fileNum , doc.DTASoll(0)
      Set doc = View.GetNextDocument(doc)
   Wend

Offline animate

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 1.540
  • Uh, I'm just gonna go find a cash machine.
    • LA2
Thomas

Fortunately, I'm adhering to a pretty strict, uh, drug, uh, regimen to keep my mind, you know, uh, limber.

Offline jeff1961

  • Frischling
  • *
  • Beiträge: 3
  • Ich liebe dieses Forum!
Re:Print-Befehl ohne Zeilenschaltung ? Wie ?
« Antwort #2 am: 26.07.04 - 16:57:19 »
Danke für die prompte Hilfe Thomas,
man muß nur nach den richtigen Begriffen suchen.. :-)

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz