MapForums

what you mean is that when you click your "submit button" you go to mappoint2004 itself
I only open another form in my visual basic project where the map is

I have my mappoint control in a usercontrol which I put in a form.

I have my mappoint control in a usercontrol which I put in a form.
It is an activex server exe.

Greetings,
Syd

I do the exact same thing
i use only 1 map but it's on another form in my project

__________________
greetz

next problem
runtime error 429:
ActiveX component can't create object

i'm using this code:
Dim omap As MapPoint.Map
Set omap = GetObject(, "MapPoint.Application").ActiveMap

Dim oPPSet As MapPoint.DataSet
Dim oPin As MapPoint.Pushpin
Dim oDS As MapPoint.DataSets

Set oPin = omap.AddPushpin(omap.FindResults( _
txtKaart.Text)(1))

Set oDS = omap.DataSets
Set oPPSet = omap.DataSets.AddPushpinSet("Deliveries")
oPin.MoveTo oPPSet

it higlights the "set omap..." sentence
my mappoint control is ok, what's wrong?

__________________
greetz

On a VB form with three address entry lines "address_line1" etc., a MapPoint control named "MapPointControl1", and a button named "btnFind".


Private Sub btnFind_Click()

Dim objPin As Pushpin
Dim objLoc As Location
Dim place As String

place = Me.address_line1.Text & ", " & Me.address_line2.Text & ", " & Me.address_line3.Text

Set objLoc = Me.MappointControl1.ActiveMap.FindResults(place).I tem(1)

If objLoc Is Nothing Then
Msgbox "Nothing Found"
Exit Sub
End If

Set objPin = Me.MappointControl1.ActiveMap.AddPushpin(objLoc, Me.address_line1.Text)
objPin.Symbol = 78 '# red house
objPin.note = place
objPin.BalloonState = geoDisplayBalloon

End Sub

I get an error on this line
"Set objLoc = MappointControl1.ActiveMap.FindResults(place).Item (1)"

error: object variable or With object variable not set
runtime error "91"

thx Anthony

__________________
greetz

Have you initialised the MapPoint ActiveX on the form in the Form_Load event?


Private Sub Form_Load()

Me.MappointControl1.newMap geoMapEurope ' geoMapNorthAmerica

End Sub

Otherwise "ActiveMap" is Nothing (hence "object not set").

Try that and let me know if you're still stuck.

__________________
Regards

Anthony Hunt ach@kl2.com
Senior Technical Specialist
Kappa Lambda Squared Limited www.kl2.com
Erskine House, 53 London Road, Maidstone, Kent. ME16 8JH
Tel: 01622 670095
Fax: 01622 200119

magnus frater spectat te

thank you so very much
it works now

greeting from belgium!

__________________
greetz