Autor Thema: Feldwerte in Textfile übertragen  (Gelesen 887 mal)

Offline Joker

  • Aktives Mitglied
  • ***
  • Beiträge: 109
  • Geschlecht: Männlich
  • Let`s start !!
Feldwerte in Textfile übertragen
« am: 26.02.03 - 11:11:41 »
Hi,
kann mir vielleicht jemand sagen, wie ich per Script einzelnen Feldwerte aus einem Notes-Dokument in ein Textfile übertragen kann.
Wäre sehr dankbar für eure Hilfe.

Gruss
Martin

Offline Till_21

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 708
  • Geschlecht: Männlich
  • I love Germany
Re:Feldwerte in Textfile übertragen
« Antwort #1 am: 26.02.03 - 11:35:51 »
hier ein kleines beispiel fuer den umgang mit files...

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Set db = session.CurrentDatabase
   
   fileNum% = Freefile()
   Open "c:\FeldSynapse.txt" For Append As fileNum%
   
   Print #fileNum%, "Felder der Datenbank : "+db.title
   
   Forall form In db.Forms
      
      Forall field In form.Fields
         
         Print #fileNum%, form.name + Chr(9) + field
         Print form.name,field
         
      End Forall
   End Forall
   Close #fileNum%
   Messagebox "Feldsynapse c:\\FeldSynapse.txt beendet !"

Die Print#-Befehle musst du abaendern und z.B. auf ein Dokument beziehen....

gruss

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz