اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كود جلب بيانات من داخل موقع


Zooro1

الردود الموصى بها

السلام عليكم ورحمة الله

الأخوة الافاضل، ارجو المساعدة 

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

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

يعني حقل التاريخ في الموقع يكون في حقل التاريخ في قاعدة البيانات وحقل الجهة المرسلة يكون في حقل الجهة المرسلة في قاعدة البيانات وهكذا باقي الحقول.

وشكرا لكم.

 

 

رابط هذا التعليق
شارك

منذ ساعه, Zooro1 said:

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

راجع هذا الموضوع وبدقة عالية تجد الاجابات بها ....

في 3‏/1‏/2020 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 · 436 downloads

 

  • Like 1
رابط هذا التعليق
شارك

تصفح مواضيع الاستاذ @أبو إبراهيم الغامدي 

سحب البيانات من الموقع الى جدول الاكسس

 

وفي طريقة آلية قديمة 

 ملف اكسل استضافة مع كود عند تغير الرابط تحديث 

لينك للاكسل (فقط ربط) داخل اكسس 

 الحاق جدول لينك الى جدول الاكسس

مع فورم لتحديث الرابط من جدول الاكسس 

 الى ملف اكسل برابط لنك وتحديث تلقائي من نفس ملف اكسل

بالكود

 

افضل من تفكيك صفحة الموقع  للوصول الى نص لكل نص في الموقع

مع دعم دائم لكل تحديث في الموقع 

 

الافضل بحث عن آلية حديثة 😇 

  • Like 1
رابط هذا التعليق
شارك

1 ساعه مضت, hanan_ms said:

تصفح مواضيع الاستاذ @أبو إبراهيم الغامدي 

سحب البيانات من الموقع الى جدول الاكسس

 

وفي طريقة آلية قديمة 

 ملف اكسل استضافة مع كود عند تغير الرابط تحديث 

لينك للاكسل (فقط ربط) داخل اكسس 

 الحاق جدول لينك الى جدول الاكسس

مع فورم لتحديث الرابط من جدول الاكسس 

 الى ملف اكسل برابط لنك وتحديث تلقائي من نفس ملف اكسل

بالكود

 

افضل من تفكيك صفحة الموقع  للوصول الى نص لكل نص في الموقع

مع دعم دائم لكل تحديث في الموقع 

 

الافضل بحث عن آلية حديثة 😇 

أستاذة حنان، ممكن الرابط تبع المواضيع مع استاذنا إبراهيم، 

وممكن تشرحي تأتي نقطة دي 

اللي هي طريقة آلية قديمة  .ازاي ملف اكسل لاني مش قوي في الاكسس 

تم تعديل بواسطه Zooro1
رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

أخي الكريم كنت ابحث في الموضوع منذ أن طرحته (كود جلب بيانات من داخل موقع)

ولم أجد مايصل الى الهدف بل كل ما وجدته يدور حوله. فطلب حضرتك ربط الاكسس بالموقع بطريقة شرعية وتحديث البيانات داخل قاعدة الاكسس بالضغط على زر (Import) .

بينما (جلب البيانات) طريقة غير شرعية .وذلك لأن الموقع المراد سحب البيانات منه غير مصمم ليرتبط مع قاعدة بيانات اكسس وغير مصرح لك بجلب تلك البيانات (Data Grab) لوجود حماية على كل المواقع من كل أدوات جلب البيانات أو (الاستيلاء على البيانات)

أما عدا ذلك فهو خيال علمي

والخلاصة

أنه يجب عليك تصميم قاعدة بيانات اكسس مرتبطة مسبقاً مع الموقع. لا أن يتم ذلك بعيدا عن مصمم الموقع أو بدون أذن للولوج للموقع وربط قاعدة البيانات به.

بالنسبة لطلبك (أستاذة حنان، ممكن الرابط تبع المواضيع مع استاذنا إبراهيم) 

تفضل

الملف الذي عليه النقاش مباشرة موجود بالمرفقات 

والكود الموجود به هو 

Dim mypath  As String

mypath = "http://www.nbe.com.eg/en/ExchangeRate.aspx"
txtpath = mypath2
    DoCmd.Maximize
   
    Set web = Me.WebBrowser4.Object
    web.Navigate mypath

أما بالنسبة لنوع صفحة الموقع واللغة المكتوبه به هو عبارة عن  ملفات ASPX وهي اختصار ل Active Server Pages

وهذا الرابط يشرح المزيد https://www.3arrafni.com/aspx-files/

وهناك ماوجدته لتصميم قاعدة اكسس وربطه بالموقع مسبقاً 

 

أو 

وهذه طريقة يدوية لجلب البيانات من صفحة HTML  مخزنة على الكمبيوتر

وهذا رابط أخر تناول الموضوع مسبقاً على هذا المنتدى العظيم 

 

و أرجو أن أكون قد أفدتك.

أخوك أحمد دراز

WebImport.rar

تم تعديل بواسطه ahmed draz
  • Like 2
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

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



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information