This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Hello all-
I am totally stumped with what I am trying to do here. Basically what I am
doing is writing an app which allows the user to enter in a cell tower ID
and it will zoom into that site. The part that I am having problems with is
populating arrays with all the open tables and columns within those tables.
Here is what I have:
Populating array with table names:
Global iNumTable as integer
Global sTableName(10) as string
Sub populate_table_array
Dim iLoop as integer
INumTable = numtables()
Redim sTableName(numtables())
For iLoop = 1 to iNumTable
STableName(iLoop) = TableInfo(iLoop, 1)
ILoop = iLoop + 1
Next
End sub
Populating array with column names:
Sub populate_column_array
Dim iNewLoop as integer
Dim iNumColumn as integer
INumColumn = NumCols(sTableChosen)
For iNewLoop = 1 to iNumColumn
SColumnName(iNewLoop) = ColumnInfo(sTableChosen,
iNewLoop, COL_INFO_NAME)
INewLoop = iNewLoop + 1
Next
End sub
The error message that I am getting is "Table 1 Not Found". I have beaten
myself over the head for days trying to figure this one out. Any ideas?
David Scott
GIS Specialist
Independent Wireless One
Albany, New York 12203
PCS: 518.506.2172
_______________________________________________________________________
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, send e-mail to [EMAIL PROTECTED] and
put "unsubscribe MapInfo-L" in the message body.
