hosslom قام بنشر أغسطس 25 مشاركة قام بنشر أغسطس 25 (معدل) السلام عليكم اخوتي الكرام هل يوجد كود من داخل الاكسس لارفاق قاعده بيانات سيكوال للسيرفر علي الجهاز من داخل نموذج الاكسس ؟؟ او استخدام command line لعمل ارفاق لاي ملف في نفس المجلد ,شكرا جزيلا تم تعديل أغسطس 25 بواسطه hosslom رابط هذا التعليق شارك More sharing options...
muhandesramadan قام بنشر أغسطس 28 مشاركة قام بنشر أغسطس 28 Sub ConnectToSQLServer() Dim conn As Object Dim connString As String Dim db As DAO.Database ' إنشاء اتصال جديد باستخدام ADO Set conn = CreateObject("ADODB.Connection") ' إعداد سلسلة الاتصال connString = "Provider=SQLOLEDB;Data Source=اسم_السيرفر;Initial Catalog=اسم_قاعدة_البيانات;User ID=اسم_المستخدم;Password=كلمة_المرور;" ' فتح الاتصال conn.Open connString ' إعداد قاعدة البيانات Set db = CurrentDb ' ربط جدول من SQL Server إلى Access db.TableDefs.Append db.CreateTableDef("اسم_الجدول_في_الاكسس", , "اسم_الجدول_في_SQL", connString) ' إغلاق الاتصال conn.Close Set conn = Nothing Set db = Nothing End Sub رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان