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



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


الملفات المرفقة
.rar   نقل بيانات من قاعدة إلى أخرى.rar (الحجم : 20.76 ك ب / التحميلات : 34)
الرد }}}}
تم الشكر بواسطة: 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 8 4,097 22-11-16, 09:38 AM
آخر رد: مزنة
  كيفية منع تكرار التاريخ فى قاعدة البيانات ؟ gedo 6 874 25-10-16, 10:10 AM
آخر رد: abulayth
  انشاء علاقة بين الجداول في قاعدة بيانات SQL aiman 1 79 14-10-16, 09:24 PM
آخر رد: aiman
  كيف رفع قاعدة بيانات اكسس 2003 على النيت abosara 2 162 26-08-16, 11:34 AM
آخر رد: Amir_alzubidy
  مطلوب كود لكسر باسورد قاعدة بيانات اكسس 2003 abosara 1 106 23-08-16, 05:35 PM
آخر رد: abulayth
  حفظ الصورة بعد عمل سحبها من السكانر(الماسح الضوئي) في قاعدة البيانات haniblack 8 379 09-08-16, 11:03 AM
آخر رد: naseef
  سؤال حول حماية ملف قاعدة البيانات VAVABEL 2 211 10-07-16, 04:00 PM
آخر رد: VAVABEL
  من قاعدة البانات الى مصفوفة أزواج مرتبة اسلام الكبابى 4 231 19-04-16, 02:50 AM
آخر رد: Ahmed_Mansoor
  الاتصال بقاعدة بيانات بارادوكس paradox عن طريق vb6 vbtemp 0 181 07-04-16, 11:52 PM
آخر رد: vbtemp
  يمكن ربط الفيجوال بيسك 6 بقاعدة بيانات MySQL على سيرفر محلي AEDC 14 4,535 20-03-16, 10:30 PM
آخر رد: bozo2

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


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