Access 2000 and textfiles

[THOMASNG]

In our product, the special-purpose computer needs two
textfiles to run properly. The data will already stored in
an Access 2000 database, and will change one to three times each week.
I would like to use the existing database to create these
files, however, the database has eight fields, but I only need to use one or two of them to create these textfiles.
How do I mask out these unwanted fields?

 

[VBslammer]

Just create queries to get the data you need and output them to the text files:

Sub Output2Fields()

  Dim rst As Recordset
  
  Set rst = CurrentDb().OpenRecordset("2FieldsQuery")
  
  If Not rst.RecordCount = 0 Then
  
    Open "C:\Test2.txt" For Output As #1
    
    With rst
      While Not .EOF
        Print #1, .Fields(0) & "," & .Fields(1)
        .MoveNext
      Wend
    End With
    
    Close #1
    
  End If
End Sub

VBSlammer

Unemployed in Houston, Texas

 

[THOMASNG]

Yes, using queries did the trick!
However, in addition to the data taken from the database,
I need to add a two-line to each textfile, for the special-purpose computer to accept them. The two-line headers are
static, i.e., they won't vary.

Thomas Ng