Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Excel database (enumerating database tables, fields, etc)
#6
When using text/csv files:
database = folder,
table = file,
header = first line.

Code:
Copy      Help
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]


Messages In This Thread

Forum Jump:


Users browsing this thread: 1 Guest(s)