PDA

View Full Version : Why is PushPin.Note empty?



myaso
10-25-2006, 07:26 AM
Hi!
Please, help me.

I import simple file into Mappoint, file has two column, Zip and Sales.


Set objDataSet = ctrlMap.ActiveMap.DataSets.ImportData("d:\1.CSV", ,
geoCountryUnitedStates)
Dim arArray
arArray = Array(objDataSet.Fields(1), objDataSet.Fields(2))
objDataSet.SetFieldsVisibleInBalloon arArray Import was successfully

I can see in balloon text two fileds! Zip and sales

BUT! When I try read balloon text programmatically in VB6, I receive
empty string.


Set objFindResult =
objLastDtlLoc.FindNearby(frmMapDetail.GetDistanceF orSearch())
If Not (objFindResult Is Nothing) Then
For Each objName In objFindResult
If TypeOf objName Is MapPoint.Pushpin Then
Set objPushPin = objName
sTxt = "Zip - " & objPushPin.Name & "Sales - " &
objPushPin.Note
frmInfoList.lstInfo.AddItem sTxt, 0
End If
Next
End If objPushPin.Name is full
objPushPin.Note is empty

Thanks!