11-20-2006, 09:30 AM
When using text/csv files:
database = folder,
table = file,
header = first line.
database = folder,
table = file,
header = first line.
out
Database d
d.Open(d.CsText("$personal$"))
ADO.Recordset rs=d.conn.OpenSchema(ADO.adSchemaColumns)
ARRAY(str) a
d.RsGetAll(rs a)
;;all info
;int i j
;for i 0 a.len
,;for j 0 a.len(1)
,,;out a[j i]
,;out "--"
;table names, column positions and column names
int i
for i 0 a.len
,out "%s %i %s" a[2 i] val(a[6 i]) a[3 i]