Welcome to MapForums!

Register, sign in, or use Facebook Connect above to join in and participate in the forum.

When you are signed in, this message, the ads in this row, and the red-underlined link ads all go away.

Subscribe to receive our newsletter.
Subscribe Unsubscribe
Results 1 to 3 of 3

New Application visible=False?????

This is a discussion on New Application visible=False????? within the MapPoint Desktop Discussion forums, part of the Map Forums category; Excuse for my english. Hello . I have adapted this code of an example of this forum. I want obtain ...

  1. #1
    ikercio is offline Junior Member White Belt
    Join Date
    Dec 2007
    Posts
    11

    New Application visible=False?????

    Excuse for my english.

    Hello . I have adapted this code of an example of this forum. I want obtain the distance in km, and drivingtime but without see the process. This one is the codeI use vb6 and MP2006)

    Dim DistKm As Variant
    Dim DistTime As String
    Dim DistStLine As Variant
    Dim objApp As Application
    Set objApp = CreateObject("MapPoint.Application.EU.13")

    objApp.UserControl = True
    objApp.Visible = False

    Set objMap = objApp.NewMap
    Set objRte = objMap.ActiveRoute

    objMap.Application.Units = geoKm
    objRte.Waypoints.Add objMap.GetLocation(43.27409494, -2.02701163)
    objRte.Waypoints.Add objMap.GetLocation(43.275455, -2, 275865
    'objApp.ItineraryVisible = False
    objRte.Calculate
    DistKm = (objRte.Distance)
    DistTime = (objRte.DrivingTime * 24) * 60 'para calcular el tiempo en minutos
    DistStLine = objMap.Distance(objMap.GetLocation(43.27409494, -2.02701163), objMap.GetLocation(43.275455, -2, 275865)

    Debug.Print DistKm
    Debug.Print DistTime
    Debug.Print DistStLine

    End Sub

    At the end of the code always it shows the map with the created route and asks me if I want to save the changes. How can i do not to see the map and the question??
    Thank you.



    At the end of the code always it shows the map with the created route and asks me if I want to save the changes. How can i do not to see the map and the question??

    Thank you.

  2. #2
    Mattys Consulting's Avatar
    Mattys Consulting is offline Senior Member Black Belt
    Join Date
    Dec 2002
    Posts
    1,040

    Re: New Application visible=False?????

    ...
    objMap.Saved = True
    ...
    End Sub

    Mike Mattys

  3. #3
    ikercio is offline Junior Member White Belt
    Join Date
    Dec 2007
    Posts
    11

    Re: New Application visible=False?????

    ok.....Thanks a lot again!!


    Iker

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Making all the pushpins visible
    By BobFromBoston in forum MapPoint Desktop Discussion
    Replies: 1
    Last Post: 01-28-2007, 02:46 AM
  2. having the driver always be visible
    By BobFromBoston in forum MapPoint Desktop Discussion
    Replies: 2
    Last Post: 07-31-2005, 12:51 PM
  3. How to tell if an objects location is visible?
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 2
    Last Post: 06-28-2004, 08:15 AM
  4. ensure pushpin is visible
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 2
    Last Post: 05-13-2003, 10:23 AM
  5. Pb with another application
    By Anonymous in forum MapPoint Desktop Discussion
    Replies: 0
    Last Post: 12-17-2002, 03:53 AM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  


1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87