نجوم المشاركات

اداة للكتابة بطريقة ثلاثية الابعاد داخل برنامجك صور الشرح واتفضلوا الاداة OFFICENA 3D.rar

السلام عليكم هنا مشاركات يمكن لها علاقة كما انه اعتقد انه لابد من فتح التقرير او عمل نسخة منه في الذاكرة وهنا: 1. طريقة فتح التقرير في وضع التصميم غير مناسبه وخصوصا اذا تم تحويل القاعده الى mde او accde والاصح فتحه مع تمرير باراميتر الاخفاء ليكون مخفي ويمكن كذلك والافضل تعديل مصدر بياناته الى لاشي حتى لا يتم تحميل البيانات وبدون حاجه 2. هناك فكرة غير العنوان وهي الوصف والتي يمكن كتابنها بالماوس الايمن على التقرير ثم خصائص ثم اكتب وصف للتقرير وهنا يمكن قراءة اسم التقرير ووصقه دون الحاجة الى فتحه تقبلو تحياتي تعديل على الملف باول مشاركة اضافة جدول واضافة كمبو بالنموذج تقبلو تحياتي كود أسماء كل التقارير.rar

بعد إذن أستاذنا شفان : أختلف معك في الاجابة وسأجيب بطريقة أخرى : ( هناك كود عند تحريك الماوس .. ماهو الكود ؟ و هل هو مهم جدا ام لا ؟ هل نقدر بدل ان نستخدم عند تحريك الماوس ان نستخدم في مكان اخر ؟ هذا وهذا و هذا واليك اكثر من هذا لازم نعرفه جيدا ! لذا يجب ان ترفق قاعدة مصغرة من قاعدة بياناتك اي نريد تلك النموذج مع مصدره لكي نشوفه ) طبعا الاختلاف لا يفسد للود قضية

الف شكر استاذي الفاضل بالفعل انت مبدع دائما جزاك الله كل خير وزادك الله من علمه وكل عام وانت بخير بس شوف اخي الفاضل المرفق المفروض حرف العين في ذكر يعطيني لجنه 4 هنا عطيني لجنه 3

اصدقائي الاكارم تحية طيبة استكمالا للموضوع احببت ان اضع تطبيق كامل لانشاء نسخة احتياطية عن جداول قاعدة البيانات الجديد هنا ان النسخة مضغوطة ببرنامج Winrar ومحمية بكلمة سر ملاحظة : التطبيق حاليا ياخد نسخة احتياطية عن الجداول المضمنة في قاعدة البيانات و ليس المرتبطة كلمة السر هي 1 وللموضوع تتمة إن شاء الله rartest1.rar

الاخوة الزملاء شرح مبسط للاكسل بالبوربوينت للمبتدئين بعض الصور رابط الموضوع https://www.4shared.com/rar/SgZgpiN9ei/___.html

السلام عليكم ورحمة الله تعالى وبركاته استكمالا لسلسلة الجواب بيبان من العنوان اقدم اليكم المرفق الاتى تدرج الوان على النموذج برمجيا تدرج الاوان بطريقة مذهلة ☺.rar

السلام عليكم و رحمة الله هذا كود منقول من أحد الكتب يجلب أسماء كل التقارير فى القاعدة ويشغلها من كمبوبوكس الكود فى حدث عند التحميل للنموذج Private Sub Form_Load() Dim newvallist As String newvallist = "" Dim obj As AccessObject For Each obj In CurrentProject.AllReports newvallist = newvallist + Chr(34) + obj.Name + Chr(34) + ";" Next obj Me.objCombo.RowSource = "value list" Me.objCombo.RowSource = newvallist Me.objCombo.Value = Me.objCombo.ItemData(0) End Sub ثم فى حدث بعد التحديث للكمبوبوكس لفتح التقارير حسب الاسم المختار Private Sub objCombo_AfterUpdate() DoCmd.OpenReport Me.objCombo, acViewPreview End Sub الملف المستخدم 2003 - 2007 كود أسماء كل تقارير القاعدة الحالية.rar و هذا تعديل للكود بحيث يجلب أسماء التقارير مع مسمياتها التوضيحية كود أسماء كل 8التقارير.rar

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

طيب على العموم مش لازم نصالحكم النهاردة كمان غدا مش فاضي

السلام عليكم أخي حمادة هذا الموضوع مخالف لقوانين المنتدى: و بصفة خاصة نؤكدعلى ما يلي1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد.3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال.4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا.....5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. و 6. يجب ان يكون عندك سؤال واحد في الموضوع رجاء فتح موضوع آخر ، مع مراعاة النقاط اعلاه جعفر

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

عهدي بك أستاذ عمرو أنك الذكاء المتوقد المشتعل كيف لم تلاحظ الفرق ؟ أستاذنا شفان علشان ذوقه واحترامه الشديد بدأ بمقدمات : (عفوا قصدي يعني) أنا أختلف معه في البداية فقط ، لازم يتكلم مباشرة دون احراج الأستاذ حماده عثمان مش غريب على المنتدى هو ابن بار من أبناؤه ومش هيزعل يعني المفروض يأمر أ/ حماده بأن يأتي بقاعدة البيانات كاملة مكملة علشان نشوف الخطأ

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

الله الله يا ابا جودي ايه الابداعات دي

العفوووو اخى الحبيب

لأنه يكتب الكلمة 7 مرات عن شكل طبقات نقدر نقول خدعة جميلة شكرا لك اباجودي على الهدية

الاخوة الزملاء على الرابط التالى ملف اكواد الفورم محفظة الاكواد والتى تم شرحة بهذا الموضوع بالفيديو ذلك

فيديو شرح للتعامل مع الفورم من الموضوع على الرابط التالى

انت على الحق الخطأ من عندي افتح محرر فيجوال واحذف هذا Or Left(Me.myname, 1) = "ع" من هذا السطر وبالنسبة ما شفت في الكود اي خطأ وحقا النتيجة بيعطي الخطأ واخير عملت تغير تسلسلي في الكود وضبطت اليك ملفك بعد تعديلين فيها بحث مساهم.rar

وحرف الحاء في ذكر المفروض يعطيني لجنه 2 بيعطيني لجنه 1

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

شكرا جزيلا لك أخي الغالي شفان هذه هو بضبط

وهذه الأداة هدية مني خاص لاستاذي الحبيب @ابوخليل ولكل اعضاء ومن يستخدم اوفيس اصدار 2003 ويريد ان يستخدم اصدرا احدث بواجهة 2003 اي بها قوائم اصدر 2003 او من يستخدم اصدار اعلى من 2003 وعنده ذكريات مع قوائم اصدار 2003 اتفضل من هنا http://www.officeclassicmenu.com/en/download.html

العفو اخي الكريم و فضلا و ليس امرا ناديني باسمي

تحية طيبة اخوتي اخي ابا جودي جعلت الامتداد Rarx عوضا عن Rar لكي يميز المستخدم النسخة الاحتياطية عند استعادتها لو كانت بالامتداد Rar عندها ستظهر جميع الملفات المضغوطة و قد يخطئ المستخدم في الملف و يفتح ملف آخر اخي شيفان كلامك صحيح بالنسبة لكلمة المرور فهي بعد الحرفين -hp اما الملفات المرفقة فهي برنامج الوين رار نفسه و نسخة التسجيل الخاصة به طبعا قمت ايضا بتعديل لاحقة برنامج الوين رار حتى لا يصاب بفيروس

اخي الكريم ارجو التوضيح التفصيلى لكي يكون الحل من مره واحده ... لازلت لا افهم ما المقصود بإعطاء رمز لكل ماده .. ايضاً بالنسبة للسعر هل عندما تكتب اسم الماده يظهر السعر ؟؟؟؟ .. ام انك تقصد كود يقوم بعمل تصفيه؟؟؟؟؟؟؟؟ .. يرجي التوضيح التفصيلي .. او ان تضع شكل النتائج المتوقعه لفهم المطلوب تقبل تحياتي

الف شكر علي التعاون وربنا يجعله في ميزان حسناتكم

اتفضل اليك هذا الكود If DCount("[id]", "table1", "[id]=" & Me.Text1) > 0 Then If MsgBox("هل تريد ان تحذف سجل رقم ( " & Me.Text1 & " ) فعلا", vbYesNo + vbMsgBoxRight, "") = vbYes Then Dim sql As String sql = "DELETE Table1.ID, Table1.NAME, Table1.TEL, Table1.DATE FROM Table1 WHERE (((Table1.ID)=[Forms]![Form1]![Text1]));" DoCmd.SetWarnings False DoCmd.RunSQL (sql) DoCmd.SetWarnings True MsgBox "تم حذف السجل المرقم ( " & Me.Text1 & " ) بنجاح" Me.Text1 = "" End If ' msgbox Else MsgBox "ليس لدينا اي سجل برقم ( " & Me.Text1 & " ) في جدولنا" End If ' dcount وهذا قاعدة بايناتك بعد اضافة الكود الاعلاه ID.rar

وعليكم السلام انا كلما رأيت الى رسالة OLE و عنصر ActiveX ، كلما جاء في بالي اعدادت الوندوز: جعفر

الاخ وائل شكرا لك واليك هدية على الرابط التالى

اشكرك على تقبلك وشرحك لقد اضفتهم الان كيف ربطت بينهم كيف جعلت البيانات تظهر بسجل واحد

حسب فهمي للموضوع هنا سيتم تغير الرقم سري a -hp1 بدل رقم 1 اعطي ماتريد وانا عندي سؤال ما هذه المرفقات مع القاعدة ؟

عفوا على التأخير الرد اتفضل اليك طريقة تقدر تستخدم دالة if هكذا If Me.Gender = "ذكر" And Left(Me.myname, 1) = "ا" Or Left(Me.myname, 1) = "ب" Or Left(Me.myname, 1) = "ت" Or Left(Me.myname, 1) = "ث" Or Left(Me.myname, 1) = "ج" Or Left(Me.myname, 1) = "ح" Then Me.committee = "لجنة 1" ElseIf Me.Gender = "انثى" And Left(Me.myname, 1) = "ا" Or Left(Me.myname, 1) = "ب" Or Left(Me.myname, 1) = "ت" Or Left(Me.myname, 1) = "ث" Or Left(Me.myname, 1) = "ج" Then Me.committee = "لجنة 1" ElseIf Me.Gender = "ذكر" And Left(Me.myname, 1) = "خ" Or Left(Me.myname, 1) = "ر" Or Left(Me.myname, 1) = "د" Or Left(Me.myname, 1) = "ز" Or Left(Me.myname, 1) = "ذ" Then Me.committee = "لجنة 2" ElseIf Me.Gender = "انثى" And Left(Me.myname, 1) = "خ" Or Left(Me.myname, 1) = "ر" Or Left(Me.myname, 1) = "د" Or Left(Me.myname, 1) = "ز" Or Left(Me.myname, 1) = "ذ" Then Me.committee = "لجنة 2" End If انا قلت لك اعطيني كل الاحتمالات اي أي لجنة بيأخذ اي حروف للرجال والنساء مثلا اذا لجنة رقم 3 بيأخذ الحروف ط ش س ع ق مثلا للرجال والنساء تقدر ان لا تستخدم في ذلك السطر من الكود Me.Gender = "انثى" او "ذكر" لأن كل منها بيأخذ نفس الحروف اتمنى لن يوصل لك المطلوب تقبل تحياتي

فى الاغلب هذا عنصر تحكم على نموذج ويجب على عنصر التحكم هذا استدعاء ملف ما من مسار محدد وتغير هذا المسار او تم تغير اسم هذا الملف على الاغلب ولذلك تنتج هذه الرسالة

انا عجتنى الفكرة جدا وفى انتظار استكمال الموضوع وكيف يمكن تغيير رقم كلمة مرور الملف المضغوط وليه حضرتك عملت امتداد الملف الناتج عن النسخ بهذا الشكل .RARX وليه مش .RAR ؟؟؟؟

ممكن المرفق اخى الكريم

هناك طريقة أخرى ربما نفكر فيها لاحقا إن شاء الله و هى أن نعمل جدولا نسجل فيه أسماء التقارير و تسمياتها التوضيحية و نعمل استعلاما يجعل هذا الجدول دائم التحديث بحيث كلما أضفنا تقريرا وضعت بياناته أوتوماتيكيا فى الجدول و الله المستعان

جرب الاستعلام Qry_Insurance5 11114.rar

السلام عليكم أخي أوس رجاء النظر في الرابط التالي جعفر

استاذي ومعلمي الفاضل اهلا بك واشكرك علي اهتمامك استاذي الفاضل لاتوجد احتملات غير التي ذكرتها طبعا الرجال هتاخد كل الحروف والنساء كذلك الرجال لجنه (1) يكون اول حرف من اسمهم أ ب ت ث ج ح ولجنه (2) هيكون اول حرف من اسمهم. خ د ز ر ز ولجنه (3) س ش ص ض ط بمعني اني الرجال 5 لجان قسم عليهم الحروف الابجديه علي خمسة لجان طبعا النساء تختلف في انها ليست نفس الرجال في ترتيب الحروف فلجنه (1)في النساء هيكون اول حرف من اسمهم ) أ ب ت ث ج ح خ مع العلم انا لجنه ( 1) في الرجال. هيكون اول حرف من اسمهم. أ ب ت ث ج ح وهذا للتوضيح وللعلم لماذ اخترت في الشرط حقل الجنس لهذا السبب طبعا هنقسم الحروف لابجديه للنساء علي 4 لجان وارجو ان اكون قد اوضحت ما اريد وحزاكم الله خيرا

السلام عليكم استاذنا وحبيبنا عبد الفتاح شكرا لك ان تضع الكل في اهتمامك للاثراء : هذه طريقة اخرى باستخدام جدول النظام وعندي تساؤل ولكني سأطرحه لاحقا كود أسماء كل التقارير2.rar

هذا مثال بسيط اخي الكريم اذا كان يلبي طلبك ارسل برنامجك ليتم التعديل test1.rar

انا لا أومن بالصدفة وانما هو تخطيط ربّاني والسبب قد يكون مثل ما قال أخي أوس بالفعل محترفين برمجيا وخُلقيا ، ومحترمين جداً وانا أشهد بأن الادارة ايضا هكذا ، وفي مقدمتهم الأستاذ المهندس @محمد طاهر صاحب الموقع ، والقلب النابض له ، وأوسعنا علماً ، وأبسطنا خُلقاً وكلما جار عليّ الدهر ، ألجأ الى الجدار المنيع وأخو الجميع ، أخونا العود @ابوخليل ، وبحكمته ترجع المياه الى مجاريها ، وبعلمه وإصراره يفتح لنا آفاق جديدة ، نتوسع فيها جعفر

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

اولا: شروط المنتدى لا تسمح بهذا ، ثانيا: البرنامج الذي استفيد منه ، اشتريه ، وخصوصا اذا استعماله خلال الفترة التجريبية اثبت جدارته جعفر

وعليكم السلام نعم هو من البرامج القوية في هذا المجال ، ولكن للعلم ، فإن الرنامج تجريبي وبعد مدة تنتهي صلاحيته ولا يعمل ، للعلم فقط جعفر

النسخة الاخيرة من البرنامج شكرا لكل من ساعدنى وشكرا للسادة الافاضل القائمين على هذا الموقع اسم المستخدم : محمود الرقم السرى : 1990 برنامج حساب 1العجز والزيادة.rar

أحبابي وإخواني الأعزاء لقد افتقدتكم جميعاً ويعلم الله لم يمنعني عنكم إلا الظروف الشديدة والحمد لله على كل حال . هذه هدية متواضعة لكم أحبابي . هام جداً : أرجو قبل التعامل مع الملف ضرورة الاطلاع على ورقة شرح الملف والتي أسميتها " HELP" ويمكن الانتقال إليها وسائر الأوراق من مفتاح " الانتقال إلى " والموجود بكل الأوراق ، وأرجو أن تكون الفكرة فيها ولو بعض الفائدة . وتقبلوا حبي وتقديري أبو عبدالله _________________________________.rar