الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أي طريق أسرع

مغلق
بدأه زائر في 24 أبريل 2001 · 3 رد · 688 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الأخوة الأفاضل عندي سؤال وأستخدم قاعدة بيانات أكسيس 2000 مع الفيجوال بيسك 6 و أداة ADO

كيف يمكنني نقل بيانات من جدول1 إلى جدول2

بأقصر الطرق علما بأن طريقة ال Loop تأخذ وقت أثناء النقل إذا كانت بيانات الجدول1 كثيرة ويزداد الأمر صعوبة إذا أردنا نقل بعض بيانات الجدول1 لأن ذلك يتطلب جملة شرطية وكيف سيكون الأمر إذا كانت حقول الجدول1 غير متطابقة مع حقول الجدول2 أظن أن الأخوة اللذين لديهم خبرة بقواعد البيانات يذكرون أمر Append From في لغة داتا بيس ثري بلاس القديمة ومن غير المنطقي أن مايكروسوفت لم تأخذأمر Append Form من الفوكس برو لتضعه في دائرة النسيان هذا إن لم تعمل عليه لمسة مايكروسوفت وأظن أنني لم أهتدي للأمر المناسب في فيجوال بيسك الذي يقوم بعمل Append From الذي أحن إليه دائما وعفوآ للإطاله أرجو أن يكون سؤالي واضحآ ولكم مني كل الشكر و التقدير وأدعو الله لكم بالتوفيق

#2

اسهل واسرع طريقة وبدون مشاكل إن شاء الله

dim MySql
mysql = " INSERT INTO Neworder ( invoice_no, quantity, price _ )
SELECT ORDERS.invoice_no, ORDERS.quantity, ORDERS.price _
FROM ORDERS;
DB.Execute Mysql

طبعا المتغير db من نوع database وهو يشير الي قاعدة البيانات الخاصة بك.

هذا الكود انا ما جربته بس جربه انت واخبرني بس بعد ما تغير الحقول واسما الجداول حسب رغبتك

بالنسبة للشرط يمكن تحط الشروط يلي تبيه بستعمال جملة Where في جملة SQL

مع تحياتي

لا يتعلم العلم كل مستحي او مستكبر

#3

السلام عليكم

اخي العزيز طارق موسى

هل تستطيع ربط الفيجوال بقاعدة البيانات mysql

وهل يمكنك ان تعطيني ملف عليه طرق التعامل مع قاعدة البيانات mysql

إذا كنت قد جربت التعامل معها

انا حاولت التعامل معها ولكني لا استطيع ان اجلب بيان واحدج فقط ولكن اجلب اول بيان او كل البيانات لحقل معين

ارجوا الإفادة

اخوك / منسي

#4

أو اعمل استعلام إحاق في قاعدة البيانات ثم قم بتشغيلة من خلال الفيجوال بيسك .

تحياتي .

هذا الموضوع مغلق.

مواضيع مشابهة