كل الانشطه

السلام عليكم ورحمة الله وبركاته أخ kkhalifa1960 أشكرك جزيل الشكر على البرنامج والآن شغال معي ولله الحمد تمام بس لي طلب كرما مافيه طريقة نسوي فيها إجمالي للمخالفات بحيث تبين لنا بيانات السيارة مع اسم السائق ويكون بها اجمالي المخالفات اللي عليه سواء مجموع المسددة والغير مسددة ... وشكرا لك Ahmed ElShahat.rar

السلام عليكم . اذا امكن احد يقدم راي او فكرة بالخصوص مع التقدير

كل الحب

أخواني وأساتذتي ومعلمينا ( دون استثناء ) .. سأتطرق اليوم لفكرة غريبة جداً تتلخص بأنني في فترة دراستي في عام 1997 ، كان في منهاجنا لمادة الحاسوب ، برمجية أسمها لغة أفكار ( MS-DOS ) ، وهي تقوم على مبدأ إدخال أوامر داخل البرنامج لتنفيذ رسومات . مبدأ هذه البرمجية القديمة يشابه Berkeley LOGO . حيث الفكرة تقوم على إعطاء أوامر مثل :- أمام ، خلف ، يمين ، يسار ، كرر .... إلخ وكتوضيح للفكرة في الصورة التالية :- ولأن الموضوع بفكرته غريب نوعاً ما .. سأقوم بالشرح البسيط لآلية العمل :- عند تشغيل الأداة ، وللتجربة دون قيود حفظ المشاريع داخل الجداول . انقر على الزر "اكتب أمراً هنا" ستجد أن سلحوف ( اسم الشخصية التي أخترتها لقلم الرسم ) قد ظهر مع خطوط لتحدد إحداثيات الرسم (س،ص / x,y ) في خانة كتابة الأوامر ، سأعرفك على الأوامر بشكل سريع لو كتبت الأمر "مساعدة / مساعده" (بالهاء أو التاء المربوطة ) . أو انقر على زر علامة التعجب في أقصى اليسار . بعد أن تعرفت على الأوامر والتي تتمثل بإعطاء اتجاهات وزوايا وشروط وتكرارات . جرب على سبيل المثال الأمر التالي :- سرعة 3 كرر 10 ( مربع 50 يمين 36 ) ستجد أن النتيجة للرسم تساوي الصورة التالية :- طبعاً فإنني قد قمت بدمج مجموعة من الأشكال الثابتة مثل ( مربع ، دائرة ، مثلث ، نجمة ، قوس ، مستطيل ) داخل مصفوفة في عقل الأداة . فمثلاً لرسم مربع طول ضلعه 50 فرضاً . سنحتاج لكتابة :- 1. أمام 50 2. يمين 90 3. امام 50 4. يمين 90 5. امام 50 6. يمين 90 7. امام 50 8. يمين 90 لاحظوا أنها 8 حركات لعودة القلم سلحوف لمكانه الطبيعي . بينما يمكننا تنفيذ الفكرة بشكلين آخرين مثل :- كرر 4 ( امام 50 يمين 90 ) ولذا قد دمجت هذا الأمر داخل البرنامج ليصبح باختصار مربع 50 . وكذلك الأمر لرسم دائرة بقطر 50 مثلاً ، ما عليك سوى كتابة الأمر :- دائرة 50 أو يمكنك استخدام الأمر المركب :- كرر 360 ( امام 1 يمين 1 ) وفي الحالتين سيرسم لك دائرة . والأوامر كثيرة جداً والتي يمكن أن تجعل من الأداة عبارة عن ملهم خيال وأفكار لرسم مجسمات الأشكال . ماذا يمكنك أيضاً أن تجد في واجهة الأداة ؟ 6 أزرار في أقصى اليمين تمثل ، زر فتح مشروع محفوظ ، زر مشروع جديد ، زر حفظ المشروع الحالي كصورة ، زر لاختيار لون من أولان الويندوز ، زر لتصدير أوامر المشروع الحالي ، وزر استيراد أوامر مشروع خارجي ، وكلاهما بصيغة ملفات نصية . زر لإيقاف العملية الحالية في حال أردت الإيقاف ، وسيتم التراجع عن الأمر الذي تم إيقافه . ملف الأداة مفتوح المصدر ، للتحميل :- Foksh Turtle 2026.zip وهذه صور لبعض من التجارب التي قمت بها

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

ياخي أي جدول تقصد؟؟؟ هل ممكن توضح لنا بصورة للنتيجة التي تريد الحصول عليه؟

بدون حدف في الجدول أكسس استاذ

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

طلبك غير واضح الان نحن نقوم بإستيراد الاكسل الى جدول tblTempImport ثم يتم ترحيل البيانات الى الجدول tbl_Horaire أو tbl_Horaire2 الان ماهو طلبك هل تريد ترحيل بيانات الملف الثاني إلى جدول tblTempImport بدون حذف بيانات الملف الأول منه ام تريد أن يتم إلحاق السجلات إلى الجدول tbl_Horaire أو tbl_Horaire2 بدون حذف البيانات السابقة ماهو الطلب بالضبط؟

استاذ مازال الكود يحدف البياتات استاذ عند استراد بيانات الملف الاول وعند استراد بيانات الملف الثاني يحدف بيانات الملف الاول في البرنامج استاذ عند الضغط نقوم باختيار الملف لاستراد البيانات

شكرا جزيلا اخي الفاضل انا بتستعمل ويندوز 7 ولا يسمح بجوجل درايف أنا محتاح علي ايميلي gmail

أيضاً اقرأ هذا الموضوع قد يفيدك ..

وعليكم السلام ورحمة الله وبركاته .. اقرأ هذا الموضوع قد يفيدك :-

اخواني اعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته محتاج اعمل نسخة احتياطية لقاعدة البيانات علي ايميلي gmail لأني اعمل علي ويندوز7 ولا يوجد عليه google drive

استاذ مازال الكود يحدف البياتات استاذ عند استراد بيانات الملف الاول وعند استراد بيانات الملف الثاني يحدف بيانات الملف الاول في البرنامج

السلام عليكم ورحمة الله وبركاته، تعتبر حزمة برامج أوفيس (مثل الوورد، إكسل، وبوربوينت) أساسية لكل طالب، موظف، وصاحب عمل في المملكة. لكن الكثير يقع في حيرة بين النسخ المتاحة وأسعارها. إليك مقارنة سريعة تساعدك على الاختيار: أوفيس 365 (Microsoft 365): خيار ممتاز إذا كنت تحتاج مساحة تخزين سحابية (OneDrive) بمساحة 1 تيرابايت، وتود تشغيل البرامج على أكثر من جهاز (جوال، آيباد، كمبيوتر) مع الحصول على التحديثات الدورية. أوفيس بروفيشينال بلس (Office Professional Plus): الخيار الأفضل لمن يفضل الدفع لمرة واحدة فقط دون اشتراك شهري أو سنوي، وتعمل معك مدى الحياة على جهاز كمبيوتر واحد. نصيحة هامة قبل الشراء: تأكد دائماً من شراء التنشيط الأصلي الذي يرتبط بحسابك الشخصي مباشرة لضمان أمان ملفاتك وعدم توقف البرامج فجأة. إذا كنت تبحث عن تفعيل آمن ومضمون 100% وبأسعار تنافسية داخل المملكة مع دعم فني متميز، يسعدنا زيارتك لمتجرنا من هنا: متجر الكوكب الرقمي نتمنى لكم تصفحاً ممتعاً، ومستعد للإجابة على أي استفسار يخص تفعيل البرامج في التعليقات! اشتراك اوفيس

مشاركة مع فكرة مستقلة لإرسال بريد إلكتروني مع مرفقات .. اقرأ الموضوع التالي :-

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

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

يعني هل تريد تكرار الرقم ام التحديث واضافة الجديد .. وضح عموماً كان في خطأ انك كنت بتستورد من Feuil1 بالكودان وهو خالي فكان بيمسح ... اليك التعديل . ووافني بالرد Horaire-1.rar

اول شئ اعدادات الستامب من جي ميل تجسب منه (your_app_password) 🛠️ خطوات الحصول على App Password جديد في Gmail افتح المتصفح وسجّل الدخول إلى حسابك في Google. ادخل على صفحة إدارة الحساب (Google Account). من القائمة الجانبية اختر الأمان (Security). تحت قسم تسجيل الدخول إلى Google (Signing in to Google) ستجد خيار App Passwords. إذا لم يظهر، تأكد أن التحقق بخطوتين (2-Step Verification) مفعل. اضغط على App Passwords. سيطلب منك كلمة مرور الحساب للتأكيد. اختر التطبيق: Other (Custom name) واكتب مثلاً "AccessBackup". اضغط Generate → سيظهر لك كلمة مرور مكونة من 16 حرفًا. انسخ هذه الكلمة وضعها في الكود مكان your_app_password. يمكنك أيضًا إضافة أكثر من مستلم باستخدام فاصلة منقوطة: .To = "your_email@gmail.com;other_email@gmail.com" واليك نسخة مجربة لكني غيرت بياناتي . مع تعديل دالتك وتطلبها بزر أو بطريقتك . اليك المرفق . ووافني بالرد . BackupTest.rar

السلام عليكم استاذ لدي ثلاثة نماذج كل نموذج يقوم باستراد ورقة اكسيل استاذ عند استراد البيانات ملف الاكسيل الأول في البرنامج وعند استراد ملف الاكسيل الثاني يحدف البيانات الموجودة في البرنامج أريد لا يحدف البيانات من البرنامج Horaire.zip

السلام عليكم ورحمة الله وبركاته اخواني واساتذتي الكرام عندي قاعدة بيانات مقسمه الي جداول ونماذج وعند الخروج من البرنامج يتم عمل نسخة احتياطية علي مجلد علي الدريف :c المشكلة هنا تكمن في ماذا لو تم عمل عطل للكمبيوتر ككل ولم نستطع الوصول الي قاعدة البيانات او النسخة الاحتياطية وعليه كان من الضروري عمل نسخةاحتياطية علي البريد الالكتروني بحيث نستطيع قتحها من اي مكان او من اي جهاز اخر وهذا هو المديول : Option Compare Database Option Explicit Public Function InitiateAutoBackup() As Boolean ' هذه الدالة خاصة بعملية التحقق من البدء في إجراء النسخ الاحتياطي ' ثم إنشاء النسخة الاحتياطية حسب المعطيات ' وهي الدالة التي يتم مناداتها في ماكرو AutoExec On Error GoTo HandleError Dim WhereToSave As String InitiateAutoBackup = False ' مكان الحفظ بجانب قاعدة البيانات 'WhereToSave = BECurrentPath & "Bakup\" WhereToSave = "c:\Bakup" ' التحقق من وجود نسخة سابقة أم لا .. وعمل النسخة في حال عدم وجودها If CheckBackupWeek() = False Then ' يفحص من جدول النسخ الاحتياطية إذا كانت هناك نسخة محفوظة سابقا خلال هذا الأسبوع ' إذا ما وجدها يحفظ وإذا وجدها ينتقل للإجراء التالي Call BackupToPath(WhereToSave) InitiateAutoBackup = True Else ' توجد نسخة سابقة لذلك يلغي العملية InitiateAutoBackup = False Exit Function End If HandleExit: Exit Function HandleError: If err.Number = 0 Then Exit Function Else MsgBox err.Number & vbNewLine & vbNewLine & err.Description, , "Code : InitiateAutoBackup()" End If Resume HandleExit End Function

السلام عليكم لدي فورم وضافة كشف حساب عندما غيرت الحاسبة ونقلت الملف يظهر لي الفورم ولكن عندما اضيف كشف حساب يضاف الكشف ولكن بدون تنسيف واول شيء يكون حرف العمود aap والورقة فارغة بينما في الحاسبة السابقة يعمل بصورة طبيعية اتمنى المساعدة قدر الأمكان مرفق صورة مع التقدير

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