نجوم المشاركات

السلام عليكم 🙂 الاستعلام الذي عملته انت : . بدون ربط بين الجداول ، وهذا معناه ، انك تطلب سجلات عددها : 16x8x11x16x27x24x10x6 = 875,888,640 (شوف صورة سجلات الجداول في الاسفل ، علشان تعرف من وين جئت بهذه الارقام 🙂 ) ، فهل سرعة محرك كمبيوترك CPU ، وكمية الذاكرة المؤقته RAM ، قادرة على عرض هذا الكم الهائل من السجلات 🙂 . خلينا نشوف استعلام علشان نفهم الموضوع : نخلي الجدولين فقط ، والي نعرف ان مجموع عدد السجلات سيكون : 16x8 = 128 . والنتيجة ، وكما يعرضها الاستعلام : . وهذا اللي عملنه انا بإستعمال مرفقك ، وهي الطريقة الافضل لبرنامجك : . ولكن ، هذه طريقة الاكسل في وضع البيانات ، بينما اذا اردنا تعديل الاكسس ، فيكون كالتالي: نعمل الجدول tbl_Salary والذي سيشمل جميع الجداول الثمانية ، وبدون حقلي "المحسوب" ، ومع اضافة حقل اسم "المجموعة" : . والنتيجة : . وعلى اساس هذا الجدول ، نعمل استعلام qry_Salary ، ونضيف الحقلين "مج الاستقطاع" و "الصافي" مع معادلاتهم : . ومقارنة سجلات الجدول السابق مع الاستعلام الجديد : . والآن وبكل بساطة تعمل الاستعلام الذي يقوم بعملية جمع الصافي : . والنتيجة : . جعفر 1197.wameed.accdb.zip

بارك الله فيك اخي الكريم على الرد ولكن قاعدة البيانات فرنسية فقط عربتها لك حتى تفهم علي وشكرا بالنسبة للملاحظة لقد عدلت العنوان وشكرا لك مع فائق الاحترام و التقدير تحياتي

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

السلام عليكم ورحمة الله وبركاته معكم المبرمج : مناد سفيان لمن يرديد حجز طلبات البرامج ماعليه الا ترك رسالة لي و الله ولي التوفيق http://mennad.ml/

السلام عليكم اخي العزيز بعض الاخوة يستعملون برامج للتسجيل من الكمبيوتر او اخذ لقطة من الشاشة كصورة انا استخدمت برنامج الفوتو شوب للشرح وثم الكتابة على الصورة لان فيه الامكانيات الكثيرة امابخصوص سؤلك عن تغيير لون الخط وحجمه لاحظ الصورر من 1-2 من خلال Tools - Options-Editor format وبخصوص كتابة الشرح لاحظ الصور من 5-5 من خلال الامر View-Toolbars-Edit علما يوجد ببرنامج الاكسس الكثير من وسائل المساعده تستطيع التعرف اليها من خلال موقع اوفيسنا او دروس الاكسس في اليوتيوب تحياتي

وعليكم السلام اتفضل اخى الفاضل ان شاء الله يكون ما تريد تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق تجربة_4.rar

السلام عليكم 🙂 حيا الله اخوي رمهان 🙂 اخوي اباجودي ، هنا عملنا شيء مشابه لما تريد ، التصفح كل 10 سجلات : جعفر

احذف الخطأ ان وجد كرر الخطوات بعد ذلك تستطيع التحويل

تمام ياحبيب الجميع عايزك تضبط ارتفاع النموذج حتى يظهر فقط عشر سجلات ... تمام ياباشا ... وبعدها اضغط زر صفحة لاعلى او اسفل من الكيبورد .. هذا راح يعطيني الصفحة الثانية وحسب السجلات الظاهرة .. طيب وانت خبير هنا ازاي نترجمها لكود او ماكرو .. انت بتعرفها وانا حذكرك فقط والذكرى للمؤمنين .. باستخدام sendkeys "{pgdn}" او كود رمهاني التالي تنقل للتالي DoCmd.GoToPage 1, , Me.InsideHeight - Me.FormHeader.Height والتنقل لسابق واجب منزلي ابا جودي هذا وانا جربت على مثال عندي غير مثالك وتقبل تحياتي وان شاء الله انه المطلوب ان احسنت الفهم

وعليكم السلام-لك ما طلبت كميات مقاولين556 .xlsm

أهلا و سهلا بكافّة الإخوة الأعضاء و الزوّآر في موقع أوفيسينا الجميل هذا الموضوع أشرح فيه تجربتي مع حساب بايبال أمريكي فتحته منذ مارس 2016 و يشتغل حتى هذه اللحظة بدون تفعيل وثائق أخرى كالهوية الشخصية أو فاتورة ولأنه كما يعرف الجميع فإن فتح حساب بايبال جزائري أو تونسي أو اي بلد عربي يبقى محدود الصلاحيات أمام حساب بايبال أمريكي أو بلد أخر فسأشرح لكم كيفية فتح حساب أمريكي مفعل 100% بال IP الجزائري و دون الحاجة لإستخدام Proxy أو VPN و يمكن أن يدوم حسابك أشهر كما الحال في حسابي الخاص الذي فتحته منذ أشهر وأعمل به إلى الأن أرسل و أستقبل به أموال دون مشاكل. نمر إلى الطريقة مع متطلبات فتح الحساب : 1- موقع Fakenamegenerator لعمل هوية مزيفة و الذي سنأخذ منه المعلومات التالية ( الإسم – اللقب – العنوان كاملا ) 2- إنشاء email جديد (Gmail,Hotmail,Yahoo…) بإسم أجنبي سنحتاج بالتسجيل به على بايبال فيما بعد 3- تنزيل تطبيق Primo أو TextNow متوفر على Android و iOS يعطيك رقم هاتف أمريكي يرسل ويستقبل مكالمات ورسائل مجانا للولايات المتحدة لتحميل تطبيق Primo إضغط هنا و قم بوضع رقم هاتفك مع كود البلد 213XXXXXXXX+ ثم Send me the app ليصلك رابط تحميل التطبيق أو إبحث عنه في متجر التطبيقات * فتح حساب بايبال جديد أول شيئ نقوم بفتح حساب جديد بالدخول إلى https://www.paypal.com/us/webapps/mpp/home تأكد من التسجيل عبر هذا الرابط وظهور نافذة كما في الصورة أدناه (*1) و عدم الدخول إلى نطاق com. فقط لأنه سيفتح باللغة العربية و يتعرف أوتوماتيكيا على البلد "أي بلد عربي" ثم نختار Sign up for a Personal account نقوم بتعمير البيانات بمعلومات موقع Fakenamegenerator ثم نضغط على Manage communication preferences * نضيف صورة إلى الحساب تختار صورة لشخص حقيقي من Google Images والمحبذ أن يكون الوجه واضحا * نقوم الآن بتأكيد رقم الهاتف الذي أضفناه بعد الضغط على confirm your number سيصلك كود التفعيل على Primo إفتح الرسالة و أكتب الكود الذي تحصلت عليه في الخانة التالية * الأن تفعيل الإيمايل * الأن تضيف visa أو mastercard إلى حساب البايبال. لدينا 3 خيارات : - إما لديك بطاقة Mastercard Payoneer لم تقم بربطها من قبل في حساب بايبال و فيها رصيد 2$ لربطها بالبايبال - أو تفتح حساب Payoneer و تتحصل على بطاقة Mastercard مجانية وحساب بنكي أمريكي مجاني من هذا الرابط - أو تضيف Visa أو Mastercard وهمية (لن تصلح في شيئ إلا لتفعيل البايبال أي لن تستطيع شحنها أو إستخراج أموال منها و إحتمال إكتشافها من البايبال و تجميد الحساب) من هذا الرابط :www.elfqrin.com أدخل Pattern BIN : 405544xxxxxxx543 كل مرة تضغط على Generate يعطيك 3 Visa لتجربة ربطها في حسابك *إضافة بطاقة إضغط على Link a Card لإضافة معلومات البطاقة تم قبول معلومات البطاقة من أول محاولة إذا تم رفض معلومات البطاقة أعد المحاولة ببطاقة أخرى حتى يتم قبولها. *إضافة البنك إما لديك حساب بنكي في Payoneer غير مسجل من قبل في Paypal أو تفتح حساب Payoneer و تتحصل على بطاقة Mastercard مجانية وحساب بنكي أمريكي مجاني من هذا الرابط تفتح معلومات حسابك البنكي في Payoneer نضغط على Link a Bank في البايبال ثم ستظهر لك لائحة بأسماء البنوك إختر : I have a different bank نضيف معلومات البنك ثم Agree and Link في أقل من 48 ساعة سيصلك مبلغين صغيرين في Payoneer كما في الصورة : تفتح البايبال ثم تضغط على Confirm your bank ستظهر لك هذه النافذة بعد الضغط على Submit تكون قد أتممت ربط بنك بايونير بالبايبال بهذا تكون أتممت جميع مراحل التفعيل في بايبال ملاحظات : *لاتنسى الدخول إلى البايبال دائما من هذا الرابط Send Money, Pay Online or Set Up a Merchant Account - PayPal قم بحفظه في الBookmarks/Favoris في متصفحك *إذا تم تجميد الحساب بسبب ربط الفيزا الوهمية أعد نفس العملية مع إضافة بطاقة رسمية تمتلكها من أحد البنوك على الإنترنات فذلك أضمن. ملاحظة : منقول و عدم استعماله ضد المسلمين وشكرا.........................

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

مشكور أخي أ / محمد صالح على ملاحظاتك حتى أتمكن من ترجمتها كليا و لك مني ألف تحية

بسم الله الرحمان الرحيم اليوم وحاليا بمن يرديد عمل موقع و بكافة حقوقه و يكون لديه دومين خاص به أي ليس ملك للموقع و الدروس كاالآتي : كيفية تثبيت ويندوز سرفر 2016 Active directory server DHCP Serveur Web, Serveur DNS On va configurer le tous pour obtenir un réseau d’entreprise qu’on appelle INTRANET Le DHCP Installation du DHCP Configuration du serveur DHCP Configuration de l’étendue DHCP Administration de l’étendue DHCP • Tester le serveur DHCP و أيضا هناك المزيد و المزيد للتعلم حول كيفية عمل سرفر ويب و انشاء الله سنتغلم كيفية عمل قالب و رفعه على السرفر

بسم الله الرحمان الرحيم و الصلاة و السلام على أشرف المرسلين أما بعد: سوف نقوم اليوم إن شاء الله بشرح أداة WebBrowser وأهم ما يتعلق بها من أوامر و أحداث و خصائص و إدخال و إخراج. و سوف يتم تقسيم هذا العمل إلى مجموعة حلقات نبدأ من الصفر حتى آخر نقطة نستطيع الوصول إليها إن شاء الله مع وضع مثال تطبيقي لكل حلقة. مقدمة: WebBrowser هي أداة تعمل عمل أي متصفح و هي مقترنة المتصفح الشهير Internet Explorer فهي تساعدك في تصفح المواقع من ناحية و التحكم في أكواد HTML وكل ما يرتبط بها من إدخال و استخراج بيانات من ناحية أخرى. ملاحظة: لتشغيل هذه الأداة بشكل جيد يجب تحديث المتصفح الشهير Internet Explorer إلى الإصدار 10 أو 11. مع العلم أن ونداوز 10 به الإصدار 11 الحلقة الأولى: أكواد التصفح سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من التصفح و التنقل داخل الأداة. 1- كود فتح صفحة موقع: WebBrowser3 هو اسم الأداة داخل النموذج Me.WebBrowser3.Navigate ("رابط الصفحة كامل") 2- كود فتح صفحة فارغة: Me.WebBrowser3.Navigate ("about:blank") 3- كود الرجوع للصفحة السابقة: Me.WebBrowser3.GoBack 4- كود الإنتقال للصفحة التالية: Me.WebBrowser3.GoForward 5- كود إعادة تحميل الصفحة: Me.WebBrowser3.Refresh 6- كود إيقاف تحميل الصفحة: Me.WebBrowser3.Stop 7- كود إستخراج رابط الصفحة الحالية: MsgBox Me.WebBrowser3.Document.url و هذا مثال لما تم ذكره في هذه الحلقة webbroser.rar

بسم الله الرحمان الرحيم اليوم لتحميل برنامج الدالفي على الموقع التالي أخوكم في الله المبرمج : مناد سفيان الجزائر.https://www.embarcadero.com/products/delphi

معكم أخوكم في الله المبرمج : مناد سفيان الجزائر السلام عليكم ورحمة الله وبركاته ....... نقدم لكم ..... Wipe أصدار البرنامج : Wipe 2017.21 تاريخ الاصدار : ابريل 2018 .......................................... يعتبر برنامج Wipe من البرامج القوية التى تعمل على ازالة الكثير من الملفات الغير مرغوب فيها والبرامج الضارة من على جهاز الكمبيوتر الخاص بك واستعادة الكثير من مساحة القرص الصلب مما يزيد من سرعة الجهاز وسرعة تصفح الانترنت، يعمل البرنامج على حماية خصوصيتك على الإنترنت حيث يقوم بازالة سجلات التصفح مثل التاريخ و ذاكرة التخزين المؤقت و ملفات الكوكيز الإنترنت و وملفات الإنترنت المؤقتة، يقوم البرنامج بمحو جميع بيانات التصفح بغض النظر عن نوع المتصفح سواء كان إنترنت إكسبلورر او فايرفوكس او جوجل كروم او أوبرا وغيرها، لمنع استعادة البيانات المحذوفة يستخدم البرنامج اساليب امان قوية مثل طريقة غوتمان و غوست الروسية وغيرها، يمكنك محو جميع مواقع التصفح مرة واحدة او محو بعض المواقع المعينة التى تريد حذفها، يمكنك ازالة جميع ملفات سلة المهملات مما يزيد من مساحة التخزين. البرنامج سهل الاستخدام وبسيط ويناسب المحترفين والمبتدئن، يعتبر برنامج Wipe الحل القوى والسريع لحذف ملفات التجسس والتعقب، بمجرد تثبيت البرنامج بقوم بفحص جميع ملفات الكمبيوتر بشكل تلقائى للتخلص من برامج التجسس والملفات الخبيثة والضارة، يمكنك حذف الملفات الواردة للبريد الالكترونى بسهولة لزيادة الامان للبريد الالكترونى وتسريع اداء جهاز الكمبيوتر وتم تحديثة مؤخرا لدعم متصفح Yandex 16 ومتصفح اوبرا 48 الاخير ودعم العمل على متصفح جوجل كرم 61وفايرفوكس 55 الاخير وإصلاح الخطأ FromFile الذى يظهر احيانا لبعض اجهزة الكمبيوتر عند بدء تشغيل الجهاز. متطلبات النظام : ويندوز 10 ، ويندوز 8 ، ويندوز 7 ، ويندوز 7 32 بت ، ويندوز 7 64 بت ، ويندوز فيستا 32 بت ، ويندوز فيستا 64- bit، Windows XP SP3 التحميل : https://privacyroot.com/software/www/en/wipe-download.php

طيب معلش راجع المرفق مرة تانية يعني المرفق اللي حضرتك رفعته علي الموقع حمله من الموقع وافتحه وشوف مش هتخسر حاجة

ماشاء الله حل رائع و من الاخر

تفضل لك ما طلبت حساب القيمة الاستهلاكية.xlsm

‏السبت‏، 04‏ شعبان‏، 1441 السلام عليكم و رحمة الله وبركاته بعد اذن اخي الكريم : احمد يوسف لا مانع من المحاولة اخي الماتادور جرب إضافة هذا السطر اول الكود الذي تعمل عليه مع وضع اسم الصفحة او الورقة بين علامات التنصيص "" If ActiveSheet.Name <> "" Then Exit Sub

حسنا استاذ جعفر

المصنف1.xlsx لوكانت الصور منفصلة عن بعضها اي في كل صفحة صورة واحدة يمكن ان يتم العمل بسرعة اما نا تجد شحص يقوم بقص 5000 صورة فهذا يستغرق وقتا وجهد

أحسن الله اليك أخي الحبيب @احمد الفلاحجي بارك الله فيك ....

احسنت اخى الحبيب @kanory جزاك الله خيرا

بعد اذنك أخي الحبيب @احمد الفلاحجي أنظر المرفق ولكن انتبه الكود يعمل بالطريقة الصحيحة عند طباعة التقرير .... وافنا بالنتيجة .... ملخص.mdb

شكرا جزيلا استاذ وبارك الله بيك الله يكثر من امثالك الله يحفظ احبابك ويرحم امواتك

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

والله لا أعلم يا أخي وفوق كل ذي علم عليم أول مرة ألتقي بهاذا المشكل كما أنني كنت أريد عمل المجامع مباشرة في نموذج بدون استعمال الاستعلامات بأكواد vba

الحمد لله ان تم الامر على خير بالنسبة لطلبك من الاحسن انشاء textbox لادخال باس الحماية واخر لالغائه وهكذا يمكن جعل الكتابة بدل ارقام او حروف شكل اخر جرب المرفق تعديل كود حماية الصفحات-1 (2).xlsm

السلام عليكم 🙂 هذا الموضوع مخالف وبإمتياز !! 4 اسئلة في موضوع واحد !! يا ريت الجميع يساعدنا ، اصحاب الاسئلة واصحاب الاجابة ، علشان مثل هذا الشيء لا يتكرر ، أَلَا كُلُّكُمْ رَاعٍ، وَكُلُّكُمْ مَسْئُولٌ عَنْ رَعِيَّتِهِ. اخي بلال : رجاء فتح موضوع جديد لآخر طلبك ، ورجاء ان تعطي فيه تفصيل مفصل عن طلبك ، وبمثال من مرفقك ، لأن شرحك للأسف غير كامل وغير واضح ، مما ينتج عنه التأخر في الرد عليه !! يُقفل . جعفر

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

جزاك الله كل خير أخي عبد اللطيف .. تعلمت منك شيئا جديدا ( كيفية اكتشاف مكان الخطأ في الكود ) .. جزاك الله كل خير أخي خالد .. استفسار لا هنت : كيف أستطيع تمييز بعض الأسطر بالألوان في الكود كما في الصورة أعلاه . حبذا لو يكون التوضيح بالصور . وكيف أستطيع إضافة شرح على الصورة كما فعلتم في الصورة أعلاه ؟؟ دمت بود .

وعليكم السلام اخي الفاضل حسين انا خلال الفترة الحالية في مهمة عمل وللاسف لا يتوفر لدي جهاز يدعم تطبيقات ميكروسوفت لكوننا نعمل في بيئة عمل مختلفة اعتذر لك مقدما علما بان التعديلات المطلوب بسيطة جدا ويمكن عملها من قبلك شخصيا لو استخدمت خاصية البحث او قم بارفاق برنامجك وانا واثق ان العديد من الزملاء سوف يساعدونك في اجراء التعديل المطلوب تحياتي لك

بالتوفيق @wael gaper انت زي اللي متعود على سيارات الديزل تسخن قبل ماتمشي ماتيجي للاكسس زي البنزين شغل وامشي على طول وسيبك من الاكواد الطويله العريضه تحياتي

وعليكم السلام-اخى الكريم وبما انك لم تقم برفع ملف موضح عليه المطلوب بكل دقة وذلك لأنه لا يمكن العمل على التخمين ... فلما لا تقوم بإستخدام خاصية البحث بالمنتدى فقد تكرر طلبك كثير وشوف بنفسك : كود تفقيط الارقام من رقم إلى كتابة تفقيط عربي مميز دالة ( تفقيط ) تحويل الرقم الى نص بالعربي - طول الرقم غير محدود

كون لا يوجد كود ليتم تفعيله يمكن ذلك عن طريق التنسيق إضافة كود الدوائر الحمراء وكود التظليل (1).xlsb

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا افتح نموذج frmSearch وان شاء الله يكون ما طلبت بالتوفيق ان شاء الله مسير المرتبات النسخة الاخيرة.accdb

الحلقة السادسة: تابع لدرس التعامل مع الجداول في صفحة ويب في الدرس الماضي قمنا بالتعامل مع جدول له خاصية id و في هذا الجدول سوف نتعلم كيفية التعامل مع الجداول التي ليس لها خاصية id أو name سوف نعتمد في هذا الدرس على خاصية Tagname التطبيق سوف يكون على صفحة ويكيبيديا: https://mawdoo3.com/جميع_دول_العالم_وعواصمها 1- كود حساب عدد الجدول في الصفحة: MsgBox WebBrowser3.Document.getElementsByTagName("table").Length 2- كود حساب عدد الخلايا في الجدول: MsgBox WebBrowser3.Document.getElementsByTagName("table").Item(0).cells.Length 3- كود حساب عدد الصفوف في الجدول: MsgBox WebBrowser3.Document.getElementsByTagName("table").Item(0).rows.Length 4- كود استخراج بيانات خلية في الجدول: MsgBox WebBrowser3.Document.getElementsByTagName("table").Item(0).rows(1).cells(1).innerText 5- كود ارسال بيانات إلى خلية في الجدول: WebBrowser3.Document.getElementsByTagName("table").Item(0).rows(5).cells(0).innerText = "salah" ملاحظة: المقصود بـ item(0) i هو الجدول الأول الأزرار داخل الإطار الأحمر هي الخاصة بأكواد هذا الدرس قبل البدئ إضغط على زر فتح صفحة التجربة لفتح الصفحة أمامك webbroser.rar

الحلقة الخامسة: التعامل مع الجداول في صفحة ويب سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من التحكم في الجداول داخل صفحة ويب و سوف نستخدم مرفق أخي ابو البشر في هذا الدرس و هي عبارة عن صفحة ويب محفوظة خاصية id للجدول اسمها: ctl00_PlaceHolderMain_gvCourseSectionExamsGrades عند فتح المرفق يجب تحديد صفحة الويب المرفقة كمصدر للأداة و ذلك بإتباع الخطوات التالية: 1- كود استخراج عدد الخلايا في الجدول: MsgBox Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").cells.Length 2- كود استخراج عدد الصفوف في الجدول: MsgBox Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows.Length 3- كود استخراج بيانات العمود الأول في الجدول: في هذا الكود نقوم بعرض الأرقام الموجودة في العمود الأول For i = 2 To Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows.Length MsgBox Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows(i - 1).cells(0).innerText Next i 4- كود استخراج بيانات العمود الثاني في الجدول: في هذا الكود نقوم بعرض الأسماء الموجودة في العمود الثاني For i = 2 To Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows.Length MsgBox Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows(i - 1).cells(1).innerText Next i 5- كود ارسال بيانات إلى الجدول: في هذا الكود سوف نرسل بيانات للعمود الرابع الخاص بمادة البحوث و المشروعات For i = 2 To Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows.Length Me.WebBrowser3.Document.getElementById("ctl00_PlaceHolderMain_gvCourseSectionExamsGrades").rows(i - 1).cells(3).innerText = i - 1 Next i و هذا هو المرفق به جميع الدوال. webbroser.rar

الحلقة الرابعة: التعامل مع القائمة المنسدلة في صفحة ويب سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من التحكم الكامل في القائمة المنسدلة داخل الأداة في صفحة ويب لقد قمت بتطبيق هذا الدرس على موقع الفايس بوك لأن به قائمة منسدلة الخاصة بالأشهر و لها خاصية: Id=month لهذه القائمة عمودين عمود مخفي و هو يمثل القيمة الحقيقة به أرقام من 0 إلى 12 و عمود ظاهر به أسماء الأشهر 1- كود حساب عدد عناصر القائمة: MsgBox Me.WebBrowser3.Document.getElementById("month").Length 2- كود معرفة القيمة الحقيقية للعنصر: من المعلوم أن القائمة المنسدلة يمكن أن يكون بها أكثر من عمود يعني ممكن تصبح القيمة الظاهرة تختلف عن القيمة الحقيقية MsgBox Me.WebBrowser3.Document.getElementById("month").Value 3- كود استخراج ترتيب القيمة الظاهرة: استخراج ترتيب القيمة الظاهر ضمن عناصر القائمة المنسدلة MsgBox Me.WebBrowser3.Document.getElementById("month").selectedIndex 4- كود استخراج القيمة الظاهرة: MsgBox Me.WebBrowser3.Document.getElementById("month").Item(Me.WebBrowser3.Document.getElementById("month").selectedIndex).innerText 5- إظهار جميع عناصر القائمة: Dim x As String Dim i As Integer For i = 1 To Me.WebBrowser3.Document.getElementById("month").Length x = x & " - " & Me.WebBrowser3.Document.getElementById("month").Item(i - 1).innerText Next i MsgBox x 6- اختيار عنصر من القائمة باستخدام رقمه الترتيبي: هنا وضعت القيمة تساوي 5 معناه سوف يتم اختيار العنصر رقم 5 و هو مايو Me.WebBrowser3.Document.getElementById("month").selectedIndex = 5 7- تغيير نص قيمة في العمود الظاهر من القائمة: سوف يتم تغيير كتابة أفريل في القائمة إلى أوفيسنا Me.WebBrowser3.Document.getElementById("month").Item(4).innerText = "أوفيسنا" 8-تغيير قيمة في العمود المخفي من القائمة: Me.WebBrowser3.Document.getElementById("month").Item(4).Value = "15" قبل البداية في تطبيق درس اليوم اضغط على زر فتح صفحة الفايس بوك لتظهر الصفحة أمامك webbroser.rar

الحلقة الثالثة: التعامل مع كائنات صفحات HTML و إرسال و إستقبال البيانات سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من التعامل مع كائنات صفحات الويب و إرسال و إستقبال البيانات منها و إليها. هنالك ثلاث كائنات سوف نتعامل معها فيما يخص إرسال و إستقبال البيانات و هي مربع نص و القائمة المنسدلة و الجداول لأن لكل كائن أكواده الخاصة. لكن قبل البدئ يجب التطرق إلى كيفية إستخراج الاسم المميز للعناصر ID أو NAME من أجل التعامل معها من خلال نموذج الأكسس. هناك عناصر لها ID و أخرى لها NAME و هناك لها الخاصيتين معا و هناك عناصر ليس لها NAME أو ID خطوات استخراج ID أو NAME موجود في هذه الصور: 1- كود إرسال قيمة لمربع نص في صفحة ويب: في هذا المثال سوف نستخدم صفحة غوغل و نقوم بإرسال كلمة أوفيسنا إلى من مربع بحث غوغل Me.WebBrowser3.Document.all("q").Value = "أوفيسنا" أو Me.WebBrowser3.Document.all("q").innerText = "أوفيسنا" أو Me.WebBrowser3.Document.Forms(0).q.Value = "أوفيسنا" أو Me.WebBrowser3.Document.getElementById("q").innerText = "أوفيسنا" Document : هي كل محتويات الأداة الموجوة في صفحة الويب من أزرار و مربعات و نصوص ...... 2- كود إستقبال قيمة من مربع نص في صفحة ويب: سوف نقوم باستخراج القيمة المكتوبة في مربع نص البحث لموقع غوغل MsgBox Me.WebBrowser3.Document.all("q").Value أو MsgBox Me.WebBrowser3.Document.all("q").innerText أو MsgBox Me.WebBrowser3.Document.Forms(0).q.Value أو MsgBox Me.WebBrowser3.Document.getElementById("q").innerText 3- كود الضغط على زر أمر: سوف نقوم بإرسال نقرة على زر فتح شاشة الدخول لجمايل Me.WebBrowser3.Document.Forms(0).gb_70.Click أو Me.WebBrowser3.Document.all("gb_70").Click أو Me.WebBrowser3.Document.getElementById("gb_70").InvokeMember ("Click") webbroser.rar ماذا تقصد بتنزيل البيانات ؟ هل استخراج قيم أم تنزيل ملفات

الحلقة الثانية: أكواد الطباعة و الخصائص و... سوف نتطرق في هذه الحلقة إلى الأكواد التي تمكننا من طباعة صفحة الويب و حفظها و عرض خصائص الصفحة و غيرها... 1- كود طباعة الصفحة: Me.WebBrowser3.ExecWB OLECMDID_PRINT, OLECMDEXECOPT_DODEFAULT 2- كود معاينة طباعة الصفحة: Me.WebBrowser3.ExecWB OLECMDID_PRINTPREVIEW, OLECMDEXECOPT_DODEFAULT 3- كود عرض خصائص الصفحة: Me.WebBrowser3.ExecWB OLECMDID_PROPERTIES, OLECMDEXECOPT_DODEFAULT 4- كود حفظ صفحة الويب: Me.WebBrowser3.ExecWB OLECMDID_SAVEAS, OLECMDEXECOPT_DODEFAULT 5- كود تنسيق الصفحة: Me.WebBrowser3.ExecWB OLECMDID_PAGESETUP, OLECMDEXECOPT_DODEFAULT 6- كود عنوان رابط الصفحة: MsgBox Me.WebBrowser3.LocationName 7- كود رابط الصفحة: MsgBox Me.WebBrowser3.LocationURL 8- كود فتح الصفحة الإفتراضية للمتصفح: Me.WebBrowser3.GoHome 9- كود فتح صفحة البحث: Me.WebBrowser3.GoSearch 10- كود فتح صندوق التصفح: هذا الكود يقوم بفتح صندوق لإدخال رابط صفحة ويب جديدة Me.WebBrowser3.ExecWB OLECMDID_OPEN, OLECMDEXECOPT_DODEFAULT 11- كود تخطي رسائل الأخطاء التي تظهر من الأداة عند التصفح: Me.WebBrowser3.Silent = True وهذا المرفق بعد الإضافات الجديدة webbroser.rar

تفضل لك ما طلبت-ولكنى اعتقد ان الإختيار من القائمة افضل واسرع من كتابة اول حرف واظن انك لا تحتاج اى حاجة بعد هذا قائمة-منسدلة-بشرطين-حسب-الحرف-الاول (1).xlsm

تفضل لك ما طلبت قائمة-منسدلة-بشرطين-حسب-الحرف-الاول (1).xlsx

تفضل لك ما طلبت test.xlsx

بارك الله فيك أخي أ / محمد صالح انشاء الله ستكون الدروس متسلسلة و لكن أريد منك جواب ماذا تريدنونه عربي أم فرنسي لأن معظم دروسي فرنسية .... اذا صاح التعبير و لا أجد أي مشكلة في ترجمته و لكم الخيار مع فائق الاحترام و التقدير شكرا لكم.

بسم الله الرحمان الرحيم نحن حاليا نقوم بمهام حماية المواقع العربية من الاختراق و معرفة نوع السرفر المستعمل حاليا لمن يريد تأمين موقعه ماعليه الا ترك رابط الموقع و نحن نقوم بدورنا اعطائه كل التقارير عن موقعه وبالتأكيد التقارير تذهب لللخاص فقط لذا نحن معكم لترقية الموقع و الحفاظ عليه بعنوان حملة أحمي موقعك و شكرا لكم معكم المبرمج : مناد سفيان - الجزائر

شكرا على مرورك الحلو أخي صالح