omarahmed1424

السلام عليكم ورحمة الله وبركاته وبعد ... بالنسبة لنقل الأرقام من الإكسل إلى حساب الجيميل فقد وجدت ملف إكسل يقوم بذلك ولك هل يمكن إرسال صور بنفس الطريقة باستخدام ملف الإكسل رجاء المحاولة من عباقرة المنتدى Excel Contacts To VCF.rar

هل من رد يا إخوان لو تكرمتم

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

كل عام وانتم بخير اعاد الله رمضان عليكم بالخير واليمن والبركات

كل عام وانتم بخير اعاد الله رمضان عليكم بالخير واليمن والبركات

أضم صوتي لأستاذي في هذا الطلب فهل من مجيب؟

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

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

تمت وجزاكم الله ألف خير أخي ومعلمي وأستاذي جعفر

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

لسلام عليكم ورحمة الله وبركاته أعضاء المنتدى الكرام حفظكم الله أستخدم الكود التالي لطلب كلمة مرور لفتح النموذج وحاولت أن أستخدم معه الوحدة النمطية المعروضة في هذا الموضوعhttps://www.officena.net/ib/topic/37919-تمت-الاجابة-اريد-وضع-كلمة-مرور-لفتح-النماذج/ لتظهر كلمة المرور على شكل نجوم فلم أستطيع التعديل على الوحدة النمطية وعدد النماذج التي أستخدم لها كلمة مرور كبير جدا يصعب التعديل على كودها فهل من معين بعد الله يعدل لي الوحدة النمطية مع بقاء الكود للنماذج كما هو في التالي Private Sub Form_Open(Cancel As Integer) On Error Resume Next Dim intinput As Integer intinput = InputBox("فضلاً ادخل الرقم السري", "دخول") If intinput = 12011 Then Cancel = False Else MsgBox "عفواً كلمة المرور غير صحيحة", vbOKOnly + vbMsgBoxRight, "تنبيه" Cancel = True End If End Sub

السلام عليكم ورحمة الله وبركاته أعضاء المنتدى الكرام حفظكم الله أستخدم الكود التالي لطلب كلمة مرور لفتح النموذج وحاولت أن أستخدم معه الوحدة النمطية المعروضة في هذا الموضوع لتظهر كلمة المرور على شكل نجوم فلم أستطيع التعديل على الوحدة النمطية وعدد النماذج التي أستخدم لها كلمة مرور كبير جدا يصعب التعديل على كودها فهل من معين بعد الله يعدل لي الوحدة النمطية مع بقاء الكود للنماذج كما هو في التالي Private Sub Form_Open(Cancel As Integer) On Error Resume Next Dim intinput As Integer intinput = InputBox("فضلاً ادخل الرقم السري", "دخول") If intinput = 12011 Then Cancel = False Else MsgBox "عفواً كلمة المرور غير صحيحة", vbOKOnly + vbMsgBoxRight, "تنبيه" Cancel = True End If End Sub

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

السلام عليكم ورحمة الله وبركاته وبعد... أعتذر بشدة على التأخير لكن عند التطبيق ظهر خطأ حيث بالنسبة للتاريخ يظهر آخر تاريخ ولكن الدفعة ليست مطابقة لنفس التاريخ فكيف يتم آخر سداد بالتاريخ والدفعة معا بمعنى أن يذكر الاستعلام آخر تاريخ ومعه الدفعة التي سددت في نفس التاريخ . فهل من مساعدة ولكم الشكر

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

للرفع مع شكري وتقديري بشدة

للرفع من شكري وتقديري

السلام عليكم ورحمة الله وبركاته وبعد ... أعضاء المنتدى المحترمون لحفظ نسخة احتياطية من برنامجي أستخدم الكود التالي : Private Sub Cmd1_Click() Set khaher = CreateObject("Scripting.FileSystemObject") With Application.FileDialog(4) .AllowMultiSelect = False .ButtonName = "حفظ" .Title = "حفظ نسخة من قاعدة البيانات" If .Show = True Then [AsA] = .SelectedItems(1) khaher.CopyFile CurrentDb.name, Me.AsA & _ "\" & Replace(CurrentProject.name, ".MDB", "") & _ "_" & Format(Date, "yyyy-mm-dd") & ".MDB" MsgBox "تم أخذ نسخة احتياطية من برنامجك بنجاح", , "تنبيه!" Else [AsA] = "" End If End With End Sub وسؤالي للاعضاء الأعزاء هل يمكن التعديل على الكود السابق ليتم حفظ نسخة احتياطية مضغوطة winrar من البرنامج مع وضع باسورد ثابت للملف المضغوط وجزيتم خيرا

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

متابع ومحتاج لنفس الموضوع

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

السلام عليكم ورحمة الله وبركاته وبعد أخي العزيز أ / علي المصري جربت تعديل يوم بداية الأسبوع من لوحة التحكم في النظام عموما وبالفعل ضبط اليوم والتاريخ معا . لكنني حاولت بعد تكرمك بالطبع إضافة جزء المتابعة اليومية لبرنامج شئون الطلاب عندي فهو ينقصني بشدة ولم أفلح في ذلك لضعف قدراتي التي لا تجاري الأساتذة مثلكم فهلا تكرمت ( أو تكرم أحد الاعضاء ) على بذلك ولكم الأجر والثواب عند الله ومرفق لكم الجدوال التي تحتاجونها في الربط على ما أحسب بخبرتي الضعيفة Microsoft Access قاعدة بيانات جديد ‫‬.rar

وانا أيضا أنتظر

لا حظت أن اليوم لا يوافق التاريخ الصحيح فمثلما يظهر في الصورة التاريخ 11/12/2016 يوافق السبت والصحيح أنه يوافق الاحد فما سبب تلك المشكلة

الأخ العزيز : من السهل معرفة كلمة مرور القاعدة ولكن هل أنت مالكها الفعلي ؟ وإذا لم تكن مالكها فهذه صورة محتوياتها فقط .