sqldos قام بنشر نوفمبر 5, 2013 قام بنشر نوفمبر 5, 2013 قمت بتصميم قاعدة بيانات لعيادة طبيب واريد من زملائنا فى المنتدى ان يعيطني كود ضغط قاعدة البيانات لانه مع مرور الزمن تمتلئ قاعدة البيانات بالداتا ويكبر حجمها ممكن يؤثر على البرنامج لذا اريد كود ضغط قاعدة البيانات بحيث اضعه فى الشاشة الرئيسية او اضعها فى زر اسمه (ضغط قاعدة البيانات ) وشكرا 1
سمير1 قام بنشر نوفمبر 5, 2013 قام بنشر نوفمبر 5, 2013 Dim status As Boolean status = 0 If (MsgBox("ÖÛØ ÚäÏ ÇáÎÑæÌ" & Chr(13) & Chr(13) & "åá ÊÑíÏ ÖÛØ ÞÇÚÏÉ ÇáÈíÇäÇÊ ÚäÏ ÇáÎÑæÌ", vbYesNo, "ÖÛØ ÇòÎÊíÇÑí")) = vbYes Then status = 1 Else status = 0 End If Application.SetOption "Auto Compact", status DoCmd.Quit
sqldos قام بنشر نوفمبر 6, 2013 الكاتب قام بنشر نوفمبر 6, 2013 اخى العزيز جربت هذا الكود ولكن لم ينجع قمت بعمل زر على الفورم وكتبت بداخل هذا الكود ولكن عند محاولة الضغط على هذا الزر والخروج من قاعدة البيانات ومعرفة المساحة نجد ان المساحة لم تتغير نرجوا الافادة وشكرا
سمير1 قام بنشر نوفمبر 6, 2013 قام بنشر نوفمبر 6, 2013 (معدل) قم بتشغيل البرنامج فترة ثم جرب ثانية او ارفق الملف تم تعديل نوفمبر 6, 2013 بواسطه سمير1
عبدالله المجرب قام بنشر نوفمبر 8, 2013 قام بنشر نوفمبر 8, 2013 يمكنك القيام بذلك من زر الاوفيس شاهد الصورة
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.