04-03-15, 10:12 PM
(04-03-15, 02:46 PM)sv25b858 كتب :
شكراً لكم
أنا شغال بـ Microsoft Office 2003
ممكن مثال بـ Microsoft Office 2003
حمل قاعدة البيانات التالية من المرفقات وأستبدلها بالموجودة لديك
ثم استبدل السطر التالي
كود :
Dim constr As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\\Database1.accdb"
بهذا السطر
كود :
Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\\Database1.mdb"