هانى عوض
عضو شرف
- Egypt
- Programming,Computer Maintenance ,Design Graphic, Reading, Travelling
- برنامج مدير باسووردات ( هديه واهداء )
أخى الكريم almo7eb فعلاً مجهودك يستحق التقدير.. فالبساطة والسهولة فى الاستخدام هما نتيجة برمجة ذكية وناجحة.. ملحوظة.. على اعتبار أن هذا البرنامج يحتوى على معلومات شخصية يستحسن وضع له شاشة مرور فى البداية ويمكن إضافة جزء خاص بالـ فيزا كارت حتى يصبح كالمحفظة وال…
- تغيير شكل الماوس عن طريق الكود
سلام أخى الكريم outnet الموضوع بسيط جداً... قم بعمل الآتى من خصائص الزر قم بوضع مسافة فارغة فى عنوان الارتباط التشعبى كالصورة وقم بكتابة نص تلميح لعنصر التحكم وليكن مثلاً كالصورة وستجد أن المؤشر قد تم تغييره إلى يد كلما مر على الزر مع خالص تحياتى هانى عوض
- [ تمت الإجابة ]تخصيص مفاتيح
أخى tarekzagera بمجرد عمل الماكرو باسم AUTOKEYS يتم استخدامه فى الذاكرة تلقائياً عند فتح القاعدة ولا يتطلب الأمر منك وضعه فى أى مكان كل ما عليك هو عمل هذا الماكرو بالطريقة السابقة وتسميته AUTOKEYS وتخصيص المفاتيح من f1 - f12 وستجد أنه تم تشغيله بنجاح.. أرجو أن…
- [ تمت الإجابة ]تخصيص مفاتيح
سلام أخى tarekzagera طبعاً يمكن عمل ذلك من خلال ماكرو يسمى AUTOKEYS مثل هذه الصورة نظراً لضيق الوقت معى لم اتمكن من أعمل لك مثال.. عذراً أخى ولكن إذا لم يتضح الأمر معك أخبرنى وأنا فى خدمتك.
- صناعة الألعاب بالأكسس Vba Games
أخوانى الكرام لفت انتباهى منذ فترة إمكانية صناعة الألعاب عن طريق الأكسس.. قمت بالبحث والدراسة لهذا الموضوع ووجدت إنه يمكن عمل ذلك... ولكن كانت الألعاب تعتمد فى تكوينها على العمليات الحسابية التى تعتمد على الذكاء.... ولكن عندما بحثت أكثر فى هذا الموضوع وجدت أنه…
- [ تمت الإجابة ]ما هى الطربقة المستخدمة فى حماية هذا الملف التى تقفل تصميم كل شئ
سلام أخى الكريم مصطفى الطريقة المستخدمة هى MDE وهى طريقة يتم من خلالها عمل تشفير لجميع الأكواد الموجودة بالقاعدة .. وإلى الآن لم يتوصل أحد لكسر هذه الطريقة وكل الموجود على الساحة الآن طرق اجتهادية لفكها... وإليك الطريقة بذلك سيتم تحويل القاعدة من MDB إلى MDE أ…
- كل يوم كود
شكراً لكم أخوانى على هذه الردود الجميلة وبالأخص أخى ومعلمى الكبير kamal alnahhal فنحن نقطة فى بحركم اللامتناهى... بالنسبة لسؤال أخى الكريم Planner بخصوص filter by selection أو تصفية حسب التحديد فهى لها أكثر من طريقة لعملها بالكود.. وهذه الطرق موجودة بكثرة فى ا…
- كل يوم كود
عفواً لتأخر الموضوع فترة... سأحاول إن شاء الله الفترة القادمة الافادة أكثر ... كود 10 هذا الكود يقوم بإغلاق كافة النماذج المفتوحة فى القاعدة فى وقت واحد... Public Function CloseAllForms(Optional ByVal ExceptName As String = vbNullString) Dim i As Integer Dim x…
- Command Button
أخى حسين الشيشاني يمكن عمل ذلك من خلال VisualBasic كالآتى cmdButton.BackColor = vbBlue ولكن (على حد معرفتى فى VBA) لا يمكن عملها فى أكسس بالنسبة للأزرار (ولكن طبعاً يمكن تنفيذها على مربع النص) ولكن نتحايل على هذا الموضوع بإحدى هذه الطرق: 1- إدراج صورة داخل الز…
- كتاب ممتاز وباللغة العربية لتعليم اساسيات Sql
شكراً أخى الكريم فعلاً الشرح بسيط وسهل جازاك الله كل خير ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ ولكن لى سؤال ؟؟ هل يمكن نسخ المحتويات إلى Word؟؟ ... وكيفية فك تشفيره ؟؟ فإننى لاحظت مؤخراً أن كثيراً من ملفات الـ Pdf يتم …
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
أخي moh samer ali هذه المشكلة سببها عدم نسخ الاستعلام الموجود مع المثال قم باستيراد الاستعلام من المثال إلى القاعدة وستحل المشكلة تماماً....
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
أخوانى الأعضاء الكرام تم وضع النسخة النهائية من المثال الذى قام بعمله مشرفنا Ekseer بعد التنقيح حتى تعم الفائدة وبالنسبة لأخى moh samer ali يستحسن وضع كافة الملفات التى سيتم عمل لها نسخ احتياطى داخل مجلد واحد فهذا أفضل بكثير حتى لا تتشعب الأمور معك سلام Ek_Fin…
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
أخى moh samer ali يمكنك تحديد ما تريده من خلال سطر نسخ الملف كالآتى Call Shell("xcopy /y d:\Delta\*.* D:\Delta\Backup\" & Format(date, "dd-mm-yyyy") & "\", 3) لاحظ قد تم استبدال اسم الملف "Data.mdb" بـ "*.*" بذلك سيتم نسخ كافة الملفات الموجودة داخل مجلد "Delta…
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
أخى الكريم Ekseer حتى لا يصبح هناك أى قصور فى المثال الذى أرفقته أخى.. وحتى يعمل 100% بكفاءة لاحظ أنه يتم وضع هذا الكود تلقائياً عند غلق أى قاعدة ليقوم بعمل نسخة احتياطية ومن ثم يقوم بحذف ما زاد عن 5 أيام فإذا قمت بفتح وغلق القاعدة أكثر من مرة فى اليوم المحدد …
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
كنت أظن الموضوع صعب قليلاً... ولكن من طريقة حلكم "أخى ekseer" الذى تم عرضه .. وجدت أنه صعب جداً... لم يخطر ببالى أن الموضوع يستحق عمل له جدول ومن ثم جملة Sql... ولكن معك حق أخى الكريم فهذه الطريقة بالرغم من أنها صعبة ولكنها صحيحة 100% وهو المطلوب هناك ملحوظة ص…
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
هذه مثلاً محاولة... ولكن لم أتوصل للحل!! Dim i As Integer Set fs = Application.FileSearch With fs .LookIn = "D:\Delta\Backup\" If .Execute > 0 Then For i = 1 To .FoundFiles.Count - 5 If .FoundFiles(i) > 5 Then Kill .FoundFiles(i) End If Next i Else MsgBox "fol…
- عدم التمكن من الضغط والإصلاح وأيضا النسخ الاحتياطي
أخى الكريم فادى حمداً لله على سلامتك حاول الآتى: 1- تقسيم قاعدة البيانات. 2- إذا لم يتم التقسيم .. قم بعمل قاعدة فارغة ومن ثم قم باستيراد الجداول من هذه القاعدة. 3- قم بعمل Compile داخل محرر الوحدات النمطية ومن ثم تابع الأخطاء التى ستظهر معك وقم بحلها. 4- تأكد…
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
شكراً جزيلاً أخى إيهاب على الفكرة... :unsure: ومرحباً بأخى sx1 على مروره وكذلك تنشيط الموضوع أكثر... ولكن أظن الموضوع أصعب من ذلك... فالمجلد يحمل اسم تارياخ الأيام التى يتم بها الحفظ لذلك نحتاج لدالة تقوم بالبحث أولاً... متحسسة حالة تسمية المجلد.. ومن ثم حذف م…
- [ تمت الإجابة ]حذف مجلدات النسخ الاحتياطى التى تتعدى 5 مجلدات
أخوانى الكرام عمتم مساءً قمت بعمل كود يقوم بدوره بعمل نسخة احتياطية من ملف البيانات كالتالى Call Shell("xcopy /y d:\Delta\Data.mdb D:\Delta\Backup\" & Format(date, "dd-mm-yyyy") & "\", 3) MsgBox "تم عمل نسخة احتياطية لهذا اليوم بنجاح", , "نسخة احتياطية" ويتم ع…
- نافذة
أخى الكريم ستجد فى نافذة أكسس شريط التمرير الرأسى قم بسحبه إلى فوق كالتالى سلام