منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - كيف افتح الاتصال باستخدام هذا الكود

PHP كود :

       Dim str As String = New Data.OleDb.OleDbCommand("select tname from tb", New Data.OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=db.accdb")).ExecuteReader().ToString
        MsgBox(str) 

اعرف الطريقة العادية وهي تعريف متغيرات ... لكن اريد هذه الطريقة كيف نفتح الاتصال ليعمل الكود.

بهذه الجملة لن تتمكن من الاتصال لان
تعريفك لمتغير نصي ثم تجعل مساويا لكائن فهذا امر يستحيل
dim str as string = new Data.OledbCommand
هذا امر
الامر الثاني لا بد من فتح الاتصال قبل تنفيذ اي اجراء متضمن لجملة الاستعلام
ExecuteReader()
ExecuteScalar()
ExecuteNonQuery()
لكن سيضبط معك الكود بالشكل التالي

PHP كود :

Dim str = New Data.OleDb.OleDbCommand("select tname from tb ", New Data.OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\db.accdb"))
        str.Connection.Open() 

عن تجربة !
هذا والله أعلى وأعلم

صحيح ما كتبه أخ عمر
تسلم

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

سعود

أبو عمر

aliday03