اذهب الي المحتوي
أوفيسنا

حفظ البيانات من جدول في صفحة ويب


إذهب إلى أفضل إجابة Solved by kanory,

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

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

في القاعدة المرفقة نموذج متصفح يحتوي على صفحة ويب بداخلها جدول و عمل من عمل الأستاذ صالح حمادي جزاه الله خيرآ

المطلوب حفظ البيانات الخاصة بالجدول الموجود ضمن المتصفح في الجدول الموجود في القاعدة mytable

و لكم جزيل الشكر 

 

webSaveTest.accdb

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

  • أفضل إجابة

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

    Dim i, j As Integer
    Dim rs As DAO.Recordset
     Set rs = CurrentDb.OpenRecordset("mytable")
For j = 1 To WebBrowser3.Document.getElementsByTagName("table").Item(0).rows.Length - 1
        rs.AddNew
        rs!t1 = WebBrowser3.Document.getElementsByTagName("table").Item(0).rows(j).cells(1).innerText
        rs!t2 = WebBrowser3.Document.getElementsByTagName("table").Item(0).rows(j).cells(2).innerText
        rs.Update
 Next
  MsgBox "تم الاستيراد بنجاح"

 

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

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

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



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

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

Important Information