Import/Export data by type

[LeonAtRC]

I'm trying to export data from a table into a text file using Scripting.FileSystemObject in a VB module

I don't want to copy fields that are Identity field or Computed fields.

rs.open "SELECT * FROM SomeTable"...
buf = ""
FOR EACH fld IN rs.fields
   IF fld.type <> COMPUTED THEN
      IF fld.type <> IDENTITY THEN
         buf = buf & fld.name & vbtab
      END IF
   END IF
NEXT
FieldList = LEFT(buf, LEN(buf)-1)

Obviously my test for COMPUTED and IDENTITY won't work but can someone tell me what syntax to use for what I want to do?
Thank you.

 

[PWise]

what type of database is this a Jet or SqlServer?

 

[LeonAtRC]

sql