منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[vb6.0] مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أمثلة ومشاريع vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=30)
+---- الموضوع : [vb6.0] مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار (/showthread.php?tid=26139)

الصفحات: 1 2 3

RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - elgokr - 15-09-18

فى البدية اقدم خالص الشكر والتقدير 
الى الاخ جاسم عبد
على مجهودة لاتمام عمل اللازم لحل مشكلة الاخ حسن الغزي

ويبدو ان المشكلة كلها كانت لدى حسن الغزي فى مسمى objHttp
حيث عند اتمام تغيير المسمى الى x كما تم برده انه اصبح يعمل لديه

فكل التوفي لكم
وتمنياتى لكم النجاح الدائم


مرحباً اختى الاصيلة
لا اعلم موقع يقدم الخدمة بصورة لها مميزات كبيرة
ولكن على حسب علمى حتى الان لا اعتقد يوجد موقع سيكون افضل من التالى
https://api.nasa.gov/api.html

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

تحياتىلكى
وتمنياتى لكى التوفيق الدائم


RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - جاسم عبد - 15-09-18

(15-09-18, 01:14 PM)elgokr كتب :
فى البدية اقدم خالص الشكر والتقدير 
الى الاخ جاسم عبد
على مجهودة لاتمام عمل اللازم لحل مشكلة الاخ حسن الغزي

ويبدو ان المشكلة كلها كانت لدى حسن الغزي فى مسمى objHttp
حيث عند اتمام تغيير المسمى الى x كما تم برده انه اصبح يعمل لديه

فكل التوفي لكم
وتمنياتى لكم النجاح الدائم


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

الصحى تحتوى على جميع التفاصيل التى قد تحتاج اليها
فقط اطلعي على الرابط وسييدك كثيراً ان شاء الله

تحياتىلكى
وتمنياتى لكى التوفيق الدائم

نعم اخي الموقر الجوكر كانت المشكله في ال objHttp مثلما تفضلت

مجهودك رائع جدا شكرا لك من كل قلبي


RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - حسن الغزي - 15-09-18

السلام عليكم
الاستاذ الفاضل الجوكر
اريد ان يعطي البرنامج رساله عندما يكون النت مقطوع

RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - الاصيله - 15-09-18

   مرحباً اختى الاصيلة
   لا اعلم موع يقدم الخدمة بصورة لها مميزات كبيرة
   ولكن على حسب علمى حتى الان لا اعتقد يوجد موقع سيكون افضل من التالى
   https://api.nasa.gov/api.html

   الصحى تحتوى على جميع التفاصيل التى قد تحتاج اليها
   فقط اطلعي على الرابط وسييدك كثيراً ان شاء الله

   تحياتىلكى
   وتمنياتى لكى التوفيق الدائم


ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

شكرا لاخي الفاضل الجوكر
الموقع مفيد جدا
شكرا مرة اخرى لك


RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - elgokr - 17-09-18

(15-09-18, 09:01 PM)حسن الغزي كتب : السلام عليكم
الاستاذ الفاضل الجوكر
اريد ان يعطي البرنامج رساله عندما يكون النت مقطوع


لعمل تحقق من الانترنت متصل ام لا

كل ما عليك فعله هو التالى

فى البداية قم باضافة سطر الـ Function 
كود :
Private Declare Function InternetGetConnectedState Lib "wininet" (ByRef dwflags As Long, ByVal dwReserved As Long) As Long

ثم قم باستخدام الكود التالى
كود :
If InternetGetConnectedState(0, 0) = 1 Then
   MsgBox "متصل بالانترنت"
Else
   MsgBox "غير متصل بالانترنت"
End If

طبعاً بدلاً من الرسالة
يمكنك وضع الكود الذى تريده

تحياتى لك
وتمنياتى لك التوفيق


RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - حسن الغزي - 17-09-18

شكرًا لك استاذنا الفاضل الجوكر
اذا سمحت لي بسؤال اخر
اريد ان أضيف للبرنامج صندوقي نص ادخل بهما احداثيات خط الطول وخط العرض والبرنامج يقوم بإضافتهما الى الرابط داخل البرنامج
كيف يكون ذلك 
انا بالحقيقه حاولت كثيرا لكنني لم أتوصل الى نتيجه
هل ممكن ذلك
وآسف للاطاله

RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - elgokr - 18-09-18

(17-09-18, 03:51 PM)حسن الغزي كتب : شكرًا لك استاذنا الفاضل الجوكر
اذا سمحت لي بسؤال اخر
اريد ان أضيف للبرنامج صندوقي نص ادخل بهما احداثيات خط الطول وخط العرض والبرنامج يقوم بإضافتهما الى الرابط داخل البرنامج
كيف يكون ذلك 
انا بالحقيقه حاولت كثيرا لكنني لم أتوصل الى نتيجه
هل ممكن ذلك
وآسف للاطاله

الشكر لله والحمد لله 
والحمد لله على كل حال

بخصوص طلبك
كل ما عليك فعله هو اضافة عدد 2 Text

واجعل كل واحد منهم الاسم الاول latText والثاني lngText
ثم تعال على هذا السطر
كود :
strURL = "https://api.sunrise-sunset.org/json?lat=36.7201600&lng=-4.4203400&date=today"

واستبدله بالتالى
كود :
strURL = "https://api.sunrise-sunset.org/json?lat=" & latText.Text & "&lng=" & lngText.Text & "&date=today"
تذكر لا تنسى ان تجعل كلاً من latText  و lngText
يحتوى على قيمة الاحداثيات حتى لا يظهر معك خطاء 

تحياتى لك
وتمنياتى لك التوفيق


RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - حسن الغزي - 22-09-18

ِزادك الله علما فوق علمك 
شكرًا لك استاذنا الجوكر

RE: مشروع عرض توقيت الشروق والغروب مع سطوع الشمس والمد والجزر مع طول النهار - elgokr - 23-09-18

(22-09-18, 12:27 AM)حسن الغزي كتب : ِزادك الله علما فوق علمك 
شكرًا لك استاذنا الجوكر


اللهم امين ولنا جميعاً يارب

الشكر لله والحمد لله
والحمد لله على كل حال

تحياتى لك
وتمنياتى لك التوفيق