السلام عليكم ورحمة الله وبركاته
لو سمحتو اخواني الاعزاء اريد كود لحذف جدول بالكامل
يعني مثلا انا عندي جدول اسمه Tb1 واريد حذفه بواسطة كود بالفيجول بيسك
هل يوجد كود لعمل ذالك بارك الله فيكم
لو سمحتو اخواني الاعزاء اريد كود لحذف جدول بالكامل
السلام عليكم
sqlss = "DROP TABLE Tablename"
If rs3.State = adStateOpen Then rs3.Close
rs3.Open sqlss, db, adOpenKeyset, adLockPessimistic
تم تعديل هذه المشاركة بواسطة AHMAD KALIL في 25 ديسمبر 2010 في 07:54
شكراً اخي احمد ولكن لم يزبط معي
جواد كتب:شكراً اخي احمد ولكن لم يزبط معي
ماهي الرسالة التي ظهرت لك
اخي العزيز تظهر لي هذه
جواد كتب:اخي العزيز تظهر لي هذه
هذا يعني عند تنفيذ الكود هناك شاشة اخرى تعتمد على تنفيذ الكود غير موجودة
يبدو انك تستخدم VBA اي تستخدم كود فجوال بيسك داخل الاكسس
جواد كتب:
هذا يعني انك قمت بعمل Copy و Paste للكود بدون ان تقوم بتعريف المتغيرات الخاصة به ( الـ Recordset والـ Connection ) ..
It does not matter what they know about you, but what you can do, so let your work speak of you
mmghv VB6 Programmer
ممكن مثال اخواني بارك الله فيكم
طبعاً تقوم بتغيير الكود حسب ما تريد ,,
It does not matter what they know about you, but what you can do, so let your work speak of you
mmghv VB6 Programmer
الله يوفقك اخي محمد مصطفي غريب
والله يحفظك من كل مكروه
شكرا لك اخي