Hi,
I am a relatively beginner programmer and would certainly appreciate your help with my problem.
I am adding with the help of a Recordset from an Access database to Mapoint and adding pushpins with names as IDs that I get from the Recordset from Access. So far so good.
What I want to know is can I select the ID or the pushpin name of each individually clicked pushpin? I am doing this in VB6 Thanks.
Nick.

Nick,

You could put this in a command button.

Code:

Dim objmap As MapPointctl.Map 
Dim objPushpin As MapPointCtl.Pushpin 

Set objmap = MapPointControl1.ActiveMap 
      'Make sure the item selected on the map is a pushpin 
    If TypeOf objmap.Selection Is Pushpin Then 
      Set objPushpin = MapPointControl1.Selection        
      'Do Something 
      msgbox objpushpin.name
    End If

John, the piece of code worked great. Thanks again.

If this is going to be used by other people, you also want to trap the case where there is no selection. If you don't do that, the program will error when you try to ask the typeof nothing.
Try this:

Code:

Dim objmap As MapPointctl.Map 
Dim objPushpin As MapPointCtl.Pushpin 

Set objmap = MapPointControl1.ActiveMap 

'Make sure the item selected on the map is a pushpin 
If Not objmap.Selection is nothing Then
  If TypeOf objmap.Selection Is Pushpin Then 
    Set objPushpin = MapPointControl1.Selection        
    'Do Something 
    msgbox objpushpin.name 
  End If
End If

Thanks a lot Sitemark, I had already figured that out but not before encountering the error you talked about. (learning the hard way). But thank you very much for the code as any help is always appreciated.