How to create the schema.ini file?

[Lior M via AccessMonster.com]

Hi all,

I need to export all of my tables, and I need to have one schema.ini file. I'm using DoCmd.TransferText, but I cant find how to create schema.ini.

Any ideas?

Thanks for any hint
Lior

PS: Here's my code:
Dim obj As AccessObject, dbs As Object

Set dbs = Application.CurrentData
' Search for open AccessObject objects in
' AllDataAccessPages collection.
For Each obj In dbs.AllTables
' Print name of obj.
Debug.Print obj.Name
' export
DoCmd.TransferText acExportDelim, , _
obj.Name, Application.CurrentProject.Path & "\\" & obj.Name & ".csv", True
Next obj

 

[Douglas J. Steele]

Check http://support.microsoft.com/?id=149090 or
http://support.microsoft.com/?id=210001 (or go to
http://search.microsoft.com/search/search.aspx?view=msdn&st=a&c=0&s=1 and do
a search on schema.ini for lots more hits)

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)

Hi all,

I need to export all of my tables, and I need to have one schema.ini file.

I'm using DoCmd.TransferText, but I cant find how to create schema.ini.