ما معنى هذه الرسائل

بالنسبة للخطأ الاول does not support updating

اما ان تكون فتحت الجدول للقراءة مثل

RS.Open "select", cn, adOpenForwardOnly, adLockReadOnly

او تستخدم طريقة عن ال odbc او provider لا يدعم التخزين

وخطأ eof or bof اي لا يوجد سجل حالي او تنقلت movenext حتى النهاية او الجدول لا يحتوي على سجلات او تم حذف السجل من الجدول من مكان اخر

وخطأ fetching backword

على الاغلب ال rs مفتوحة باستخدا م adOpenForwardOnly وهي لا تدعم الا التنقل الى الامام لذلك يجب استبدالها ب adOpenStatic

كذلك بالنسبة adOpenDynamic اعتقد من الافضل استبدالها ب adOpenkeyset او static

كذلك بالنسبة لهذه المشاركة فهي لا تتعلق باستخدام sql server وانما تتعلق بالفبجوال بيسك لذلك من الافضل طرحها هناك حتى تجد اجابة اكثر

DB.ConnectionTimeout = 25									   ' Set the time out.
DB.Provider = "sqloledb"										' Specify the OLE DB provider.
DB.Properties("Data Source").Value = ServerName				 ' Set SQLOLEDB connection DB.Properties("Initial Catalog").Value =  DBName					' Set SQLOLEDB DB.Properties("Integrated Security").Value = "SSPI"  
DB.Open

هذا هو كود الإتصال الذي قمت به هل به خطأ

جرب هذه الطريقة والتي هي نفس الشيء لكن استخدم SQLOLEDB.1 وهي فعلا قد يكون منها بعض المشاكل

dim strCn as string 
strCn="PROVIDER=SQLOLEDB.1;Initial Catalog=db;Data Source=servername;Integrated Security =SSPI;"
DB.open  strCn

او استبدل فقط

DB.Provider = "sqloledb.1"

نفس المشكلة لاحظت شيء آخر أنا عندي مثال يستخدم قاعدة البيانات الموجودة في SQL Server Enterprice Manager

وهي Northwind وتجري فيها العمليات من دون مشاكل ، أعتقد أن المشكلة في إعداد قاعدة البيانات هل هناك إجراءات معينة لإنشاء قاعدة بيانات بال SQL Server Enterprice Manager .؟؟

لا توجد اجراءات معينة لانشاء قاعدة البيانات لكن تأكد من الصلاحيات وان امكن ان تدخل بالمستخدم sa

 PROVIDER=SQLOLEDB.1;PassWord=12345;Persist Security Info=True;User ID=sa;Initial Catalog=db;Data Source=;