[سعود]

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]

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