kanory

ممكن تستفيد من هذا الموضوع ...

هل هذا ما تقصدة .....

أشكرك أخي الفاضل لكن هي ليست عبقرية ولكن استخدام قاعدة IF في الاستعلام فقط ...... فبل كل شيئ لفهم ذلك انصحك بعدم استخدام المسميات العربية في تسمية حقول الجداول أو اسماء الجداول قدر الامكان : ببساطة استخدمنا هذا في الاستعلام : D: IIf([1]="2";[المبلغ]-[النسبة];"0") شرح الرموز لأني حولتا رموز وارقام حتى نفهمها لأني لو كتبتها بالعربية تتغير مواقعها ولا نستطيع تخيلها بالشكل المطلوب : D هو اسم الحقل ( صاقي الارباح ) 1 هو حقل الحدث 2 العبارة الموجودة في حقل الحدث ( ذاهب ) إذن قاعدة IF تقول عند وجود عبارة ذاهب في حقل الحدث اجري عملية طرح النسبة من المبلغ وفي حال عدم وجود العبارة ذاهب في حقل الحدث ارجعها صفرا ارجو ا، اكون وفقت في الشرح كلنا شوق لطرقك الجميلة ..... ( حياك استاذي رمهان .... في انتظارك )

انت جعلت الفرز حسب التاريخ .... انظر الصورة انظر المرفق بعد حذف الفرز .... Forum.mdb

وعليكم السلام .... انظر المرفق ... New Microsoft Access قاعدة بيانات (6).accdb

هل هذا ما تريد ؟؟؟؟ Forum.mdb

هل هذه بداية الحل حتى نكمل بقية المطلوب ....... Forum.mdb

جرب هذا ..... Private Sub أمر12_Click() On Error GoTo err_أمر12_Click Dim stLinkCriteria As String stLinkCriteria = "[ID] =" & Me![ID] DoCmd.OpenReport "TG", acViewPreview, , stLinkCriteria exit_أمر12_Click: Exit Sub err_أمر12_Click: If Err.Number = 3075 Then MsgBox "ضع رسالتك هنا" Resume exit_أمر12_Click Else MsgBox Err.Number & vbCrLf & Err.Description End If End Sub

بالعكس أخي الهدف من المنتدى تعليمي ...... نستفيد ...... ونفيد ..... بارك الله فيك

انا تعمد ترك المثال لك حتى تنقب عن اسرار فعله .... لكن انا اسف جدا ... تابع الصورة ونفذ .....

المشكلة أنك لم تقم بنسخ مربع النص الموجود باسم txtRecordBar موجود تحت مربعات النص لديك .... وانتبه لمصدر بياناته

كلام الاستاذ . @Shivan Rekany صحيح ..... والهدف من المنتدى تعليمي .... ان لم تصل الى نتيجة كرر السؤال حتى تجد الاجابة في المنتدى

هذه طريقة لاخفاء الاسم بعد اختياره من القائمة ..... جربها ComboBox (1).accdb

01.accdb

ارفق النموذج حتى نستطيع معرفة المشكلة ... لن تحل المشكلة نظريا ....

عند تعديل المسميات عدل ايضا المسميات في الكود ؟؟ Me.txtCurrentRecord = Me.ID Me.ID.BackColor = Me.txtCurrentRecord.BackColor Me.Name_i.BackColor = Me.txtCurrentRecord.BackColor Me.Tel.BackColor = Me.txtCurrentRecord.BackColor ليس للامتداد علاقة في ذلك ....

ماشاء الله تبارك الله ...... انتظرنا وحصلنا على ما نريد .... بارك الله فيك ....

ما شاء الله تبارك الله ...... اسمح لي أن أقف لك احتراما ..... نعم الخير اتى .....

بعد إذنك اخي @عبد اللطيف سلوم تفضل هل هذا طلبك ؟؟؟؟ Colored Row.mdb

اني منتظر ...... على احر من الجمر .... لان هذا الموضوع يهمني كثير في عملي بارك الله فيك ... ننتظر ابداعاتك

السلام عليكم من خلال تجربة لم اجد طريقة لقراءة اللغة العربية عن طريق ماتركس باركود مع الاكسس ..... ولكن هناك برامج مستقلة لعمل هذا الكود ولكن يصعب ربطها مع الاكسس .... والله أعلم .... انظر نتيجة التجربة مع برنامج الاخ @محمد سلامة

مشاركة مع اخي عصام ... انظر test_2.rar

ماشاء الله تبارك الله .... تستاهل ابا جودي ... نفع الله بك وبعلمك .... يا شمعة المنتدى ....

أخي @essam rabea اسأل الله أن ينفع بك وبعلمك ......

وعليكم السلام ورحمة الله وبركاته أنظر المرفق .... Handicapéés.accdb