النقل كالتالي
و عندك خطأ في Adodc2 لذا اضغط عليه الزر الايمن للماوس و اختار خصائص التبويب جنرال آخر خانة امحي ما فيها و استبدلها ب :
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=1.mdb;Persist Security Info=False
التحديث ربما
Adodc1.Refresh
PHP كود :
For g = 0 To Adodc1.Recordset.RecordCount - 1
Adodc1.Recordset.Move (g)
Adodc2.Recordset.AddNew
Adodc2.Recordset.Fields!الرقم = Adodc1.Recordset.Fields!الرقم
اكمل هنا على شكل السطر السابق يعني فقط نفس الكود استبدل كلمةالرقم ب السن او اللقب او الاسم
Adodc2.Recordset.Update
Next
و عندك خطأ في Adodc2 لذا اضغط عليه الزر الايمن للماوس و اختار خصائص التبويب جنرال آخر خانة امحي ما فيها و استبدلها ب :
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=1.mdb;Persist Security Info=False
التحديث ربما
Adodc1.Refresh