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

ابو جودي

أوفيسنا
  • Posts

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

  • Days Won

    202

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

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

Important Information