اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

SEMO.Pa3x

الخبراء
  • Posts

    540
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    11

كل منشورات العضو SEMO.Pa3x

  1. قم بتشغيل البرنامج المسمى SWM والتقط لي صورة للخطأ الذي يظهر
  2. ذكرت المشكلة في الأعلى، تأكد من رقم الهاتف يجب ان تكتب الرقم كما ظاهر لك في الواتس اب مفتاح الدولة ووو
  3. عليكم السلام، لم افهم طلبك حاول الشرح بصورة مبسطة أكثر.
  4. عليكم السلام، لم افهم سؤالك جيداً عن اي ID تتحدث؟
  5. ملاحظة يجب ان يكون برنامج الواتس اب موجود في جهاز الكومبيوتر واهم ملاحظة هي يجب كتاب رقم الواتس اب الذي تريد ان ترسل له الرسالة كما يظهر في البرنامج، مثال: الأولى: اكتب رقم الموبايل كما شرحت في الأعلى الثانية: لم اقم ببرمجة مربع البحث فقط وضعت مكانه ثالثا: انا ايضا اعمل على ويندوز 10 نواة 64 ولم اضطر لاضافة PtrSafe
  6. السلام عليكم ورحمة الله وبركاته.. من المعروف ان الواتس اب يسمح لك بارسال 5 رسائل فقط في كل مرة يعني لو كان لدينا 15 شخص نريد ان نرسل له رسالة علينا ان نقوم باعادة توجيه الرسالة 3 مرات كل مرة 5 اشخاص.. قمت بعمل اداة صغيرة في الـ NET. لتقوم بهذه المهمة. صورة مشروع الاكسس: قم بتحديد الاشخاص الذين تريد ارسال الرسالة لهم مع وضع نص الرسالة مع امكانية تحديد الكل يمكنك شروط البرنامج بحسب ماتراه مناسباً. النتيجة: ملاحظة يجب ان يكون برنامج الواتس اب موجود في جهاز الكومبيوتر واهم ملاحظة هي يجب كتاب رقم الواتس اب الذي تريد ان ترسل له الرسالة كما يظهر في البرنامج، مثال: لتحميل الواتس اب من الرابط الاتي: https://www.whatsapp.com/download لا تنسوني ووالدي من صالح دعائكم. تم بحمد الله. Whatsapp-Message-Sender.rar
  7. عليكم السلام، نعم يمكن ذلك بواسطة الـ Commandline Sub Extract() Dim RarIt As String Dim Source As String Dim Desti As String Dim WinRarPath As String WinRarPath = "C:\Program Files\WinRar\" Source = "C:\Users\SEMO\Desktop\DBS\GoogleDriveUploader.rar" Desti = "C:\Users\SEMO\Desktop\DBS\" RarIt = Shell(Chr(34) & WinRarPath & "WinRar.exe" & Chr(34) & " e " & Chr(34) & Source & Chr(34) & " " & Chr(34) & Desti & Chr(34), vbNormalFocus) End Sub Sub Compress() Dim RarIt As String Dim Source As String Dim Desti As String Dim WinRarPath As String WinRarPath = "C:\Program Files\WinRar\" Desti = "C:\Users\SEMO\Desktop\DBS\" Source = "C:\Users\SEMO\Desktop\DBS\NameFolderRar.rar" RarIt = Shell(Chr(34) & WinRarPath & "WinRar.exe" & Chr(34) & " a " & Chr(34) & Source & Chr(34) & " " & Chr(34) & Desti & Chr(34), vbNormalFocus) End Sub
  8. الاجمل من موضوعي، هو مرورك استاذي الرائع، فذلك يزيدني فخراً. دمت لي ذخراً .
  9. السلام عليكم ورحمة الله وبركاته... قمت ببرمجة هذه الاداة تلبية لطلب اخونا @ابوخليل في هذا الموضوع هنا: الاداة مبرمجة 100% بلغة NET. وهي تستعمل مكتبات Google.Apis.Drive وهي تحتاج منصة الفريم ورك 4.5 ملاحظة: انا طبقت الشرح على نسخة احتياطية حيث وضعت الـ Path عبارة عن CurrentProject.FullName يمكنك استبداله بأي مسار صورة او فيديو او ملف او اي شي الشرح بصوتي الجميل😂: https://youtu.be/Uzj68nCaEbo الرابط الذي استعملته في التسجيل: https://console.developers.google.com/apis/credentials/oauthclient/ لا تنسوني ووالدي من صالح دعائكم. تم بحمد الله. GoogleDriveUploader.rar
  10. @ابوخليل اخي ابو خليل انتظرني لحين عودتي للمنزل ان شاء الله سأقوم بعمل موضوع فيه طلبك، قمت ببرمجتة بلغة NET. وقمت بربطه بالاكسس.
  11. كلام الاستاذ ابو ابراهيم صحيح ، فالاكسس لا يمكنه التعامل مع Google Drive API ويمكننا عملها كما شرحت :
  12. السلام عليكم. اخي ابو خليل، يمكنك ذلك بلغة غير الاكسس لانها قديمة نوعا ما ولا تدعم مكتبات Google V3 الحديثة يمكنك عمل ذلك بواسطة Visual Studio .NET وتمرير براميتر مسار الملف الذي تريد حفظة من الاكسس للاداة التي قمت بعملها بالفيجوال والاداة ستقوم بعملها.
  13. بسم الله الرحمن الرحيم.. السلام عليكم ورحمة الله وبركاته.. بعد طول غياب عن الساحة بسبب ضروف الحياة والعمل.. اقدم لكم اداة صغيرة من برمجتي بلغة Visual Studio .NET تقوم بالتقاط الصور كاميرا الويب او اي كاميرا متصلة بالكومبيوتر ومن ثم خزنها في الجهاز الاداة قمت بربطها مع الاكسس، بحيث تقوم بتمرير براميتر من الاكسس الى الاداة وهذا البراميتر متمثل بـ مسار حفظ الصورة + واسم الصورة + صيغتها مثال: Dim SavedPath As String SavedPath = """" & CurrentProject.Path & "\Capture.png" & """" الاداة تستخدم مكتبات AForge للتحكم بالكاميرات. صورة الاداة: بمجرد ان تضغط زر Open Camera من الاكسس ستعمل الاداة مباشرة قم بترتيب الكاميرا الخاصة بك لاخذ لقطة مناسبة واضغط على الزر Snapshot ثم اضغط على الز save لحفظ الصورة. الاداة اخذت مني وقت 8 ساعات في البرمجة لذلك لا تنسوني ووالدي من صالح دعائكم. تم بحمد الله. SEMO_webCam.rar كلمات مفتاحية: التقاط صورة من الكاميرا، حفظ الصورة من الكاميرا، جلب الصورة من كاميرا الويب، جلب الصورة من الكاميرا وحفظها في قاعدة البيانات، حفظ الصور بقاعدة البيانات، خزن الصورة من الكاميرا كاميرا ويب قاعدة بيانات اكسس، اكسس كاميرا الويب، اكسس كاميرا، جلب الصورة من الكاميرا
  14. بالفعل، لكن يمكن تطويع الhtml لخدمة الأكسس. انا لم اتكلم عن قوة الأكسس كـ برنامج خدمي وسهل وو.. تكلمت فقط عن امكانياته المحدودة في التصميم مقارنة بالبرامج الاخرى، ومثل ما تفضلت يبقى المصمم هو فارس الميدان في جعل الشكل جذاب ومرتب. وكـ مبادرة صغيرة مني في دعم موضوعك الرائع اقدم لكم واجهة بسيطة قمت بتصميمها في الاكسس واهم مايميزها responsive مع جميع الشاشات، اتمنى لكم الفائدة من هذه الواجهة وبنفس الوقت لا تتوقعو مني الكثير في تصميم الواجهات فأنا لا ازال في بداية الطريق اهلا عزيزي ابا جودي، لك وحشة ياغالي.. بالعكس انا لم اقل الاكسس عاجز وانما قلت ان الاكسس محدود اما عن الresponsive فأنا قمت بشرحها سابقا في هذا الموضوع، ربما طريقتك تختلف عن طريقتي لكن يبقى الجوهر واحد تحياتي لك ابا جودي menu.rar
  15. ماشاء الله شغل جميل.. لكنه يفتقر لكثير من الأمور.. ابرزها لا يدعم خاصية responsive لو كانت شاشتي كبيرة او صغيرة تصاميمكم تكون في اطار محدود جدا، مثلا لو طلبت منك تصميم هذا الdashboard لا اضن ان الاكسس لديه هذه الامكانية، لذلك: عن نفسي افضل html والwebbrowser في تصميم الواجهات وهناك دروس كثيرة للأخ أبو ابراهيم الغامدي يشرح هكذا انواع من التصميم
  16. ان شاء الله، ترقب النسخة الثانية.
  17. السبب: لديك TextBox مكتوب فيه قيمة معينة مثلا.. Forms!frm_home!Age يجب تفريغ جميع مربعات النص، وادراج القيم برمجياً
  18. اهلاً عزيزي.. انا لم اقل انه بأمكانك الحاق البيانات بجدول ثاني.. كنت اتكلم عن ادراج البيانات لكل جدول على حدة على شكل Sub لتقوم بإستدعاءه
  19. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته.. اقدم لكم اداة من برمجتي المتواضعة لتحويل اكواد الـ SQL الى VBA قبل كل شي، الاداة حصراً للمبرمجين الذين يستخدمون الكود في الادراج والتعديل والحذف وليس للأشخاص الذين يستخدمون الواجهة الرسومية للأكسس الخالية من الكود ماهي فائدة الأداة ولماذا استخدمها؟ حسناً، لو كان لدينا جدول اسمة tbl_movementes يقوم بتسجيل جميع الحركات التي تحدث ( اضافة , تعديل , حذف ) وهذا الجدول احتاجه في كثير من النماذج، فهل من المعقول ان اقوم بكتابة عبارة INSERT INTO في كل نموذج ؟ اكيد لا، سأقوم بكتابة Sub واقوم بإستدعاءه كل مرة اريد ان اضيف بها بيانات الى الجدول واختصاراً للوقت الطويل والأخطاء التي ربما ستحدث اثناء عملية التحويل، قمت بكتابة اداة تقوم بهذا الغرض الاداة وضيفتها فقط ( Insert , Update ) صورة الاداة: لنطبق على عملية اضافة بيانات جديد: 1- قم بفتح 2- ثم قم بأختيار الجدول الذي تريده، وقم بإدراج جميع الحقول، كما في الصورة 3- من النافذة العليا اختر النافذة تصميم وقم بتعديل نوع الاستعلام الى استعلام إلحاق وثم بإختيار نفس الجدول لكي يقوم بألحاق البيانات به. الآن لنرى النتيجة 3- الان قم بعرض اكواد الـ SQL 4- قم بنسخ جميع الاكواد كما في الصورة الاتية 5- الان قم بفتح الاداة، واختر النوع Insert، ثم الصق اكواد الـ SQL في مربع النص SQL 6- قبل عملية التحويل قم بإلغاء الأعمدة التي لا ترغب بها من القائمة على اليمين ( Column Remove ) مثلا سأقوم بألغاء العمود IsDeleted وذلك بالضغط على اسم العمود رسالة تخبرك بتأكيد عملية حذف العمود 7- اضغط على الزر Convert 8- تم تحويل الكود ونسخه، الان قم بلصقه في الأكسس واستخدمه الاستخدام النتيجة، تم ادراج البيانات بالجدول لنطبق على عملية تعديل البيانات: نفس الخطوات القديمة فقط من الاداة اختر نوع الاستعلام Update من المعروف ان عملية تعديل البيانات تتطلب معيار للتعديل WHERE COLUMN NAME = Number لذلك عندما نقوم بإنشاء الاستعلام نقوم بوضع عمود المعيار اخر عمود في الاستعلام هكذا من لديه ملاحظات أو اضافات تعطى للبرمج حصراً أحرم تعديل البرنامج بأحد ادوات الهندسة العكسية او نسبه لأي شخص تمت البرمجة حصرياً لمنتدى أوفسينا، اهداء الى معلمي العزيز @jjafferr تحياتي للجميع. SQL-VBA.rar
  20. سؤال هل هناك خلل! ارى الرقم 52 باللون الأصفر والذي يقابله الرقم 40 باللون الأصفر، لماذا؟!
  21. عليكم السلام، قم بوضع sub form في الجزء المسمى ( تفصيل ) من التقرير وهذا الـ sub form يكون هو مصدر عرض البيانات اما طول التقرير فأجعله A4 او حجم معين ثابت واخيرا ضع مربع صورة في الجزء تفصيل في التقرير الأصلي وليس sub form ولا تنسى جعل الحقول في الـ sub form شفافة حتى لا تقوم بقص الصورة الخلفية
  22. السلام عليكم.. في جميع لغات البرمجة التي لا تكون لغات ناتف فلا فائدة من استخدامها للتشفير لو تنادي بها قاعدة بياناتك. بدل الـ #C استخدم Delphi وقم بضغط الملف الناتج بحماية وليكن مثلا SafeEngine ومستحيل تنكسر بسهولة تتطلب شخص لديه خبرة في الكراكرز لا تقل عن 10 سنوات ووقت طويل
  23. قمت بعمل تطبيق صغير لكي يقوم بعمل هووك ( فلترة ) لزر الويندوز عندما تقوم بتشغيل التطبيق سيتعطل الزر، وعند اطفاءه سيرجع الزر لعمله. HookWindowsKey.rar
×
×
  • اضف...

Important Information