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

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

جرب استخدام الدرايفر الاخير sql native client ومع الاصدار 2013 واعطنا النتائج تحياتي

شكرا ستاذ محمد نجار على مشاركاتك تفضل اخي @الصوصي لاحظ تعديل بسيط على مصدر سجلات مربع التحرير حيث تم تغيير نوع مصدر السجلات الى قائمة حقول ومصدر السجلات اسم الجدول هنا سيتم سرد سماء الحقول تلقائي ولا داعي لكتابتهم كمصدر قيم بالتوفيق FindAsUType.rar

السلام عليكم ورحمة الله أخواني الكرام وعلمائنا وأساتذتنا العباقرة في هذا الصرح العملاق والأكثر من رائع بعد إنتهاء ولله الحمد من برمجة برنامج شؤون الموظفين والمرتبات ونشره في الموقع منذ فترة وجيزة على هذا الرابط برنامج شؤون وإدارة الموظفين بحلته وشكله الجديد أحببت اليوم بعد طلبات من الاصدقاء أن أقوم برفع البرنامج مفتوح المصدر لكي تتم الفائدة منه في كافة النواحي العلمية والعملية وذلك من (خلال الكودات وطريقة التصميم) ماعليكم سوا فك الضغط عن الملف المرفق وتنصيب البرنامج بكل سهولة وفي الاخير تفعيل الماكرو يعمل البرنامج على كافة أنظمة ويندوز وكافة نسخ أوفيس من 2007 ومافوق لاتنسونا من الدعاء بظهر الغيب في هذه الايام المباركة الملف بامتداد zip هو الملف كاملا Office Soft.Employ & Salary-Source.zip Office Soft.Employ _ Salary-Source.rar

هنا قاعدة بيانات اكواد VBA للاكسل مع الشرح والامثلة ((( مرجع للجميع ))) السلام عليكم ورحمة الله وبركاته الفكر من الموضوع عمل قاعدة بيانات باكواد VBA للاكسل مع الشرح والامثلة ((( تكون مرجع للجميع ))) امل من الجميع اثراء الموضوع ....

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

وعليكم السلام استخدم معادلة IF بشكل بسيط لتحقيق المطلوب =IF(A5-B5=0,"//////",A5-B5)

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

لو شفت الفيديو صديقي العزيز كنت عرفت الإجابة خلق الإنسان من عجل شكرا لمجرد مرورك

أرى أن ما حدث ليس مشكلة وإنما هو حل لمشكلة فالأفضل تخزين التاريخ في حقل من نوع تاريخ وليس نصا ويمكن تحويل النص لتاريخ باستخدام cdate(fieldname) وربما لو تم تحديد نوعية المشكلة الناتجة عن تغيير نوع البيانات لأمكن حلها

اعمل نموذج بنوع (داتاشيت) هو مثل الجداول والاستعلامات وتقدر تفتحه مثل كل النماذج الاخرى م.2017.شفان ريكاني

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

في اصدار 2013 يوجد نوع بيانات short text اما اصدار 2007 فيوجد text فقط لا فقط تحديث بيانات من جدول لآخر استاذ @sandanet في هذا الجدول لا استورد بيانات ملف اكسل وانما تحديث بيانات من جدول لآخر في قاعدة البيانات .

اصبر اتفضل اضفت حقلين الحقل الاول هو DateN: IIf([id] Mod 2;-CDbl([date]);CDbl([date])) انا استخدمت iif لان عندنا شرط لكي يعطينا نتيجة سالب ام موجب 2 mod لكي يفرق بين سجلات مفرد و مزدوج cdbl لكي يحولنا التاريخ الى تسلسل رقمي للتاريخ والثاني Frq2Date: IIf(Abs(DSum("[DateN]";"استعلام1";"[id] <=" & [id] & "and [id] >=" & [id]-1))>42000;0;Abs(DSum("[DateN]";"استعلام1";"[id] <=" & [id] & "and [id] >=" & [id]-1))) انا استخدمت iif لان عندنا شرط لكي يعطينا صفر لاي فرق بين سجلين اذا كان قيمته اكبر من 42000 abs لكي يعطينا نتيجة موجبة فقط dsum ما يحتاج الشرح انظر الى الصور النتيجة واليك مرفقك بعد تعديل test135.rar وهناك ملاحظة كما قلت لك في مشاركة الماضي للموضوع يجب ان يكون التسلسل مضبوط م.2015زشفان ريكاني

السلام عليكم اخى الكريم رغم محاولتى الاطلاع على كافة التعليقات والاكواد التى جاءت بها - الا ان مطلوبك غير واضح - ارجو ان تدرج ملف - موضح به ارقام الاعمده المطلوب ترحيلها - والى اى اعمده - هل اللصق الى اعمده متجاورة ام الى اعمده متفرقة ايضأ - اى ان تحدد اى اعمده تريد نسخها والى اى اعمده تريد لصقها ؟ تقبلوا مرورى وتحياتى

يجب ان تكون الارقام قي عامود مستقل مثلاً في الخلية A2 النص( قلم رصاص عدد ) يقابلها قي الخلية B2 الرقم 1

السلام عليكم ورحمة الله أخي وحبيبي أبو عبدالرحمان، غمرتني بالدعاء، لك إن شاء الله بالمثل وتقبل الله منك كل هذا الدعاء وتقبل صلاتكم وصيامكم وقيامكم وصالح أعمالكم... بالنسبة للمعادلة الخاصة بالجزء الأخير حاولت أن أختصرها قدر الإمكان وما توصلت إليه تجده في الملف المرفق... أخوك الذي يحبك في الله بن علية الجزء الاخير.rar

يمكن ان العميل يدخل على تصميم الجدول ويغير نوع البيانات ؟ هل تضمن عدم ذلك @ام ناصر لكنك صراحة ماذا ؟ الصراحة مشاركاتك لها طعم خاص اخي @sandanet تحياتي للجميع

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

السلام عليكم ومشاركة مع الاستاذ المميز شيفان تعتمد الاجابة على الاحابة على التالي 1. ماهو نوع البيانات في الاس كيو ال datetime او date او ماذا ؟ 2. ماهي طريقة الربط لديك او بمعنى اصح ماهو الدرايفر لديك ؟ هل هو odbc العادي ام native sql client ؟ هذا ومبدئيا يمكن ان يكون ان تجرب ان تضع وتتاكد نوع البيانات في الاس كيو ال = DateTime تحياتي

ههههههه النتيجة ممتازة حتى تاريخه كنت أريد أسوي لك أكثر من اعجاب Like لكن ذلك غر متاح بالمنتدى للأسف

شكرا لك سيد جمال على التنبيه تم العلاج بواسطة اضافة سطر الى الكود والكود سيكون كالتالي Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer) Dim i As Integer i = ((Me.dd + 1) * 0.503) * 567 Me.Box34.Height = i + (1.802 * 567) Me.Detail.Height = Me.Box34.Height End Sub db1 (2) (2).rar هل ممكن تعمل التجربة على المرفق م.2010.شفان ريكاني

السلام عليكم ورحمة الله أخي وحبيبي أبو عبد الرحمان، قيمة 33% لم تضعها في مكانها في المعادلة وإلا لأتت المعادلة بالمطلوب، تم تصحيحها في المرفق... أخوك الذي يحبك بن علية دالة معرفة UDF +44.rar

استأذن من استاذنا ابوخليل اليك هذا الرابط م.2008.شفان ريكاني

جذاك الله خير

السلام عليكم ورحمة الله تفضل اخى الكريم الصف الرابع.rar

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

هل الجدول ده بيتم استيراد بيانات اليه من اكسل ؟

حسب معرفتي ليس هناك نوع بهذا بل هناك نوع Text فقط و يوجد ايضا نوع Date/Time ومنه بيأخذ Short Date هذا والله يعلم م.2004.شفان ريكاني

السلام عليكم جرب المرفق علة المطلوب - وان كان كذلك يرجي تحديد الموضوع كمجاب القيد العام_3.rar

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

السلام عليكم ورحمة الله وبركاته اريد ان احذف جميع سجلات (صفوف) جدول من خلال كود فرعي من ملف اكسل انا استخدم الكود التالي للحذف طبعا بعد فتح الاكسس والجدول Sub kh_AllDelete() ''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''' With RS If .RecordCount Then .MoveFirst While Not .EOF .Delete .MoveNext Wend End If End With ''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''' End Sub الا يوجد كود مختصر للحذف بدلا من استخدام الدواره بحثت في المنتدى ولم اجد طلبي بالكود فتهت وعفوا للازعاج عبدالله باقشير

السلام عليكم ورحمة الله وبركاته أخي الفاضل حفظكم الله أهدي لك هذا الملف وهو عبارة عن عدة ملفات في ملف واحد تحتوي على تشكيلة عريضة نسبياً على حد أستطاعتي من المعادلات والأكواد قمت بتجميعها في ملف واحد أرجو أن ينتفع به ومنها الكود الذي طلبته وهو في أول صفحة سوف يفتح فيها الملف. تقبل فائق الأحترام أبو أنس ناصر حاجب ٍٍSupporter2.rar