23-05-16, 06:02 PM
السلام عليكم البرنامج شغال 100% لكن عندما قمت بتحديث Visual Basic 2015 الى update 2 ظهرت بعض الاخطاء ولم يعمل البرنامج ومكان الخطأ يكون في الاتصال بقاعدة البيانات رغم اني قمت بتغيير الكود ومثل الشيء لم يعمل فقررت اني اغير الاكواد بالكامل معكم ليكون البرنامج افضل واسرع .
اول كود الاتصال بالقاعدة البيانات : ( بعد التعديل سوف اضع كود اخر لنقوم بتعديلة وتغيير ربما تعطوني كود يتكون من سطرين بدل 4 اسطر او اكثر )
ملاحظة بسيطة في هذا الكود :
عندما اجعل
الى
لايعمل وهذا الشيء الذي جعله لم يعمل وعندما ارجعته لطبيعي مثل الشيء لم يعمل ولا يقرا القاعدة في الاساس
رسالة الخطأ
اول كود الاتصال بالقاعدة البيانات : ( بعد التعديل سوف اضع كود اخر لنقوم بتعديلة وتغيير ربما تعطوني كود يتكون من سطرين بدل 4 اسطر او اكثر )
كود :
Imports System.Data.OleDb
Module ModConVar
Public sqL As String
Public cmd As OleDbCommand
Public dr As OleDbDataReader
Public conn As OleDbConnection
Public Sub ConnDB()
Try
conn = New OleDbConnection("Provider = Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\POSInventoryDB.accdb;Persist Security Info=True;")
conn.Open()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Subعندما اجعل
كود :
Persist Security Info=True;كود :
Persist Security Info=False;لايعمل وهذا الشيء الذي جعله لم يعمل وعندما ارجعته لطبيعي مثل الشيء لم يعمل ولا يقرا القاعدة في الاساس
رسالة الخطأ
كود :
---------------------------
SalesInventorySystem
---------------------------
The 'Microsoft.ACE.OLEDB.12.0' provider is not registered on the local machine.
---------------------------
OK
---------------------------