collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 14
  • Punkt Versteckte: 0
  • Punkt Mitglieder: 0

Es sind keine Mitglieder online.

* Forenstatistik

  • stats Mitglieder insgesamt: 13930
  • stats Beiträge insgesamt: 66093
  • stats Themen insgesamt: 8913
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: Open Street Map  (Gelesen 416 mal)

Offline zilo

  • Newbie
  • Beiträge: 4
Open Street Map
« am: April 04, 2018, 09:53:46 »
Hallo Zusammen,

ich möchte die OpenStreetMap in meinen Formular einbinden so dass ich eine Route planen kann.
Die Eingabe der Start und Ziel adresse soll im Formular erfolgen (also nicht über die Karte)
Mit einem btnClick soll es dann die entsprechende Route anzeigen.

Wie sollte ich vorgehen? Das WORLD WIDE WEB meinte ich brauche zusätzliche Kenntnisse in JavaScript? Leider habe ich damit keine Erfahrung gemacht und mit VBA genauso wenig.


Vielen Dank im Vorraus.
 :)
 

Offline datekk

  • Access-Meister
  • ***
  • Beiträge: 699
Re: Open Street Map
« Antwort #1 am: April 05, 2018, 16:50:10 »
Hallo Zilo und herzlich Willkommen hier im Forum. Ich kann Dir leider nicht konkret zu Open Street Map helfen. Bitte nutze doch mal die Suchfunktion hier im Forum und suche nach Google Maps. Da gibt es einige Beiträge und auch ich nutze die Google Maps API zum berechnen von Entfernungen in meiner Access Datenbank.

LG
datekk
 

Offline zilo

  • Newbie
  • Beiträge: 4
Re: Open Street Map
« Antwort #2 am: April 10, 2018, 12:49:18 »
Das habe ich - und auch schon in diversen Foren, leider finde ich keine Antworten  :-[

Also Google Maps hat ja diesen folgenden Link:
 'strHyperlink = "http://maps.google.de/maps?f=d&hl=de&saddr=" _
                 & Start & "&daddr=" & Ziel

damit kann ich mit einem Button im Formular Google Maps öffnen und er berechnet mir dann die Route aus Werten aus der Tabelle.

So "Müsste" es doch in OSM aussehen? Funktioniert aber nicht 

 'strHyperlink = "http://www.openstreetmap.org/directions?from=" _
                & Start "&to=" & Ziel &


Hat da jemand eine Ahnung?
 

Offline PhilS

  • Administrator
  • Access-Profi
  • *****
  • Beiträge: 325
    • Tipps zu Access, VBA, SQL und Co.
Re: Open Street Map
« Antwort #3 am: April 10, 2018, 13:09:37 »
So "Müsste" es doch in OSM aussehen? Funktioniert aber nicht 

 'strHyperlink = "http://www.openstreetmap.org/directions?from=" _
                & Start "&to=" & Ziel &
Was heißt "Funktioniert aber nicht"?
Neues Access 2019 Feature angekündigt: Modern Charts
 

Offline markus888

  • Access-Profi
  • **
  • Beiträge: 192
10 Jahre Access
 

Offline zilo

  • Newbie
  • Beiträge: 4
Re: Open Street Map
« Antwort #5 am: April 10, 2018, 13:25:17 »
Also das ist mal der Mini Code:

Private Sub Befehl6_Click()

    Dim strHyperlink As String
    Dim Start As String
    Dim Ziel As String

    'Werte (Start und Ziel) in Formular eingeben
    Start = Me!Ziel_Adresse & " " & Me!Ziel_PLZ
    Ziel = Me!Adresse & " " & Me!PLZ
   
 'saddr = Ausgangspunkt
 'daddr = Zielpunkt
 
 strHyperlink = "http://maps.google.de/maps?f=d&hl=de&saddr=" _
                 & Start & "&daddr=" & Ziel
   
    Application.FollowHyperlink strHyperlink
   
   
End Sub

(Anders zu meiner Frage ist hier Google Maps nicht im Formular integriert)

Und meine Frage war ob es möglich ist genau nach dem gleichen Prinzip OpenStreetMap zu öffnen und die Route anzeigt.

LG


 

Offline Lachtaube

  • Access Guru
  • ****
  • Beiträge: 1205
Re: Open Street Map
« Antwort #6 am: April 10, 2018, 14:01:04 »
Das geht doch ziemlich genau analog. Im VBA-Direktfenster:FollowHyperlink "http://www.openstreetmap.org/directions" & _
                "?engine=grasshopper_bicycle" & _
                "&from=Berlin,12051,Karl-Marx Strasse 147" & _
                "&to=Potsdam,Isoldestrasse 4"
Grüße von der (⌒▽⌒)
 
Folgende Mitglieder bedankten sich: zilo

Offline PhilS

  • Administrator
  • Access-Profi
  • *****
  • Beiträge: 325
    • Tipps zu Access, VBA, SQL und Co.
Re: Open Street Map
« Antwort #7 am: April 10, 2018, 14:16:49 »
Das geht doch ziemlich genau analog. Im VBA-Direktfenster:
Genau! Deshalb meine Frage nach dem konkreten Problem.
Nebenbei: Die Engine heißt: graphhopper_bicycle
Neues Access 2019 Feature angekündigt: Modern Charts
 
Folgende Mitglieder bedankten sich: zilo

Offline Lachtaube

  • Access Guru
  • ****
  • Beiträge: 1205
Re: Open Street Map
« Antwort #8 am: April 10, 2018, 14:57:43 »
Ich muss vielleicht doch noch einmal den Optiker besuchen - aber vielleicht hilft es auch, einfach mal die Brille zu putzen. :)
Grüße von der (⌒▽⌒)
 

Offline Beaker s.a.

  • Access Guru
  • ****
  • Beiträge: 1750
Re: Open Street Map
« Antwort #9 am: April 10, 2018, 16:25:52 »
Oder weniger zu rauchen  ;D
--
Beaker s.a., der lieber an seinem eigenen Projekt arbeiten würde/sollte, aber irgendwie immer gerne seinen Senf dazu gibt ;-)
S.M.I².L.E.
 

Offline zilo

  • Newbie
  • Beiträge: 4
Re: Open Street Map
« Antwort #10 am: April 11, 2018, 10:09:23 »
Das geht doch ziemlich genau analog. Im VBA-Direktfenster:FollowHyperlink "http://www.openstreetmap.org/directions" & _
                "?engine=grasshopper_bicycle" & _
                "&from=Berlin,12051,Karl-Marx Strasse 147" & _
                "&to=Potsdam,Isoldestrasse 4"

Wenn ich die Ausgabe nicht im Direktfenster machen will sondern über mein Formular also mit Werten aus der Tabelle Automatisch übergeben möchte?
(Wie im Mini Beispiel oben: Da werden die Start/Ziel Adressen von der Tabelle übergeben).


UPDATE:
FollowHyperlink "http://www.openstreetmap.org/directions?from=&to=" _
                & Start & "&from=" & Ziel

Damit hat es geklappt :-)
« Letzte Änderung: April 11, 2018, 10:40:08 von zilo »