هذا كود الاتصال مع قاعدة بيانات 2007 وما فوق
dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath() & ("filedata.accdb"))
dim cmd As New OleDbCommand
______________________________________
cmd.CommandText = "select * from .............................."
cmd.Connection = con
.................................................... بقية الكود
(12-10-13, 08:51 AM)قناص المدينة كتب : هذا كود الاتصال مع قاعدة بيانات 2007 وما فوق
dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath() & ("filedata.accdb"))
dim cmd As New OleDbCommand
______________________________________
cmd.CommandText = "select * from .............................."
cmd.Connection = con
.................................................... بقية الكود
-----------------------------------------------------------------------------------------
استاذي العزيز
السلام عليكم ورحمة وبركاته
هل يمكن التعديل على برنامجي المرفق ؟؟
والله يحفظكم ويرعاكم ويجعل الجنة داركم الاخير
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
12-10-13, 11:12 AM (آخر تعديل لهذه المشاركة : 12-10-13, 11:25 AM {2} بواسطة Microformt.)
(12-10-13, 10:21 AM)nmst70 كتب : هذا الملف اخي العزيز بعد التعديل
---------------------------------------------------------
استاذي العزيز
السلام عليكم ورحمة وبركاته
سوال اخير معليش اخوك مستجد
الماذا البرنامج الذي تم التعديل عليه من طرفكم لا قبل التعديل ؟؟
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ