استدعاء سعر من الانترنت

[abdh4747]

السلام عليكم اخواني لديا مشكله وهي انا عندي برنامج محلات الذهب 

واريد طريقة لستدعاء سعر الذهب من الانترنت  لن الذهب كل يوم يتغير سعره 

فهل من كود او دالة 

وهاذا رابط الموقع المراد السحب منه السعر

https://goldprice.org/ar/live-gold-price.html

 

استدعاء هذا الرقم فقط  

1,547.89

 

 

 

[ابو البشر]

راجع هذا الموضوع قد تجد ضالتك هنا ......

في ٣‏/١‏/٢٠٢٠ at 19:50, صالح حمادي said:

بسم الله الرحمان الرحيم و الصلاة و السلام على أشرف المرسلين أما بعد:

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

مقدمة:
WebBrowser  هي أداة تعمل عمل أي متصفح و هي مقترنة المتصفح الشهير Internet Explorer  فهي تساعدك في تصفح المواقع من ناحية و التحكم في أكواد HTML وكل ما يرتبط بها من إدخال و استخراج بيانات من ناحية أخرى.

ملاحظة: لتشغيل هذه الأداة بشكل جيد يجب تحديث المتصفح الشهير Internet Explorer  إلى الإصدار 10 أو 11. مع العلم أن ونداوز 10 به الإصدار 11

الحلقة الأولى: أكواد التصفح

سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من التصفح و التنقل داخل الأداة.

1- كود فتح صفحة موقع: WebBrowser3 هو اسم الأداة داخل النموذج

Me.WebBrowser3.Navigate ("رابط الصفحة كامل")

2- كود فتح صفحة فارغة:

Me.WebBrowser3.Navigate ("about:blank")

3- كود الرجوع للصفحة السابقة:

Me.WebBrowser3.GoBack

4- كود الإنتقال للصفحة التالية:

Me.WebBrowser3.GoForward

5- كود إعادة تحميل الصفحة:

Me.WebBrowser3.Refresh

6- كود إيقاف تحميل الصفحة:

Me.WebBrowser3.Stop

7- كود إستخراج رابط الصفحة الحالية:

MsgBox Me.WebBrowser3.Document.url

و هذا مثال لما تم ذكره في هذه الحلقة

webbroser.rar 21.94 kB · 22 تنزيلات

 

[صالح حمادي]

السلام عليكم

أخي @abdh4747 أنت تطلب عرض سعر الذهب من الويب 

يعني مكافئة الحل يجب أن تكون من ذهب

تفضل أخي لقد قمت بتصميم برنامج صغير عند الضغط على زر الأمر يقوم بجلب سعر الذهب من الموقع مباشرة

جلب سعر الذهب من الويب.rar

[ابو البشر]

ابداع أخي @صالح حمادي ما شاء الله تبارك الله

[صالح حمادي]

شكرا جزيلا أخي

[أبوبسمله]

ماشاء الله جزاك الله خيرا اخى صالح

 

[أحمد يوسف]

أستاذ

abdh4747

أين الضغط على الإعجاب على هذه الإجابات الممتازة وهذا اقل ما يقدم لصاحب الفضل بعد ربنا فى حل مشكلتك ؟! 💙