Tablodaki Kolonları Okuma
include "mapbasic.def" dim columnCount, i as integer dim columnNames() as string open table "C:\World.Tab" columnCount = NumCols(World) redim columnNames(columnCount) for i = 1 to columnCount columnNames(i) = ColumnInfo("World" ,"Col" + i, COL_INFO_NAME) next print chr$(12) 'print penceresini temizle for i = 1 to columnCount print columnNames(i) next
Comments (0)
Trackbacks (0)
Leave a comment
Trackback