منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيفية الربط مع جوجل ايرث
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته 

الرجاء المساعدة في معرفة الكود الذي يربط مع جوجل ايرث 

لو عندي احداثيات نقطة لها الاحداثيات 

latitude & longitiude 


فكيفاضغط علي  button  لكي يفتح جوجل ايرث ويصل الي الاحداثيات الموجودة 

مع فائق الشكر
هذه عناوين الخريطة بحيث يتم تحديد الموقع داخل العنوان مع درجة الاقتراب من الارض

هذا العنوان يعمل على أساس خريطة وقيمة الاقتراب بالوحدة z وهي في هذا العنوان 18.81z
PHP كود :
https://www.google.com/maps/@24.7114473,46.6743832,18.81z 

هذا العنوان يعمل على أساس صورة الأقمار الصناعية وقيمة الاقتراب بالوحدة m وهي في هذا العنوان 204m
مع معامل صور القمر الصناعي /data=!3m1!1e3
PHP كود :
https://www.google.com/maps/@24.7114473,46.6743832,204m/data=!3m1!1e3 

العنوان ينقسم الى أجزاء
الجزء الأول وهو الرابط لجوجل ايرث
PHP كود :
https://www.google.com/maps/ 
الجزء الثاني وهو الاحداثيات وهي هنا من نوع Double
PHP كود :
@24.7114473,46.6743832 

الجزء الثالث حالتين

الأولى
في حالة الخريطة ويتم تحديد درجة الاقتراب بالوحدة z
PHP كود :
18.81z 
الثانية
في حالة الصور من الأقمار الصناعية وتتم تحديد الاقتراب بالوحدة m
مع معلومة data الخاصة بصور الأقمار الصناعية
PHP كود :
,204m/data=!3m1!1e3 



ويمكنك فتح الموقع بالمتصفح الافتراضي في الجهاز من خلال فيجوال بيسيك كالتالي

لللخرائط
PHP كود :
Process.Start("https://www.google.com/maps/@24.7114473,46.6743832,18.81z")
أو
Dim latitude 
As Double 24.7114473
Dim longitude 
As Double 46.6743832
Dim zoom 
As Single 18.81
Process
.Start("https://www.google.com/maps/@" latitude "," longitude "," zoom "z"

للصور
PHP كود :
Process.Start("https://www.google.com/maps/@24.7114473,46.6743832,204m/data=!3m1!1e3")
أو
Dim latitude 
As Double 24.7114473
Dim longitude 
As Double 46.6743832
Dim zoom 
As Single 204
Process
.Start("https://www.google.com/maps/@" latitude "," longitude "," zoom "m/data=!3m1!1e3"
(04-05-17, 12:56 AM)mansoor كتب : [ -> ]هذه عناوين الخريطة بحيث يتم تحديد الموقع داخل العنوان مع درجة الاقتراب من الارض

هذا العنوان يعمل على أساس خريطة وقيمة الاقتراب بالوحدة z وهي في هذا العنوان 18.81z
PHP كود :
https://www.google.com/maps/@24.7114473,46.6743832,18.81z 

هذا العنوان يعمل على أساس صورة الأقمار الصناعية وقيمة الاقتراب بالوحدة m وهي في هذا العنوان 204m
مع معامل صور القمر الصناعي /data=!3m1!1e3
PHP كود :
https://www.google.com/maps/@24.7114473,46.6743832,204m/data=!3m1!1e3 

العنوان ينقسم الى أجزاء
الجزء الأول وهو الرابط لجوجل ايرث
PHP كود :
https://www.google.com/maps/ 
الجزء الثاني وهو الاحداثيات وهي هنا من نوع Double
PHP كود :
@24.7114473,46.6743832 

الجزء الثالث حالتين

الأولى
في حالة الخريطة ويتم تحديد درجة الاقتراب بالوحدة z
PHP كود :
18.81z 
الثانية
في حالة الصور من الأقمار الصناعية وتتم تحديد الاقتراب بالوحدة m
مع معلومة data الخاصة بصور الأقمار الصناعية
PHP كود :
,204m/data=!3m1!1e3 



ويمكنك فتح الموقع بالمتصفح الافتراضي في الجهاز من خلال فيجوال بيسيك كالتالي

لللخرائط
PHP كود :
Process.Start("https://www.google.com/maps/@24.7114473,46.6743832,18.81z")
أو
Dim latitude 
As Double 24.7114473
Dim longitude 
As Double 46.6743832
Dim zoom 
As Single 18.81
Process
.Start("https://www.google.com/maps/@" latitude "," longitude "," zoom "z"

للصور
PHP كود :
Process.Start("https://www.google.com/maps/@24.7114473,46.6743832,204m/data=!3m1!1e3")
أو
Dim latitude 
As Double 24.7114473
Dim longitude 
As Double 46.6743832
Dim zoom 
As Single 204
Process
.Start("https://www.google.com/maps/@" latitude "," longitude "," zoom "m/data=!3m1!1e3"

يسلموا ايديك  أخي الحبيب وبارك الله فيك
 ' add reference Google earth 1.0 type library le logitiel google earth est déja instalé' 
Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       
        Dim ge As EARTHLib.ApplicationGE
        ge = New EARTHLib.ApplicationGE


        ge.SetCameraParams(lat:=36.731499, lon:=3.501545, alt:=150, altMode:=1, Range:=1, Tilt:=70, Azimuth:=360 - 15, speed:=5)


    End Sub