السلام عليكــم ورحمـة الله وبركاتــه ،،
كيف حالك إن شاء الله دائمــاً بخير ؟
اتمنى منكم مساعدتي في التعديل على الملف المرفق
حيث اريد عمل زر امر يقوم بتفريغ محتويات حقل محدد من الجدول
مسار الملف يوجد داخل مجلد على السي هو :
c:\ab
وشكرا
تفريغ محتويات حقل محدد من جدول
انتظر مشاركتكم
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة
الف الف الف شكر لك
فعلا هذا المطلوب
الله يوفقك
بارك الله فيك استاذنا الغالي ايهاب
ممكن نستخدم جملة الاستعلام من داخل محرر الفيجوال بيسك مباشرة بدون اللجوء الي تصميم استعلام اعتقد ان هذا بيكون اسرع بعض الشيء خصوصاً لو كان حجم البيانات كبير
Private Sub أمر1_Click()
If MsgBox("هل تريد حذف العمود الحالي", vbCritical + vbYesNo, "رسالة تحذير") = vbNo Then
Exit Sub
Else
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE tb1 SET tb1.kind = Null"
DoCmd.SetWarnings True
Dim x As String
x = MsgBox("تم الحذف", vbInformation, "تأكيد الحذف")
End If
End Subمرفق الملف بعد التعديل
تم تعديل هذه المشاركة بواسطة محمد فؤاد تركي في 3 يونيو 2009 في 10:32 — السبب: اضافة
السلام عليكــم ورحمـة الله وبركاتــه ،،
بارك الله فيك أخ محمد وشكر لك
فعلاً اضافة قيمة استفدت منها كثيراً
طبتم واهتديتم :)
===================================
إقرأ معي
رابط متجدد لكتاب أقرؤه فشاركني فيه
======
فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب
الكتاب :
حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار
اضغط على الصورة لتحميل الكتاب
-----------
كتب سابقة