اذهب الي المحتوي
أوفيسنا

ابو جودي

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    7250

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

  • Days Won

    214

 نوع المحتوي 

كل منشورات العضو ابو جودي

  1. ابو جودي
    جزاكم الله خيرا هل جربت هذا المرفق استاذى الجليل وهل عمل معكم اعتذر كثيرا لاثقالى عليكم بالامس ولكن بفضل الله ثم انتم اكتشفت المشاكل التى كانت تمنع تسجيل المكتبات ----------------------------- يا استاذ @moamen salem هل جربت تستعرض اى صورة Qr وتعرف البينات اللى فيها من قاعدة البيانات تعمل سكان لصورة
  2. ابو جودي
    طيب تقدر تشغله كمسئول على الاقل
  3. ابو جودي
    المفروض الان ان شاء الله لن يواجه احد اى عواقب طالما تم تنفيذ الشرح جيدا كنت اتمنى طريقة تنفذ نسخ المراجع الثلاث وهى كالتالي zxing.dll zxing.interop.dll zxing.interop.tlb وتنفذ الاوامر اللى فى register.cmd برمجيا لانه ان لم يتم الضغط عليه بالفأرة كليك يمينكليك يمين على الملف اللى باسم register.cmd و تشغيله كمسئول run as administrator لن يتم تسجيل المكتبات وكذلك ان كانت ملفات المراجع وملف التسجيل فى مسار يحتوى على مسافات كما شرحت او لم يكونوا فى مجلد واحد لن يتم تسجيل المكتبات لكن لم اوفق لذلك حملت الملفات الخاصة فى القاعدة ولكن عجزت عن تنفيذ افكارى
  4. ابو جودي
    حضرتك استخدمت المرفق هذا ياللى بالموضوع ام القديم ياللى طلبتك منك تجربته فى الرسالة طبعا من الصورة المرفق القديم ارجوك نزل المرفق اللى فى المشاركة واتبع نفس الخطوات فى الشرح جيدا لاحظ التعديل كما فى المرفق الجديد الاربع ملفات فى مسار واحد zxing.dll zxing.interop.dll zxing.interop.tlb register.cmd الحمد لله انها اشتغلت وجزانا الله واياكم خير الجزاء بخصوص موضوع اختلاف الويندوز اعتقد لا لان انا شغال بـ ويندوز 11 64 بيت اما بخصوص نوات الاوفيس 32 , 64 بيت اعتقد ايضا لن تشكل اى عائق والله اعلم لانى لم استخدم اى دوال API نتمنى من اخواننا من يستخدمون اكسس 64 بيت يخبرزنا النتيجة
  5. ابو جودي
    السلام عليكم ورحمة الله تعالى وبركاته تم تعديل المرفق وتغيير الاكواد حاولت جعل الية العمل اكثر سلاسة من التعقيدات التى كانت بالشرح والمرفق القديم المميزات - انشاء رمز Qr وحفظ صورته في المسار القاعدة - إمكانية قراءة البيانات من أي صورة تحتوى على QR CODE للبيانات التي تريدها ملاحظة هامة .. لابد من وجود Framework الاصدار 4 وأخيرا المرفق..... في انتظار آرائكم بعد التجربة Generate Or Read QR Code Image V.02.zip
  6. ابو جودي
    طيب من واقع مثال حضرتك للتضح لك الرؤية اكثر لو الحقل type فى الجدول نوع البيانات فيه نص يكون الكود DCount("*", "typeDa2wa", "[type]='" & Me![type] & "'") لو نوع الحقل رقم يكون الكود DCount("*", "typeDa2wa", ","[type]=" & Me![type]) لو نوع الحقل تاريخ يكون DCount("*", "typeDa2wa","[type] =#" & [type] & "#")
  7. ابو جودي
    بص دى بترجع لنوع البيانات نستخدم ذلك مع الارقام' stLinkCriteria = "[PersonalNumber]=" & Me.PersonalNumber نستخدم ذلك مع النصوص' stLinkCriteria = "[PersonalName] ='" & [txtLastName] & "'" نستخدم ذلك مع التواريخ' stLinkCriteria ="[DateOfBirth] =#" & [txtDateOfBirth] & "#"
  8. ابو جودي
    الشكر لله سبحانه وتعالى
  9. ابو جودي
    استاذى الجليل و معلمى القدير و والدى الحبيب الاستاذ @ابوخليل يا لهنائي وسعادتي لمروركم الطيب ورؤيتكم فلقد اشتاقت نفسي اليكم كثيرا استأدى انا بالفل جربت تلك الطريقة ولكن لا يتم نقل الملفات وبصراحة كنت اطمع في كود برمجي يتمم العملية في صمت دون ان يدرى المستخدم بأي شيء خطرت على بالى فكرة ولكن لا ادرى هل ممكنه ام لا هل يمكن وضع المرفقات فى ملف Zip بجوار القاعدة ويتم فك الملف برمجيا فى المسار C:\Windows\System32 فى صمت دون ان يدرى المستخدم بأى شئ ؟ حتى اننى استخدمت الكود بتلك الطريقة لأجبره على نسخ الملفات ولكن دون جدوى @ECHO OFF xCOPY /Y /W "D:\MyDll\zxing.interop.dll" "C:\Windows\System32\zxing.interop.dll" echo Copy Completed
  10. ابو جودي
    للعلم جربت من خلال الاكواد الى اعرفها ولكن يبدو لانه مجلد نظام لم يقبل فهل من طريقة او الية لعمل Copy File By Force
  11. ابو جودي
    السلام عليكم ورحمة الله تعالى وبركاته أساتذتي الكرام ... تحية طيبة عطرة اريد نسخ ملف dll من مسار محدد الى المسار C:\Windows\System32
  12. ابو جودي
    اتفضل غير الكود بتاعك بالكود ده If Nz(DCount("*", "typeDa2wa", "[type]='" & Me![type] & "'"), 0) = 1 Then MsgBox "بيانات مكررة" Exit Sub Else Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("typeDa2wa") rs.AddNew rs![type] = Me.type rs.Update Me.type = "" End If
  13. ابو جودي
    طيب رجاء ممكن توضح المشكلة اللى صارت معك باستخدام المرفقات فى الموضوع الاصل كما تفضل استاذى الجليل وطلب منكم فى رده عليكم
  14. ابو جودي
    جزاكم الله خيرا استاذى الجليل ومعلمى القدير و والدى الحبيب
  15. ابو جودي
    بسم الله ماشاء الله الله اكبـر عمل احترافى بمعنى الكلمة ... قمة فى الابداع اتمنى لكم التوفيق والنجاح والرقى دائما ..
  16. ابو جودي
    فعلا ماشاء الله الله اكبــــــــر قمة فى الابداع والاحتراف
  17. ابو جودي
    طيب هات مرفقكم وحدد الحقول الجدول والحقول التى تريد انشاء الـ Qr لها وان شاء الله ابشر بالخـر
  18. ابو جودي
    شوف الموضوع ده ان شاء الله هنا تلاقى الـ Qr شغال تمام وع العموم جرب المرفق ده فى المرفق ده بس انا خليته يضع الملفات تلقائيا والمستخدمة فى التطبيق فى مسار القاعدة بطريقة الية TESTCH.zip لو اشتغل مع سيادتك تمام تقدر تفهم منه الافكار واستخدمها كما يحلوا لك لو اشتغل مع حضرتك تمام وما قدرت تنفذ على قاعدة البيانات الخاصة بكم هات مرفق من قاعدتك وان شاء الله تعالى اقوم بالتعديل عليها فى اقرب وقت متاح بامر الله
  19. ابو جودي
    ان شاء الله هذه التدوينة سوف تكون متجددة باستمرار أو على الأقل لتكون بمثابة هامش صغير ليحتوي على شخابيط وأفكار وتلميحات هامة ومتعددة ليسهل الوصول اليها سوف أحاول جاهدا جمع أفكاري والأكواد الهامة بصفة مستمرة ليسهل لي و لأحبائي الرجوع اليها مستقبلا
  20. ابو جودي
    الحاق القيم الى المعاير من العناصر فى النماذج حسب النوع المراد استخدامه مع DCount , DLookup DCount("*", "table or qury Name", stLinkCriteria) نستخدم ذلك مع الارقام' stLinkCriteria = "[PersonalNumber]=" & Me.PersonalNumber نستخدم ذلك مع النصوص' stLinkCriteria = "[PersonalName] ='" & [txtLastName] & "'" نستخدم ذلك مع التواريخ' stLinkCriteria ="[DateOfBirth] =#" & [txtDateOfBirth] & "#"
  21. ابو جودي
    ممكن توضيح اكثر لطلبكم لاننى لم افهم شئ
  22. ابو جودي
    طيب استاذ @Moosak لك عندة مرفق فى القريب ان شاء الله بفكرة أخرى
  23. ابو جودي
    اتفضل نستخدم ذلك مع الارقام' stLinkCriteria = "[PersonalNumber]=" & Me.PersonalNumber نستخدم ذلك مع النصوص' stLinkCriteria = "[PersonalName] ='" & [txtLastName] & "'" نستخدم ذلك مع التواريخ' stLinkCriteria ="[DateOfBirth] =#" & [txtDateOfBirth] & "#"
  24. ابو جودي
    طيب اتفضل
  25. ابو جودي
    شوف والله انا متأخر فى الموضوع وطرح باقى المرفقات لانى لازلت افكر فى هذا الموضوع خلينا نتفق على شئ من يريد كسر الجماية لو انه حد متمكن راح يفك التشفير ولذلك انا شايف انه لا داعى له انا تفق معك وانا ادرك تمام ان الحماية مهما كانت قوتها فهى مسألة وقت ويتم كسرها وكلى يقين ان الوقت نسبى قد يزيد وقد يقل ولكن لا توجد حماية مطلقة فى النهاية ولذلك والله افكر واعيد التفكير فى موضوع اضافة التشفير من عدمه ولكن انا اميل الى عدم اضافته فهو جهد فقط اثناء بناء القاعدة وعمل التكويد اللازم ويبدو اننى سوف اتنازل عنه فى النهاية خاصة بعد مشاركتكم استاذى لك منى الف مليون تحية
×
×
  • اضف...

Important Information

  I accept