نجوم المشاركات
Popular Content
Showing content with the highest reputation on 18 أبر, 2017 in all areas
-
استأذن من استاذنا @ابا جودى اتفضل استخدمت هذا الكود قبل تحديث Private Sub Rajmasnf_BeforeUpdate(Cancel As Integer) If DCount("[Rajmsanf]", "[HRAKATSANF]", "[Rajmsanf]='" & Me.Rajmasnf & "'" & "AND [Rjmfatwra]=" & Forms![فاتوره مشتريات]![Rjmfatwra]) > 0 Then MsgBox "المادة مكررة" Me.Undo End If End Sub 1111111.rar3 points
-
السلام عليكم اخواني الاعزاء هذا مثال قمت بعمله يفي بالغرض ان شاء الله بالتوفيق للجميع Input Box.rar3 points
-
بارك الله فيك استاذ Shivan Rekany اسأل الله ان يضاعف لك اجر ما تمنيت لي ولغيري2 points
-
استغفر الله اخي الغالي ... اللهم امين اجمعين جزاك الله الفردوس الاعلى2 points
-
مشكوررررررر اخي@ابا جودى الان كذا مزبوط حفظك الله انت والاخ @Shivan Rekany عملتم المطلوب ربنا يحفظكم أينما كنتم شاكرين لكم2 points
-
وهذا هو المرفق بعد التعديل واعتذر على التاخير لانى اضطررت للقبام من على الجهاز الاضافه على الفاتوره -.rar اعتذر استاذ @Shivan Rekany لم انتبه لمشاركة حضرتك اسال الله تعالى ان يجعلكم سباقون بالخيرات هههههههههههه اعتذر لسوء فهمى والحمد لله الذى يسر لكم الحل على ايد الاستاذ الفاضل @Shivan Rekany2 points
-
ماشاء الله عليك أستاذ@Shivan Rekany هو المطلوب بكله ربي يبارك فيك مع التقدير للاخ@ابا جودى شكله فهم الموضوع خطاء تحياتي لكم جميعا2 points
-
شو رأيك بهذا الموضوع عند تكرار المادة سيتم يزداد المجموع المادة وسيحذف السجل المكرر2 points
-
بعد اذن اساتذتى الافاضل واحبائى ممن سبقونى بمد يد العون والمساعدة اسأل الله تعالى ان يجعلكم دائما سباقون بالخيرات وان يجعلكم ممن تقضى على ايديهم حوائج الناس ان شاء الله تعالى التصدير الى ملف اكسل معد مسبقا.rar2 points
-
- اذا كان الحقل رقمي Numerical ( اي انه في الجدول نوعه رقم ) فيجب ان يوضع في ( الإستعلام او التعبير ) بين علامتي تنصيص بهذه الطريقة "[iD]" --------------------------------------------------- - اذا كان الحقل نصي Strings ( اي ان الحقل في الجدول نوعه نص ) فيجب ان يوضع في الإستعلام بين ثلاث علامات تنصيص بهذه الطريقة '[NAME]' --------------------------------------------------- -اذا كان الحقل من نوع تاريخ DATE ( يعني في الجدول نوعه تاريخ / وقت ) فيجب ان يوضع بين بين علامتي شبكة #[DATE]#2 points
-
2 points
-
2 points
-
لا اعرف كيف اخدمك في هذا الامر فليس لدي ذلك النوع من السكانر الحديث للتجربة2 points
-
ما رأيكم أن نجرب اليوم تجربة جديدة ؟ أن نجعل حديث النبي صلى الله عليه وسلم : (من حسن إسلام المرء تركه مالا يعنيه ) شعارا لنا ، نتمثله في كل التفاصيل والمواقف .. سنجرب اليوم أن نركز فقط على الأمور التي تعنينا (تهمنا) وتكمل ديننا ودنيانا ، ونتجاهل مالا يعنينا ..الأحاديث الفارغة والتعرف على تفاصيل حياة الآخرين ، أين ذهبوا ، وماذا أكلوا ، ليس مما يعنينا بالطبع ..الضغط على الروابط المقترحة في اليوتيوب والانستجرام وتتبع أخبار المشاهير والتافهين ليس مما يعنينا بلاشك ، بل هو مما يسحبنا إلى دقائق من الغفلة والتفاهة .. قراءة كل ما يصلنا في شبكات التواصل الاجتماعي وخصوصا الواتساب مما لا يعنينا بالتأكيد ، والأفضل من ذلك قراءة كتاب نافع أو متابعة مقطع هادف . . التجول في الأسواق دون هدف محدد يهدر حياتنا وهو مما لا يعنينا حقا ، بل يقودنا إلى أن ننفق أموالنا فيما لا نحتاج .. وغير ذلك الكثير الكثير .. فلنجرب معا أن نركز فقط علي ما يمس حياتناعن قرب ، ويقربنا إلى الله تعالى وإلى تحقيق أهدافنا ، حتى نكون ممن حسن إسلامهم كما قال النبي صلى الله عليه وسلم،،1 point
-
السلام عليكم ورحمة الله وبركاته حبيت أنقل لكم فكرة جميلة للحضور والغياب للمبدع إسلام رجب ولكم مني جزيل الشكر1 point
-
السلام عليكم ورحمة الله تعالى وبركاته منتظر الردود والتفاعل ان شاء الله واضع بذرة البداية وبافكار غير تقليديه اطلب من اخوانى الكرام التجربه وابداء الاراء ومن اساتذتى الكرام التحليل والتوجيه archives v5.rar الشروحات والتوضيحات للنقاط الهامة والتى تم اخذها فى الاعتبار فى المرفق الأول ـــــــــــــــــــــــــــــ 1- لا يمكن للمستخدم التلاعب فى التواريخ فى حالة وضع المرفق على شبكة نيتورك لان التاريخ يتم اخذه فى هذه الحاله من الجهاز المصدر (server) امممممممممم للتوضيح وضعت موديول يقوم بتحديث الاى بى الخاص يالجهاز ويتم تحديثه تلقائيا من نموذج frm_authorize 2- طبعا لابد من عمل شير لوكيشن لقاعدة البيانات على السيرفر واعطاء التصاريح باضافة ملفات 3- اضافة مجلد خاص لكل من الصادر والوارد 4- الترقيم تقائى لكل من الصادر والوارد ويبداء من رقم 1 فى بداية العام الجديد 5- يتم عمل مجلد لكل رقم صادر او وارد وبداخله رقم السنه الحاليه فى حالة اضافة مرفقات الكترونيه 6- من نموذج البحث يمكن فتح نموذج بكل البيانات للسجل المحدد الذى تم النقر عليه مرتين1 point
-
1 point
-
ألف مليون شكر لك الأخ الكريم سليم حاصيبا دمت متألقا1 point
-
الف شكر على الاهتمام والمجهود الرائع ا/ @محمد سلامةا @ابا جودى @Shivan Rekany1 point
-
تم التعديل كما تريد élèves_salim1.rar1 point
-
أخي ابا جودي انا اشم فيك رائحة العبقرية التي تحاول اخفائها عنا طول الوقت هههههه بوركت اينما كنت وزادك الله من علمه ورفعك به درجات ان شاء الله1 point
-
هذا تواضع منك أخي. أسأل الله أن يوفقكم لما فيه خير لهذه الأمة.1 point
-
مرة اخرى استأذن من استاذنا @ابا جودى على المداخلة اتفضل استخدمت هذا الكود Private Sub Rajmasnf_BeforeUpdate(Cancel As Integer) If DCount("[Rajmsanf]", "[HRAKATSANF]", "[Rajmsanf]='" & Me.Rajmasnf & "'" & "AND [Rjmfatwra]=" & Forms![فاتوره مشتريات]![Rjmfatwra]) > 0 Then MsgBox "المادة مكررة" Me.Undo ElseIf DCount("[Rajmsanf]", "[alsnaf]", "[Rajmsanf]='" & Me.Rajmasnf & "'") < 1 Then MsgBox "ليس لدينا هذا الرقم" Me.Undo End If End Sub بيعمل لك كلا من طلبين واتفضل قاعدة بياناتك بعد تعديل 1111111.rar1 point
-
1 point
-
اهااا تفهمت الموضوع النموذج الخاص باضافة فاتورة لا يضيف سجل جديد علشان كده بيشوف الرقم مكرر1 point
-
1 point
-
مشاكة مع استاذي الحبيب @محمد سلامة اتفضل اكو برامج باسم 3D Button Creator Gold تقبل تحياتي1 point
-
فعلا يا استاذ/ @محمد سلامة كلامك صح وهو مش فقير فعلا لكن مش غنى برضو لم يصل المستخدم الى حد الكفاف حتى1 point
-
ما هو اصدار الاوفيس لديك؟؟ لا من قال ان الاكسس فقير في ذلك.. بالعكس من الاصدار 2007 فيما فوق ممتاز في الألوان والأشكال والازرار1 point
-
استاذ @almosafer almasry حياكم الله وبياكم ان مقصد الاستاذ / @محمدنجار هو اسماء الجدوال واسماء الحقول داخل الجدول الافضل مراعاة الاتى بها الاسماء تكون بالانجليزية لا تستخدم الرموز او المسافات بين الكلمات تقبل مودتى1 point
-
بعد اذن الاستاذ الغالى @Shivan Rekany اتفضل يا استاذ @ابو زاهر جرب المرفق ده بص انا غيرت شوية حجات ليه حضرتك كنت عامل نوع الحقل رقم الفاتورة Currency1 point
-
1 point
-
1 point
-
1 point
-
جزاكم الله خيرا بارك الله فيك اخي @الأحمري اسأل الله ان يضاعف لك اجر ما تمنيت لي ولغيري1 point
-
1 point
-
اخي الكريم الأحمري انصحك بتغيير الاوفيس الى اي اصدار اقدم صدقني ستكون مرتاح البال .. اغلب من في هذا المنتدى من المبرمجين المحترفين ان لم يكونوا كلهم يستخدمون اصدار اوفيس 2003 او 2007 .. اذا كنت ممن يعشقون البرمجة فستواجه مشاكل عديدة في الدوال البرمجية والمكتبات فيما بعد تحياتي1 point
-
1 point
-
أخى الكريم موضوع تغيير الأوفيس هذا راجع إليكم أما فيما يختص بالكومبوبوكس حدد ماذا تريد فيه لأنى لم أفهم طلبك الخاص به1 point
-
أخى الكريم الملف المرفق من قبلك ليس به أى بيانات قمت بإنشاء فورم مع تعديلات بسيطه على شكل الشيت الفورم به إمكانيه البحث والتعديل والحذف والإضافة 1438.1.rar1 point
-
أخى الكريم لم أجد مشكله بالملف المرفق من قبلكم فالفورم تعمل بشكل طبيعى ممكن والله أعلم خاصية الليبل الذى يحمل الجملة المضيئة تقوم بإبطاء الجهاز لديك1 point
-
الكود بهذا الشكل سليم إن شاء الله ولكن طالما أننا سنتعامل مع أكثر من ورقة عمل فلابد من الإشارة لورقة العمل التي فيها قيمة الخلية (القائمة المنسدلة) قم بالإشارة إلى ورقة العمل قبل كلمة Range في هذا السطر strClass = Sheets(StudentData).Range("W2").Value1 point
-
1 point
-
مشاركة مع اخينا الغالي ابا جودي اولا تصحيح الجمله Case 1 Me.RecordSource = "SELECT Tbl_Result.*, Tbl_Result.Sub FROM Tbl_Result WHERE (((Tbl_Result.Sub) Like '*عربية*'));" وهكذا للمواد الاخرى ثانيا ليس من المنطقي ان تتغير الجمل البرمجيه خصوصا لو هناك عميل سيستلم البرنامج وهنا يمكنك 1. ضع حقل اضافي في الجدول المواد باسم كلمة البحث او البحث وسيكون به الكلمات التي تريد الفلترة بها 2. تشير لمربع النص الذي بالتقرير والذي سيحتوي اسم الماده والتي هي بمربع السرد بالنموذج هكذ =[Forms]![Frm_PrintComm]![Cmb_SelectSubject].[column](1) هنا لم يعد حاجة للكود سواء للبحث او للاشاره لاسم الماده فقط استعلام بالتوفيق1 point
-
1 point
-
السلام عليكم تم تطويع فورم البحث و التعديل و الاضافة و الحذف المدرج في هذا الموضع مع ملفك و سيعمل على اي شيت تحياتي بيانات التلاميذ.rar1 point
-
وذكر ان الذكرى تنفع المؤمنين ,,,,, قف أنه رمضان لقد بدأ السباق فاحرص أن تكون في مقدمة المتسابقينفكيف تستفيد من رمضان؟؟؟؟؟؟؟؟؟؟؟من خلال الحرص على 8 أشياء في غاية الأهمية:فلنبدأ بأول واهم شيئ وهو :. 1- أنت و الصلاة: الحرص علي الفريضة في وقتها وجماعه – يفضل في المسجد – يساوي 100,000 (مئة ألف) حسنة في اليوم الواحد أو 3,000,000 (ثلاثة ملايين) حسنة طوال شهر رمضان !!!! 2 قبل الفجر4 قبل الظهر 2 بعد الظهر2 بعد المغرب 2 بعد العشاء النوافل : الحرص علي 12 ركعة في اليوم :2- أنت و القرآن:كل حرف بحسنة و الحسنة بعشر أمثالها و في رمضان بسبعين ضعفًا، إذن قراءة الجزء الواحد = 4 مليون حسنة تقريبًا، فكيف لعاقل أن لا يقرأ جزءًا علي الأقل يوميًا لتحقيق هذا الثواب غير العادي ؟؟ و لم لا نجتهد و نقرأ جزئين يوميًا (بعد الفجر وقبل النوم مثلاً ) لنختم مرتين ؟؟ 3- أنت و الصدقة:بسبعين ضعفًا في رمضان وهي تطفئ غضب الله على العبد، خصص مبلغًا معينًا تتصدق به كل يوم و سترى لهذا أثرًا رائعًا في حياتك. 4- أنت والتراويح:الحرص عليها أفضل من تضييع وقت رمضان الثمين المليء بنفحات الله في التمثيليات و الفوازير وغيرها من مضيعات الوقت و حاول إن استطعت أن تصلي في مسجد يقرأ بجزء يوميًا لتضاعف من ثواب القرآن اليومي. 5- أنت و صلة الأرحام: و ابدأ بمن بينك و بينه خلافات و كن أفضل منه فلن يقبل الله صيامًا من مسلمَيْنِ بينهما مشاحنات أو عداوة.6- أنت و الدعوة للخير: ادعُ الناس لكل هذا الخير الذي عرفته و شجع القريبين منك على الحرص على الطاعات.7- الصحبة الصالحة:صاحب في رمضان صديقك الحريص على طاعة الله لتعينوا بعضكم البعض على الخير و ابتعد عن رفاق السوء. انظر إلى أمر المولىبالصبر على رفاق الخير أي مقاومة هوى النفس في الانصياع إلى أهوائها أو مصاحبة غيرهم من محبي الدنيا في سورة الكهف "و اصبرنفسك مع الذين يدعون ربهم بالغداة و العشي يريدون وجهه و لا تَعْدُ عيناكَ عنهم تريد زينة الحياة الدنيا و لا تطع من أغفلنا قلبه عن ذكرناو اتبع هواه و كان أمره فُرُطا"8- الدعاء:كان الصحابة يحرصون في رمضان على دعوات محددة يركزون عليها في الصلاة و كل المناسبات طوال الشهر و يقولون:فوالله ما يأتي رمضان الذي يليه إلا وقد استجيبت كلها، ولا تنس مهما تعددت دعواتك أن تدعو الله أن ينصر الإسلام و المسلمين في الأرض كلهاو أن يعيد للمسلمين المسجد الأقصى و فلسطين و ما ذلك على الله بكثير .فيا من ترجو رحمة الله و مغفرته و ترجو أن يعتق رقبتك من النار في رمضان القادم هذا، احرص أشد الحرص علي تلك الأشياء النافعة في رمضان و جاهد نفسك على أن لا تفتر عزيمتك بعد بضعة أيام ثم لا تصحو من تلك الغفلة إلا ورمضان يوشك أن ينتهي.اللهم بلغنا رمضان1 point
-
1 point
-
وهبك الله قدرات فذة .. عقل متقد .. ومنح كثيرة وكبيرةمن الدون أن ترضى بما أنت عليه .. تستطيع أن تكون أكثر مما أنت وزيادة أبحر في نفسك ومعها وعش التجارب والتحديات فستجد أكثر مما تعرفه عن نفسك.. دائما قم بوضع الخطط لتحليل الشخصية ومعرفة نمطها وتفضيلاتها وكذلك للمجال الوظيفي المناسب للوصول الى أقصى درجات النجاح ولا تكف أبدا عن المحاولة واتفق مع من قال أنها مجرد محاولات لا أكثر للنفس البشرية فلا تقصر نفسك عليها ولا تجعلها تحدك.. ونتذكر دائما سبب وجودنا فىى هذه الدنيا فلقد خلقنا الله تعالى فى هذه الدنيا للعبادة والعمل قال تعالى : وما خلقت الجن والإنس الإ ليعبدون وقال ايضا وقل اعملوا فسيرى الله عملكم ورسوله والمؤمنون1 point
-
1 point