Hi,
special thanks to Laurence and Robert.
With their help I've managed to write this:

Dim PotDoMi As String    
Dim Mapinfo As Object
Dim imef as String      

imef="C:\test.wor"
Set Mapinfo = CreateObject("MapInfo.Application")
PotDoMi = Mapinfo.eval("programdirectory$()")
Set Mapinfo = Nothing
MyAppID = Shell(PotDoMi & "\Mapinfow.exe " & imef, 1)  ' Run Mapinfo.
AppActivate MyAppID   ' Activate Mapinfo.

which starts Mapinfo and loads the Test.wor workspace.

Thank you
 Jure.

Reply via email to