29-01-18, 07:33 PM
(29-01-18, 04:06 PM)atefkhalf2004 كتب : السادة الافاضل
واضح ان احد بص لي في العروسة select
استخدمت الكود التالي وبه خطا
الجدول المراد نسخه هو school الي جدول تحت اسم gggg في القاعدة الموجودة علي ال d:
If Conn.State = ConnectionState.Open Then Conn.Close()
Dim SavInto7 As New OleDb.OleDbCommand
SavInto7.Connection = Conn
SavInto7.CommandType = CommandType.Text
'SavInto7.CommandText = "SELECT * INTO bbbb FROM student"
SavInto7.CommandText = "SELECT school.* into gggg in '[MS Access;PWD=123321;DATABASE=d:\primary1617.mdb]' FROM school "
Conn.Open()
SavInto7.ExecuteNonQuery()
Conn.Close()
حضرتك الطريقة دي تنسخ السجلات فقط
ارغب في عمل استيراد للجدول مثل نسخ الجدول من خلال المعالج لانه يسخه كله بما في ذلك تعريفات الاعمدة الحقول
وايضا هذا الكود اعطي خطا لماذا
SavInto7.CommandText = "SELECT school.* INTO [;DATABASE=MS Access;PWD=123321;DATABASE=d:\primary1617.mdb].aaaa2 FROM school "
اخي الكريم : اتبع نفس الكود في مشاركتي السابقة
فقط عدل اسماء الجداول ومسار القاعدة.
انت تضيف نص الاتصال بالكامل داخل جملة الاستعلام، اكيد لن يعمل الكود.
