[ تمت الإجابة ]ضغط واصلاح قاعدة البيانات

للقيام بعملية الضغط والإصلاح للقاعدة الحالية من خلال زر أمر نستخدم هذا الكود تحت زر الأمر

Private Sub CmdCR_Click()
SendKeys "{F10}"
SendKeys "]sq"
End Sub

وهذا مثال

za_C_R.rar

شكرا جزيلا اخت زهرة على المساعدة

الاخت الغالية زهرة

ربما يكون فيه مشكلة في الكود

اخي الغالي حنا نعوم

ربما يفيدك هذا الرابط هنــــــــا

اخي الفاضل محمد فؤاد

يستحيل ان يكون هناك خطأ في الكود لأنه يعمل 100% ولكن انت مش واخد بال سعادتك

طيب ح اشرح لك الطريقة الخاصة بالأمر SendKeys من خلال الكود الخاص بشغيل الضغط والإصلاح وهو سهل جدا وبعدين قوم بالتطبيق واعطيني خبر وبالتأكيد سوف تعود وتكتب ان الكود صحيح 100% لأنه مش لازم نتقيد بحاجه معينه يعني لا زم تكون هناك افكار جديده وتشغيل مخ .

Private Sub CmdCR_Click()
SendKeys "{F10}"
SendKeys "]sq"
End Sub

الكود هذا يقوم بعملية الضغط والإصلاح للنسخة العربية من برنامج الأكسيس ح تقول لي ازاي اقول كده هو :

تقوم الدالة SendKeys بإرسال الأمر للمفتاح F10 وهذا يقوم بالتوجه مباشرة الى قائمة ملف File ويكون التركيز عليها بدون فتحها فقط التاشير على الأمر ملف من قائمة الأكسيس حاول تجرب المفتاح F10 من لوحة المفاتيح عندما يكون لديك نموذج مفتوح وشريط القوائم ظاهر لديك . ... نكمل بقية الكود

ايضا بعد تنفيذ الأمر السابق تقوم الدالة SendKeys بإرسال الأوامر الى المفاتيح من لوحة المفاتيح وهي " [ " وهذا يعني اختيار الحرف العربي " د " ويعني أ&دوات انظر هنا تم اختيار حرف د لأنه يوجد بجانبه حرف & ان الحرف المقابل له في النسخة الإنجليزيه هي Tools& يعني انت تختار في نسختك الإنجليزيه الحرف T ثم يتم اختيار الحرف " s " وهذا يعني في النسخة العربية الحرف " س " وهو يشير الى أدوات م&ساعدة لقواعد البيانات بمعنى ان حرف السين هو الذي سيكون عليه الإختيار اما في النسخة الإنجليزية فسيكون Database utilities& يعني اختيار حرف d ثم يتم اختيار الحرف q في النسخة العربية للأكسيس وهذا يعني اننا اخترنا &ضغط قاعدة البيانات واصلاحها وهذا يعني اختيار حرف ض اما في النسخة الإنجليزية Compact and repair database& بمعنى يتم اختيار الحرف c ليصبح الكود للنسخة الإنجليزيه بهذا الشكل

Private Sub CmdCR_Click()
SendKeys "{F10}"
SendKeys "tdc"
End Sub

وهذا هو الملف بعد التعديل يحمل الكودين للنسخة العربية والنسخة الإنجليزية

za_C_R_ar_en.rar

الكود مش 100% صح ده 1000% صح الصح والله الواحد لسه جاهل

شكرا لك

عشان كده الكود الاول ما اشتغلشي لان النسخة اللي عندي انجليزي

شكرا لكي

مرحبا أستاذتنا القديرة " زهرة "

معلش نعملك إزعاج

انا وندوز فيستا والأوفيس 2003 إنجليزي بس للأسف ما إشتغل عندي

مع انه أصغر و أسهل كود شفته

اتمني معرفة السبب هل للوندوز علاقة بالموضع

شكرا جزيلاً

لا مش انا اللي وندوز قصدي عندي وندوز :calc:

اخي الفاضل

اسهل وابسط طريقه

انك تقوم بالتطبيق بنفسك حسب ما فهمته من الشرح

بمعنى ان تقوم بفتح برنامج الأكسيس امامك وتقوم بإنشاؤ نموذج عليه زر امر ثم تتيع تضغط المفتاح F10 وترى هل انتقل الى قائمة ملف File اذا كان كذلك فهذا اول تعبير لا عليه غبار

ثم تنتقل الى السطر الثاني من الكود وتنظر قائمة ادوات او Tools اين موضع التسطير ( يعني على اي حرف ) وهكذا بقية الحروف وتقوم بتسجيلها سواء في ورقه او مباشرة في الكود وهي كلها ثلاثة حروف .

اعتقد ان ويندو زفتا ( لم اكره نظام في العالم مثل هذا النظام الغبي ) لديها مشكله في هذه الأمور .

شكرا اخت زهرة لقد تم حل المشكلة واسف على التأخير بالرد

هناك مشكلة اخيرة عند تحويل خيار منبثق في نموذج الضغط و الاصلاح من لا الى نعم لا يعمل زر الامر الخاص بالضغط و الاصلاح في النسخة الانكليزية او العربية

شكراً أستاذتنا القديرة زهره

انا جربت الخطوات بس ما إشتغلت لعل الوندوز فيستا هو السبب

المهم بلاش

اقتباس

( اعتقد ان ويندو زفتا ( لم اكره نظام في العالم مثل هذا النظام الغبي ) لديها مشكله في هذه الأمور .)

علشان اهل زفتي " مدينة مصرية " لا يزعلوا منك ومنا

:tantrum:

حنا نعوم كتب:

هناك مشكلة اخيرة عند تحويل خيار منبثق في نموذج الضغط و الاصلاح من لا الى نعم لا يعمل زر الامر الخاص بالضغط و الاصلاح في النسخة الانكليزية او العربية

just now كتب:

شكراً أستاذتنا القديرة زهره

انا جربت الخطوات بس ما إشتغلت لعل الوندوز فيستا هو السبب

حسنا لا يوجد مشكلة بعد الآن

البرنامج سيعمل يعني سيعمل سواء منبثق اوغير منبثق عربي او انجليزي ويندوز XP او فيستا وحتى لو كان النظام MAC

البرنامج شغال 100% قوموا بالتجربه بعد التعديل النهائي

za_C_R_ar_en2008.rar

شكراً أستاذتنا القديرة زهره

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة