Elsayed Bn Gemy قام بنشر مايو 22, 2015 مشاركة قام بنشر مايو 22, 2015 اخى الكريم انا عمرى ما انسى طلبك بس كل الحكاية انى كنت طول النهار بره البيت يوم اجازتى وكدا عموما انا لسه منزل المرفق ولقيت ان الجدول اللى عاوز تمسحه مرتبط بعلاقة او اكثر لذلك انت محتاج الاول تحذف العلاقات بين الجداول ويعدين نمسح الجداول عموما جارى تجهيز المرفق وشكرا لك رابط هذا التعليق شارك More sharing options...
Elsayed Bn Gemy قام بنشر مايو 22, 2015 مشاركة قام بنشر مايو 22, 2015 تفضل يا اخى مرفقك حذف العلاقات ثم حذف الجداول برمجيا.rar رابط هذا التعليق شارك More sharing options...
Elsayed Bn Gemy قام بنشر مايو 22, 2015 مشاركة قام بنشر مايو 22, 2015 وهذا شرح الكود Dim db, Xdb As Database 02 Dim rel As Relation 03 04 'نحتاج اسناد متغيرين واحد لحذف الارتباط 05 Set Xdb = CurrentDb() 06 'والاخر لحذف الجداول بعد حذف الارتباط 07 Set db = CurrentDb() 08 'حلقة التكرار للجداول المرتبطه 09 For Each rel In db.Relations 10 'حذف العلاقه بين الجدولين 11 Xdb.Relations.delete rel.Name 'اسم الجدولين المرتبطين 12 MsgBox " تم حذف العلاقه بين الجدول " & rel.Table & " و الجدول " & rel.ForeignTable 13 ' حذف الجدول المرتبه الاول الرئيسي 14 DoCmd.deleteObject acTable, rel.Table 15 MsgBox " تم حذف الجدول " & rel.Table 16 'حذف الجدول الثاني الجانبي المرتبط بالاول 17 DoCmd.deleteObject acTable, rel.ForeignTable 18 MsgBox " تم حذف الجدول " & rel.ForeignTable 19 20 21 Next 22 Set db = Nothing 23 Set Xdb = Nothing رابط هذا التعليق شارك More sharing options...
محمد حسن المحمد قام بنشر مايو 23, 2015 مشاركة قام بنشر مايو 23, 2015 عندي فكرة افضل ضع للبرنامج دارة حماية وهكذا واترك ارة الحماية في مكان العمل وهكذا لو نسخ البرنامج الى فلاشة لا يعمل اطلاقا فكرة رائعة ...دارة حماية خير من تدمير البرنامج حسب تعبير السائل فلو أن كل منا دمر برنامجاً....النتيجة لا برامج رابط هذا التعليق شارك More sharing options...
عبد الله قدور قام بنشر مايو 23, 2015 مشاركة قام بنشر مايو 23, 2015 عندي فكرة افضل ضع للبرنامج دارة حماية وهكذا واترك ارة الحماية في مكان العمل وهكذا لو نسخ البرنامج الى فلاشة لا يعمل اطلاقا فكرة رائعة ...دارة حماية خير من تدمير البرنامج حسب تعبير السائل فلو أن كل منا دمر برنامجاً....النتيجة لا برامج انا معك في ذلك واقول لصاحب السؤال قد يستطيع الموظف عندك تصدير الجداول الى اكسل قبل الحذف الجداول هذا احتمال وقد يكون هناك مشكلة في حاسب الموظف تجعله يستهلك الفرص المتاحة له في يوم واحد 1 رابط هذا التعليق شارك More sharing options...
ابو جودي قام بنشر مايو 23, 2015 مشاركة قام بنشر مايو 23, 2015 انا لى راى يا استاذ ahmedabuzena انت حددت عدد فتحات للقاعده بتاعتك طيب لو النور قطع راحت واحده من العدد ولو الجهاز هنج وقفل وفتح القاعده راحت واحده ولو قفل الجهاز وفتحه كذلك راحت واحده لو القاعده اتقفلت واتفتحت بالغلط راحت واحده برضو اعتقد لو تم من خلال التاريخ وتحديد عدد ايام افضل من عدد فتحات للقاعده صح واللا كلامى غلط ؟! 1 رابط هذا التعليق شارك More sharing options...
ahmedabuzena قام بنشر مايو 23, 2015 الكاتب مشاركة قام بنشر مايو 23, 2015 تفضل يا اخى مرفقك اخى الكريم مارد جزاك الله كل خير تم الحل والحمد لله شكرا على تعبك ومجهودك الذى بذلته لحل مشكلتى رابط هذا التعليق شارك More sharing options...
ahmedabuzena قام بنشر مايو 23, 2015 الكاتب مشاركة قام بنشر مايو 23, 2015 انا لى راى يا استاذ ahmedabuzena انت حددت عدد فتحات للقاعده بتاعتك طيب لو النور قطع راحت واحده من العدد ولو الجهاز هنج وقفل وفتح القاعده راحت واحده ولو قفل الجهاز وفتحه كذلك راحت واحده لو القاعده اتقفلت واتفتحت بالغلط راحت واحده برضو اعتقد لو تم من خلال التاريخ وتحديد عدد ايام افضل من عدد فتحات للقاعده صح واللا كلامى غلط ؟! اخى الكريم شكرا على اهتمامك انا كنت شغال بنفس الكود الذى ارفقتة الخاص بالتاريخ ولكنة توقف فجأة عن العمل ولا ادرى السبب فانا غير متمكن فى حل مشاكل الاكواد وبالنسبة للطريقة الحالية الخاصة بالدخول على البرنامج بعدد مرات معينة فهى امنة بالنسبة لى لانى متواجد دائما فى المحل فلو العدد اوشك على الانتهاء فمن الممكن ان ازودة عن طريق الادمن باسورد ولو البرنامج ادمر مش مهم لانى ساعطية نسخة جديدة غير انى بجددله النسخه بالاسعار والاصناف الجديدة كل شهر رابط هذا التعليق شارك More sharing options...
ahmedabuzena قام بنشر مايو 23, 2015 الكاتب مشاركة قام بنشر مايو 23, 2015 عندي فكرة افضل ضع للبرنامج دارة حماية وهكذا واترك ارة الحماية في مكان العمل وهكذا لو نسخ البرنامج الى فلاشة لا يعمل اطلاقا فكرة رائعة ...دارة حماية خير من تدمير البرنامج حسب تعبير السائل فلو أن كل منا دمر برنامجاً....النتيجة لا برامج انا معك في ذلك واقول لصاحب السؤال قد يستطيع الموظف عندك تصدير الجداول الى اكسل قبل الحذف الجداول هذا احتمال وقد يكون هناك مشكلة في حاسب الموظف تجعله يستهلك الفرص المتاحة له في يوم واحد اخى الكريم شكرا على الاهتمام فى حل مشكلتى اما بالنسبة لنقل البيانات الى اكسيل فانا بحول البرنامج الى mcde ثم اغير الامتداد الى mcdr لاخفاء جميع الجداول والعامل ملهوش فى البرمجة فمن هذى الناحية انا فى امان شكرا مرة اخرى على الاهتمام رابط هذا التعليق شارك More sharing options...
Elsayed Bn Gemy قام بنشر مايو 23, 2015 مشاركة قام بنشر مايو 23, 2015 انا لى راى يا استاذ ahmedabuzena انت حددت عدد فتحات للقاعده بتاعتك طيب لو النور قطع راحت واحده من العدد ولو الجهاز هنج وقفل وفتح القاعده راحت واحده ولو قفل الجهاز وفتحه كذلك راحت واحده لو القاعده اتقفلت واتفتحت بالغلط راحت واحده برضو اعتقد لو تم من خلال التاريخ وتحديد عدد ايام افضل من عدد فتحات للقاعده صح واللا كلامى غلط ؟! انا بقى عندى فكرة احسن بالنسبة للموضوع دا صلى على النبى احنا هنعمل للبرنامج رقم يعنى مثلا دى النسخة رقم v1.2.mared دا مثلا طبعا شفت الجدول اللى عملته على الاستضافة هنعمل فيه حقل لنفس رقم البرنامج وهنعمل ربط بمعنى طول ما النسخة بتاع البرنامج اللى معاك مساوية لرقم النسخة اللى فى جدول سيكوال شغل البرنامج لو حبيت فى يوم اوقف البرنامج عند اى حد هغير الرقم اللى فى جدول سيكوال وهديلو امر انه ميفتحش طالما الرقم مش متساوى بس دا طبعا له عيب واحد انه لازم يكون عنده انترنت هههههههههههههههههه 1 رابط هذا التعليق شارك More sharing options...
Elsayed Bn Gemy قام بنشر مايو 23, 2015 مشاركة قام بنشر مايو 23, 2015 وفى نفس الوقت لو حبيت اعمل تحديث لقاعدة البينات برضو هغير رقم النسخة واجبر المستخدم انه ينزل النسخة الجديدة وهكذاااااااااا قيس على كدا حاجات كتير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.