for a test I created a map with a few pushpins, I named the dataset "toto" and I saved the map as "toto.ptm"
I put the ActiveX control (MappointControl1) on a VB From
I put this in a command button.
It works. Can you try again with a new map (make a test map), try just adding the few lines of code to keep it simple.Code:Dim objdataset As MapPointCtl.DataSet Set objdataset = MappointControl1.OpenMap("C:\toto.ptm").DataSets("toto")