مساعدة بسيطة

مغلق

بدأه raujistc في 1 أغسطس 2004 · 1 رد · 418 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات

مشاركة: واتساب X فيسبوك تيليجرام

#11 أغسطس 2004 في 21:25 صاحب الموضوع

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

الشي المطلوب عملة

نقل بيانات جدول الى جدول آخر عملت التالي

insert into table2 (select * from table1)

ابي قبل ينفذ الامر يعطيك رسالة تحذير فيها خيارين موافق او غير موافق

عند اختيار موافق يتم النقل

وعند اختيار غير موافق يتم تجاهل الامر

وعند الانهاء من التنفيد ابغي معلومات مثل عدد السجلات المنقولة

اعتقد ان طريقة سؤالي اصعب من السؤال نفسة

ولكم جزيل الشكر

#21 أغسطس 2004 في 21:37

أخي بالنسبة للرسالة

dim a as long
a=MsgBox("سوف يتم نقل البيانات إلى جدول جديد هل تريد الاستمرار",vbyesno,"تحذير") 
if a=2 then
'اكتب هنا ماتريد 
end if

بالنسبة للرقم 2 أنا لست متأكد ولكن سوف أتأكد وأقول لك

شكرا

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