طريقة تعديل ConnectionString المخزنة في Setting برمجيا

الجمعة أكتوبر 19, 2012 6:31 pm

الحل منقول من فيديو في موقع ميكروسوفت HowDoI

عند إنشاء إتصال بقاعدة بيانات يتم إضافة نص الإتصال في Setting ويكون للقراءة فقط.
لتعديل نص الإتصال أثناء تشغيل البرنامج (RunTime) عليك إتباع التالي:

1- انقر على MyProject ثم Setting ثم F7 لإظهار كود Setting
2- أضف الكود التالي:

الكود:

Public Sub SetConnectionString(ByVal ConnectionString As String) Me("ConnectionString") = ConnectionString Me.Save() End Sub

3- لتعديل نص الإتصال أثناء التنفيذ أكتب الكود التالي:

الكود:

My.Settings.SetConnectionString _ ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Blank.Accdb")