-
Posts
2,034 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
51
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو Moosak
-
كيف يكون مربع النص وبجانبه عدة سجلات في تقرير
Moosak replied to salah_2024's topic in قسم الأكسيس Access
وغفل عن أشياااااااء كثييييرة بعد .. خليها على الله بس 😅🖐🏻 لكن هناك حيل للتغلب على أغلب المشاكل .. ومنها موضوع المهندس القدير جعفر 🙂 والذي أشار له الأستاذ @kanory -
ما شاء الله عليك يا كبيييييييييير .... عملتها بطريقة المعلمين 😅👌🏼 الجهد واضح جدا جدا .. تبارك الله .. دايما ميزتك تعمل حل متكامل لكل الأزمان 👍🏻😊 بارك الله لنا فيك وبارك الله في علمك ونفع بك 🤲🏻 العم @Foksh أعتقد السبب أنك نقلت الملف من مكان آمن موثوق لمكان مش موثوق بعد 🙂 إدعس باليمين على الملف وألغ الحضر .. 🙃👇🏻 :
- 16 replies
-
- label
- edit label caption
- (و12 أكثر)
-
ستجد عبارة اختر كأفضل إجابة اسفل كل مشاركة .. الهدف منها ارشاد رواد المنتدى بالإجابة الأفضل التي تجيب على سؤالك .. 🙂
-
إذا عليك بفكرة الأستاذ @Barna 🙂
-
وعليكم السلام ورحمة الله وبركاته .. 🙂 في النموذج المستمر من الصعب عمل أوامر برمجية بشكل مباشر من هذا النوع .. والحل هو أن يتم إخراج الصور من البرنامج كملفات خارجية ويتم الإشارة إليها كرابط .. وهذه النتيجة 🙂 : ويمكنك إخفاء المربع الذي في اليسار (Image Source) عند الانتهاء .. لاحظ يجب أن يكون ملف الصور بجانب البرنامج وعدم تغيير موقعه حتى لايتم فقد الرابط بينهما : Change Image.zip
-
جرب اضغط Ctrl+H أو ضع الكود التالي على الزر : Me.TextBoxName.Setfocous Application.SendKeys "^h" 🙂
-
حل عدم تغيير حجم الرسوم البيانيه عند تغيير دقة الشاشة
Moosak replied to dr_bioman's topic in قسم الأكسيس Access
شكرا لك أخي @dr_bioman على مشاركة المعلومة 🙂 هل توجد صور توضيحية للمشكلة ؟ -
وعليكم السلام ورحمة الله وبركاته 🙂 حسب ما يبدوا أنه ليست هناك طريقة لمعرفة وقت وتاريخ إضافة سجل معين مالم تكن قد أضفت حقل خاص بتسجيل تاريخ الإضافة مسبقا .. والله أعلم
-
شكر لك أخي @mrsadek2000 على البرنامج .. وجعله الله في ميزان حسناتك 🙂 أقترح عليك توفير نسخة لمستخدمي النواة 64 بت فهم كثر ( وأنا واحد منهم ) 😅🖐 وكذلك أقترح عليك إضافته لمكتبة الموقع لكي يستفيد أكبر عدد من الناس منه 🙂🌼 رابط المكتبة : ◀◀ مكتبة الموقع / قسم الأكسس ▶▶ بارك الله فيك وزادك علما 🙂🤲🏻
- 15 replies
-
- برنامج حسابات
- مقاولات
- (و9 أكثر)
-
هدية : نظام المستخدمين واخفاء اطار الاكسس نهائيا
Moosak replied to ابو جودي's topic in قسم الأكسيس Access
تم تحديث المرفقات في المشاركة الأساسية 🙂 -
استخدم هذا الكود الذي يقوم بحذف بيانات جميع الجداول ما عدا الجداول التي تحددها : ضع هذا الكود في وحدة نمطية : Function DeleteDataFromTables(excludedTables() As Variant) As String Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentData For Each obj In dbs.AllTables If Left(obj.Name, 4) <> "MSys" And Not IsInArray(obj.Name, excludedTables) Then DoCmd.SetWarnings False DoCmd.RunSQL ("DELETE * FROM " & obj.Name) DoCmd.SetWarnings True End If Next obj DeleteDataFromTables = "تم حذف سجلات جميع الجداول" End Function Function IsInArray(value As Variant, arr As Variant) As Boolean Dim element As Variant On Error Resume Next IsInArray = False For Each element In arr If element = value Then IsInArray = True Exit Function End If Next element End Function ثم يمكنك استدعاء الكود واستخدامه بالطريقة التالية : Sub ExampleUsage() Dim excludedTables() As Variant excludedTables = Array("Table1", "Table2", "Table3") ' قم بتعيين أسماء الجداول التي ترغب في استثنائها هنا Dim result As String result = DeleteDataFromTables(excludedTables) MsgBox result End Sub
-
شكرا لك أخي @Foksh على المشاركة 🙂 ولكن لا أذكر أن هذا الملف لي .. وهو على فكرة كنز ثمين 😄👌🏻
-
شكرا لك أخي @عبد اللطيف سلوم .. تقبل الله منك 🙂🌼
-
المطلوب تمكين كافة النماذج الفرعية من العمل داخل النموذج الرئيسي
Moosak replied to Md Sy's topic in قسم الأكسيس Access
جميل جدا عمي المهندس قاسم .. 🙂 أنا تصوري كان بعمل مربعات نص غير منضمة في الجزء الأسفل من النموذج .. ويتم استحضار البيانات إلى هذه المربعات عن طريق المفتاح الأساسي .. لكن لاحظت أن النماذج الثلاثة لها بنى مختلفة وهذا يصنع تحدي بسيط يحتاج إلى تفكير .. -
انت صاحب همة أخي @tiger wanted تبارك الله 🙂 تابع هذا الموضوع من مايكروسوفت فيه جميع اختصارات خاصية إرسال المفاتيح SendKeys : SendKeys statement (VBA) - Microsoft Learn https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/sendkeys-statement
-
المطلوب تمكين كافة النماذج الفرعية من العمل داخل النموذج الرئيسي
Moosak replied to Md Sy's topic in قسم الأكسيس Access
ربما لو اخترعنا طريقة لتعديل البيانات أو إضافتها عن طريق استعلامات التعديل والإلحاق أو ربما عن طريق فتح RecordSet بالكود .. يمكن إيجاد آلية لعمل ذلك .. نفس فكرة النماذج الغير منظمة لأي جدول أو استعلام .. أيش رايكم ؟ 🙂 -
في حال وجود سؤال جديد متعلق بهذا الموضوع .. يرجى فتح موضوع جديد والإشارة لهذه الصفحة وذلك حسب قوانين المنتدى 🙂 شكرا لكم 🙂 🌹
-
-
احبك الله الذي احببتني فيه اخي العزيز @Foksh 😊🌷