Excel File - Array Read

[Gintaras]

Macro Macro2791

Code:

Copy      Help

;Excel. As table name, use [worksheet name$]. First row is used for headers.
out

Database db.Open(db.CsExcel("$documents$\book1.xls"))
ARRAY(str) a; int c r
db.QueryArr("SELECT * FROM [Sheet1$] " a)
for r 0 a.len
,out F"<><Z 0x80C080>row {r+1}</Z>"
,for c 0 a.len(1)
,,out a[c r]