تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية نسخ جدول من قاعدة بيانات الى قاعدة أخرى علما بأن القاعدتين لهم باسورد
#1
الاخوة الافاضل
ارغب فى كود لنسخ بيانات جدول فى قاعدة بيانات الى قاعدة أخرى ( اكسس 2003) والقاعدتين لهم باسورد وذلك من خلال الفيجول بيسيك  6 باستخدام SQL  و INSERT INTO



المطلوب كود لنسخ البيانات من جدول الاخر فى الفيحول بيسيك 6 مع العلم أن قاعدة البيانات الاولى والثانية محمية بكلمة سر والقاعدة معمولة بالاكسس 2003
الرد }}}
تم الشكر بواسطة:
#2
أهلا أخي الكريم , هذا مثال للأخ sniper.ps عضو من هذا المنتدى .


الملفات المرفقة
.rar   نقل بيانات من قاعدة إلى أخرى.rar (الحجم : 20.76 ك ب / التحميلات : 276)
الرد }}}
تم الشكر بواسطة: ahmedabdelaliem
#3
(22-08-16, 01:17 AM)Ahmed_Mansoor كتب : أهلا أخي الكريم , هذا مثال للأخ sniper.ps عضو من هذا المنتدى .

شكرا اخى الكريم على الرد واسمح لى بسؤال عن تصحيح للصيغة التالية لنسخ بيانات جدول من قاعدة الى أخرى
1 - يتم فتح القاعدة التى يراد منها نسخ الحدول كالاتى
            DB2.CursorLocation = adUseClient
            DB2.Provider = "microsoft.jet.oledb.4.0;Jet OLEDBBig Grinatabase Password=123;"
            DB2.Open App.Path & "\database2.mdb"
2 - استخدام الصيفة التالية
            SQL1 = " INSERT INTO " & PN1 & " IN '" & App.Path & "\database1.mdb ' 'ACCESS' SELECT * FROM " & PK1
                    DB2.Execute SQL1
PN1 اسم الجدول المراد النسخ اليه
database1 اسم قاعدة البيانات المراد النسخ اليها والمطلوب هنا اضافة كلمة السر لهذه القاعدة وهى 456
PK1 اسم الجدول المراد النسخ منه
وشكرا لكم على المتابعة - وفى انتظار الرد
الرد }}}
تم الشكر بواسطة:
#4
أهلا أخي الكريم , هذه الصيغة :

1- فتح فاعدة البيانات الأولى والتي يوجد فيها الجدول المراد نسخ البيانات منه  وليكن مثلا إسم القاعدة الأولى هو Database1.mdb وكلمة المرو الخاصة بها هي 123 :

PHP كود :
DB.CursorLocation adUseClient
DB
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\Database1.mdb;Jet OLEDB:Database Password=123;Persist Security Info=False" 

2- نسخ البيانات من الجدول الموجود في قاعدة البيانات الأولى إلى الجدول الموجود في قاعدة البيانات الثانية وليكن إسمها Database2  وكلمة المرور لها هي 456 وإسم الجدول المراد النسخ إليه هو Table2 , ملاحظه سيتم نقل أو نسخ البيانات بدون شروط يعني بدون كلمة Where لذلك لابد أن تكون الأعمدة او الحقول في كلا الجدولين متطابقة :

PHP كود :
DB.Execute "Insert Into [;DATABASE=" App.Path "\Database2.mdb;PWD=456].Table2 Select * From Table1" 
الرد }}}
تم الشكر بواسطة: ahmedabdelaliem , ahmedabdelaliem


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة التعامل مع قاعدة البيانات وربطها بالفيجوال بيسك 6 ENG.MPROG 11 22,046 21-02-24, 08:29 PM
آخر رد: Nasa_use
  ربط قاعدة البيانات بالانترنت abu jana 7 3,462 26-03-23, 04:17 PM
آخر رد: sanyor77
  عرض الصور من قاعدة بيانات اكسس داخل الداتا ريبورت mohammed_atallah 0 689 01-09-22, 01:25 PM
آخر رد: mohammed_atallah
  كيف استخدم خاصيه (thread) في امر زر البحث من قاعده بيانات مثلا (mdb) او (mysql) scsi7000 0 751 29-07-22, 10:53 AM
آخر رد: scsi7000
  [سؤال] كيفية إظهار QR Code على Crystal Reports 10 tarekj 1 2,413 15-12-21, 03:53 AM
آخر رد: AmrSobhy
  كيفية منع تكرار التاريخ فى قاعدة البيانات ؟ gedo 7 5,691 19-06-21, 09:31 PM
آخر رد: khaled201349
  كود نوع بيانات الحقل اسلام الكبابى 1 2,720 06-06-21, 04:30 AM
آخر رد: Fareed
  طلب طريقة نقل البيانات من جدول الي جدول اخر في قاعدة بيانات اخر ahmed201 2 2,340 01-03-21, 12:14 AM
آخر رد: ahmed201
  فورم vb6 لنقل بيانات من جدول لآخر بنفس قاعدة بيانات اكسيس محمد تريكه 5 3,712 24-02-21, 08:10 PM
آخر رد: ahmed201
  [سؤال] البرنامج لا يقرأ من قاعدة البيانات بعد تنصيب البرنامج على ويندوز 10 aboezzat84 4 2,209 03-01-21, 02:58 AM
آخر رد: aboezzat84

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم