Thanks to Warren Vick and Robert Crossley I have manage to map the last =
open table in an integrated mapping application (MS-Access), follows the =
code:

Sub AddTable()
 Dim mapname As String
 Mi.Do "Open Table ""c:\*.tab"" interactive"
 mapname =3D Mi.Eval("tableinfo(0,1)")
 Mi.Do "Add Map Layer " & mapname
 End Sub


Juanse
Temuko-Chile




_______________________________________________________________________
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.

Reply via email to