كل الانشطه
- Today
-
اتفضل اليك جزء من الاجزاء اذا لا تريد بخلفية شفاف فقط في موديول قم بازالة هذه العلامة (') بداية هذا السطر ' Call FillRect(hDC, uRect, GetStockObject(WHITE_BRUSH)) وتم هذا الجزء ايضا مع کود بارکود Code39 QRCreate.mdb -
السلام عليكم لا ادري اذا هذا الموضوع سيساعد في شيء !! -
يمكنك انزال المرفق من هذا الرابط والذي يعطيك فكرة عن طريقة العمل: https://post.bytes.com/forum/topic/access/841659-work-on-access-icon?p=5288312#post5288312 Extract Bitmaps.zip
-
وعليكم السلام شڤان لم نسمع منك منذ فترة طويلة ، فأهلا وسهلا بك بيننا مرة اخرى 🙂 المطلوب عمل QR و Code128 بواسطة الاكسس فقط وبدون الاستعانة ببرنامج خارجي.
-
السلام عليكم ورحمة الله وبركاته مرحبا بكم جميعا لا اعرف هل انا فهمت في الموضوع بشكل سليم او لا هل المطلوب هو عمل QR بالوان حسب طلب ای ملونة و في نفس الوقت شفافة بواسطة اكسس بدون اي برامج خارجي ؟
-
الصورة تتكلم 😊👌 ولكن عندي سؤال .. ما الداعي لهذه الخطوة ؟؟ أليس من الأفضل أن تكون تلقائية ؟!
-
هههههه لا تُحبط أخي منتصر .. على العكس الهواية أجمل صدقني 😜 وفي فكرتك التي تقدمت بها كحل ، وقد أعجبني فعلاً .إلا أنني أذهب إلى الطريق المباشر دائماً وبأقل الموارد إن استطعت ودون الإعتماد على مكتبات الويندوز ؛ ذهبت لإستغلال WScript.Shell مباشرة من الويندوز .. لذا جرب في زر جديد ودون الحاجة لأي مديولات أو مساعدات الحدث التالي :- Private Sub cmd_ApplyChanges_Click() Dim objShell As Object Dim regKey As String Dim currentValue As Variant regKey = "HKCU\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\msaccess.exe" Set objShell = CreateObject("WScript.Shell") On Error Resume Next currentValue = objShell.RegRead(regKey) On Error GoTo 0 If IsEmpty(currentValue) Or currentValue <> 11001 Then objShell.RegWrite regKey, 11001, "REG_DWORD" MsgBox "تم ترقية محرك متصفح الأكسيس إلى IE11 بنجاح" & vbCrLf & "يرجى إعادة تشغيل النموذج لتطبيق التغييرات", vbInformation + vbMsgBoxRight + vbMsgBoxRtlReading, "اكتمل التحديث" Else MsgBox "جهازك محدث بالفعل ومحرك المتصفح يعمل بأعلى كفاءة (IE11) . لا حاجة لأي تعديل", vbInformation + vbMsgBoxRight + vbMsgBoxRtlReading, "الوضع سليم" End If End Sub ولتجربة حذف التعديلات من الريجستري :- Private Sub cmd_RemoveHack_Click() Dim objShell As Object Set objShell = CreateObject("WScript.Shell") On Error Resume Next objShell.RegDelete "HKCU\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\msaccess.exe" On Error GoTo 0 MsgBox "تم إلغاء التعديل وعاد المتصفح لوضعه الافتراضي", vbInformation + vbMsgBoxRight, "نجاح" End Sub -
معقول ؟؟؟ الله يسامحك أحبطتني 😅 عموما بالإضافة إلى الحل المقدم من الأخ فادي قمت بإضافة مرفق للتعديل في الريجستري لتحديث رقم إصدار المتصفح الخاص بأكسس ليناسب العمل مع الأداة ويعمل كما في الصورة المتحركة التالية إن شاء الله الآن يعمل معك أخي @Moosak بدون مشاكل
-
تم إضافة مرفق جديد لإصلاح مشكلة توافق المتصفح يستخدم كما في الصورة -
ولوو .. العفو أخي منتصر ، هذا قليل مما عندكم صدقني .. وللعلم دراستي ليست البرمجة إطلاقاً وبعيدة كل البعد عنها .. ولكن هي ثمرة محبتي لهوايتي 😉
-
بالفعل نجحت الفكرة وهذا دليل أنها تعمل في اكسس 2010 قمت بتحديث الملف بعد التعديل أرجو من الأخ @Moosak تنزيل الملف الجديد وتجربته وإفادتنا إذا إشتغل أم لا ألف شكر أستاذ فادي (ياخي تخلي الواحد يتمنى لو درس برمجة )
-
لقد كُشِف أمرنا يا عزيزي لا اعلم السبب ، ولكن بعد إضافة السطر يعمل معي بنجاح على الإصدارين 2010 , 2019
-
حقا كنت أتسائل كيف استطعت تشغيل صفحة تشغل الجافا سكريبت على متصفح الأكسس القديم مع علمي أنه لا يدعم الجافا ولا ال css .. والآن إنكشف السر 😅 ولكن مع حالة ملف العزيز @منتصر الانسي الغريب أنني أستخدم النسخة 365 ومع ذلك لا تعمل معي .. !! 🤷♀️
-
طيب حتى لا تتوه مني الأفكار ، وأن لا نذهب الى توسع في التعديل . جرب ما يلي أخي منتصر :- في صفحتي الـ HTML في مشروعك ، قم بإضافة السطر التالي فقط لتحديث محرك المتصفح في آكسيس :- <meta http-equiv="X-UA-Compatible" content="IE=edge"> تحت السطر :- <meta charset="UTF-8"> ليصبحا :- <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible" content="IE=edge"> فالسطر وظيفته ببساطة أنه عندما تضعه في أعلى الصفحة ( داخل الـ <head> ) ، فأنت تعطي أمراً صريحاً للمتصفح المدمج في أكسيس تقول له : "توقف عن استخدام محرك IE7 القديم ، واستخدم المحرك إنترنت إكسبلورر المتوفر على نظام ويندوز هذا" 😅 وهذه كانت إحدى محاولاتي بتضمين عنصر Web من الإصدارات الحديثة داخل إصدارات أوفيس 2010 - 2019 .. ولكن الموضوع خرج من يدي لأنه به تشعب وتعقيد كبير ، وأضاع مني وقتاً كبيراً في المحاولات . ناهيك عن إتلافي نسخة الأوفيس في جهازي أكثر من مرة 😂 .
-
عندي ملف أو برنامج إكسيل عبارة عن بيانات لطلاب المدرسة وفيه صيغ وأكواد ودوال و forms وغيره . عاوز أحول كل ده لقاعدة بيانات أكسيس فيها جداول ونماذج وتقارير . أبدأ منين وإزاي ؟ ممكن حد يساعدني خصوصا في عمل النماذج ؟ وأنا رفعت الملف هنا وممكن تشوفوا الجداول وتحذفوا وتضيفوا المطلوب . وأشكر كل الزملاء والقائمين على القسم . برنامج إدارة المدرسة 1.1.accdb
-
لا عليك أخي منتصر .. على العكس ، التجارب التي تقوم بها والنتائج التي مررنا بها ، ستكون ذات فائدة كبيرة لهذا التوجه الذي توجهت له باستعمال متصفح الويب .. من باب تجربتي الشخصية في المختبر ، أيضاً انا اعتمدت على الجافا سكريبت والكلاسات في لغة HTML لبناء التفاعلات والتأثيرات الحركية . لكني جعلت الآكسيس يقوم ببناء الصفحة نفسها وتضمين جميع الأكواد السكريبت ... إلخ داخل الـ VBA نفسه . وبالتالي تحكمت في الأمور إلى حد لمنع هذه الأخطاء التي كنت أثق بأنها ستنتج مع اختلاف إصدارات آكسيس .. وإن كان لي مداخلة - لاحقاً - بمحاولة بسيطة ، فهذا يسعدني
-
أعتذر منكم ياشباب لم أكن أعرف أنها لن تعمل على بقية الإصدارات وأعتذر أيضاً أني قلت لكم أني جربتها على أكسس 2010 فقد حصل عندي لبس فالأداة التي جربتها هي أداة أخرى أقوم بإعدادها وهي أيضاً تعتمد على عنصر نحكم المتصفح ولكنها تعمل على الإصدارين 2010 و 365 بدون أي مشاكل وبصراحة هذا الشيء أراحني قليلاً لأن الأداة التي أقوم بتجهيزها تطلبت مني الكثير من العمل لتبسيط العمل بها ولو أن مجرد التفكير في كم التعليمات التي أريد شرحها يشعرني بالإحباط
-
للأسف لأ .. جربت على اصدار 2019 و 2010
-
أوفيس 365 ولكني كنت قد جربته على أوفيس 2010 هل نجح العمل عندك أخي @Foksh ام لا؟
-
ما شاء الله عمل جميل ، وتحديث أجمل أخي منتصر .. اعتقد أن المشكلة هي باختلاف اصدارات الآكسيس ، فما دون 2021 يواجه مشكلة عند عرض صفحات HTML تحتوي أكواد جافا سكريبت ... ما إصدار الأوفيس الذي تم انتاج هذا العمل الجميل عليه ؟؟
-
غريب لم تظهر لي هذه المشكلة أبداً عندي إقتراح أرجو تجربته قم بحذف عنصر تحكم المتصفح الحالي وإنشاء عنصر تحكم جديد كما بالصورة وتسميته بالإسم wbChart ثم إعمل تصحيح Debug للتعليمات البرمجية وجرب هل سينجح أم لا
-
مختبر كيميائي ⭐ هدية ~ مختبر فوكش الكيميائي التفاعلي - 2026 ⭐
Foksh replied to Foksh's topic in قسم الأكسيس Access
الشكر لله وحده أخي عوض .. ولكم من الدعاء أجر بارك الله به -
رجاء مطلوب ملف بوربوينت لتعليم الحاسوب للمبتدئين والويندوز لو سمحتوا
-
شكرا لك أخي منتصر على إثرائك للمكتبة العربية 🙂 سلمت يمناك وكثرت مغانمك ورزقك الله ومن تحب العافية .. يبدوا أن هناك مشكلة ما تظهر عند محاولة فتح صفحات ال HTML .. وهذا يحصل عند كل الصفحات .. ولا يتم استعراض المخططات إلا عند الضغط على زر [ معاينة وطباعة المخطط ] فقط .. !!
