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

ولا زالت الإبداعات مستمرة .. 🙂 وهذا التصميم الثالث : القوائم المطوية وكالعادة ملف التطبيق 🙂 صفحة رئيسية مطورة - التصميم الثالث.accdb

النموذج الرابع ... شكل جذاب بإطار مميز هذه المرة شكل جديد معتمد على عناصر مصممة بالفوتوشوب ومدمجة مع عناصر الأكسس 🙂 وملف التصميم كما تعودتم 🙂 ‏‏صفحة رئيسية مطورة - التصميم الرابع.accdb

السلام عليكم 🙂 هاي للتصميم الاول والثاني ، عن طريق وحدات نمطية 🙂 بس رجاء الاهتمام بأسماء الزرار ، فهي السر في العمل. بهذه الطريقة ، يمكنك استخدام طريقة الازرار لأي نموذج ، وبأقل عمل برمجي 🙂 تم التعديل للنقر مرة واحدة فقط للإثنين 🙂 شكرا اخوي موسى على هذه الطرق الجميلة 🙂 جعفر صفحة رئيسية مطورة.zip

السلام عليكم ورحمة الله دالة Vlookup تهتم بالاعمدة فقط و لا تهتم بالصفوف ما عليك سوى استبدال رقم العمود بالحسبة المذكورة في مشاركتى السابقة و ذلك في الخلية B12 لتصبح المعادلة هكذا =IFERROR(VLOOKUP($F$1;sheet1!$A$9:$DL$108;(ROW()-12)*10+COLUMN(G7);FALSE);"") ثم سحب المعادلة لليسار وللاسفل دون ان ترفعى يدك عن الماوس كررى ماسبق مع الحسبة الثانية في الست اشهر التالية بدأا من الخلية B19 لتصبح المعادلة هكذا =IFERROR(VLOOKUP($F$1;sheet1!$A$9:$DL$108;(ROW()-13)*10+COLUMN(G7);FALSE);"") و الله الموفق و المستعان

حياك الله أخي الحلبي ... لك ما طلبت 🙂 ولكن تظهر الأزرار الفرعية عند النقر المزدوج وتختفي عند النقر مرة واحدة .. 😅 وهذه صورة توضيحية .. مع إضافة بعض الأمور الجمالية عند مرور الماوس .. وإظهار الصفحات الخاصة بالزر .. وملف التحميل 🙂 صفحة رئيسية مطورة.accdb

السلام عليكم ورحمة الله فى الجزء الخاص بالستة شهور الاولى استخدمى هذه الحسبة بدلا من رقم العمود (ROW()-12)*10+COLUMN(G7) اما الستة شهور الاخيرة فاستخدمى هذه الحسبة وذلك بسبب الصف الفاصل بينهما (ROW()-13)*10+COLUMN(G7) الرجاء عدم التخلى عن اى اقواس

وهذي الواجهة الثانية بناءا على فكرة الأخ @الحلبي ☺️ القوائم الفرعية مع ملف التحميل : صفحة رئيسية مطورة.accdb لا عدمناك عمي جعفر @jjafferr 🙂🌹 وعاد نقل الكود لموديول عام هذي لعبتك 😅

السلام عليكم ورحمة الله وبركاتة في مووضوع سابق طرحته بالمنتدى حذرت من موضوع اخفاء الجداول المرتبطه لما يسببه من مشاكل وأخطاء تحذير من إستخدام كود إخفاء الجداول المرتبطة فأخذت افكرفي ايجاد طريقة لحماية كائنات قاعدة البيانات كافة من وصول المستخدم ومن ضمنها عدم وصول المستخدم لكلمة سر قاعدة البيانات الخلفية والتي تكون مخزنة بالجدول MsysObjects فلم أجد افضل من طريقة وضع كلمة سر لقاعدة البيانات بشرط أن تكون بصيغة accdb أو accde هنا لن يتمكن المستخدم من تفعيل الشفت ببرنامج خارجي ولن يتمكن من الوصول الى الكائنات وهذا كان سبب طرحي لموضوع هل لديك تجربه لكسر كلمة سر قاعدة بيانات ؟ وقد اكد استاذنا @jjafferr صعوبة الحصول على الرقم السري لمثل هذا النوع من قواعد البيانات فقررت وضع كلمة السر لقواعد البيانات !!!!!!! لكن ماهو الحل مع المستخدم ؟ هل سنقوم بتسليمه كلمة السر ليستخدم قاعدة البيانات اذا كأننا لمن نصنع شئ ففكرت بإيجاد وسيط نقوم بتسليمه كلمة السر ويكون هو الوسيط بين المستخدم والبرنامج ( الواجهة ) اذا الوسيط سنضعه جنب البرنامج ونأمره بفتح البرنامج للمستخدم اذا اراد استخدامه بدون أن يفصح له عن كلمة السر بالمرفق يوجد ملفين ملف قاعدة البيانات الاساس Start محمي بكلمة سر والاخر الوسيط الذي سنقوم بمن خلاله فتح البرنامج StartDatabes. بعد تمرير كلمة السر اليه والملفين تم تحويلهما الى صيغة accde بعد تنزيل المرفق اجعل الملفيين في مجلد واحد وشغل الملف StartDatabes ملاحظة من المحتمل ان تظهر لديك رسالة في بدأ التشغيل لا يمكن قراءة مشروع Vba هنا اعتقد يجب أن يكون الوندوز لديك محدث بأخر تحديث ويجب أن تكون حزمة Microsoft .NET Framework محدثة بأخر اصدار حسب لغة الوندوز ونوعه عندك او كما يوجد لدي انا عندي الحزمة Microsoft .NET Framework 4.5.1 windos 10 office10 أخر تحديث ارجو التجربه ونتمنى الاستفاده للجميع Free.rar -------------------------------------- ملاحظات جعفر 14-7-2021 : بعد ان تم حذف الملف الاصل ، اصبح من الصعب على بعض الاعضاء متابعة الموضوع ، لذا ، وبعد إذن الاخ @kaser906 فعملت ملفاته مرة اخرى وارفقتها هنا: 1. الملف Locked.zip ، وهو الملف النهائي والذي سيتم تسليمه للزبون ، وهو الملف الذي يجب ان يجربه الاعضاء ، وفيه ملفين بصيغة accde ، 2. الملف Locked_Open_Source.zip ، يحتوي على ملفات مفتوحة المصدر ، بصيغة accdb ، والتي حولناها الى ملفي رقم 1 علاه ، 3. الملف Open_Source.zip ،يحتوي على نفس ملفي رقم 2 اعلاه بصيغة accdb ، ولكن بدون تجهيزهم لتحويلهم لصيغة accde . Locked.zip Locked_Open_Source.zip Open_Source.zip

السلام عليكم ورحمة الله وبركاته .. أواصل معكم دروس مهارات في برنامج أكسس . ومع فكرة جديدة ومتميزة .. 😉 كيفية عمل رسائل إرشادية متحركة .. متابعة ممتعة أتمناها لكم 🌹 ولتحميل ملف التطبيق من هنا : درس رسائل إرشادية.accdb

وحتى تعم الفائدة الحمد لله توصلت للاتى لكل من يهتم بعمل مثل تلك الباتشات المميزات العمل على كلتا النواتان للويندوز 32 , 64 بت الشغيل حتى لو لم يتم تشغيل الملف كمسؤول يتم اغلاق الملف واعادة فتحه مره اخرى كمسؤول تلقائيا نسخ الملفات حتى لو ارد المبرمج ان ينسخها الى ملفات النظام فى الويندوز تسجيل المكتبات يتم فقط وضع الملف فى مجلد المكتبات وتغيير اسمائها فى الكود تبعا لاسماء المكتبات @echo off CLS :init setlocal DisableDelayedExpansion set cmdInvoke=1 set winSysFolder=System32 set "batchPath=%~0" for %%k in (%0) do set batchName=%%~nk set "vbsGetPrivileges=%temp%\OEgetPriv_%batchName%.vbs" setlocal EnableDelayedExpansion :checkPrivileges NET FILE 1>NUL 2>NUL if '%errorlevel%' == '0' ( goto gotPrivileges ) else ( goto getPrivileges ) :getPrivileges if '%1'=='ELEV' (echo ELEV & shift /1 & goto gotPrivileges) ECHO. ECHO Set UAC = CreateObject^("Shell.Application"^) > "%vbsGetPrivileges%" ECHO args = "ELEV " >> "%vbsGetPrivileges%" ECHO For Each strArg in WScript.Arguments >> "%vbsGetPrivileges%" ECHO args = args ^& strArg ^& " " >> "%vbsGetPrivileges%" ECHO Next >> "%vbsGetPrivileges%" if '%cmdInvoke%'=='1' goto InvokeCmd ECHO UAC.ShellExecute "!batchPath!", args, "", "runas", 1 >> "%vbsGetPrivileges%" goto ExecElevation :InvokeCmd ECHO args = "/c """ + "!batchPath!" + """ " + args >> "%vbsGetPrivileges%" ECHO UAC.ShellExecute "%SystemRoot%\%winSysFolder%\cmd.exe", args, "", "runas", 1 >> "%vbsGetPrivileges%" :ExecElevation "%SystemRoot%\%winSysFolder%\WScript.exe" "%vbsGetPrivileges%" %* exit /B :gotPrivileges setlocal & cd /d %~dp0 if '%1'=='ELEV' (del "%vbsGetPrivileges%" 1>nul 2>nul & shift /1) mode 95,40 color 0C echo ---www.officena.net------------------------------- echo ---Mohammes Essam--------------------------------- set location=%cd% reg Query "HKLM\Hardware\Description\System\CentralProcessor\0" | find /i "x86" > NUL && set OS=32BIT || set OS=64BIT echo MachineSecurityLevel2003.reg echo UserSecurityLevel2003.reg echo F| XCOPY %location%\DBPix20.ocx %SystemRoot%\System32\DBPix20.ocx /h /f /y echo F| XCOPY %location%\barcodex.ocx %SystemRoot%\System32\barcodex.ocx /h /f /y echo regsvr32 %SystemRoot%\System32\DBPix20.ocx echo regsvr32 %SystemRoot%\System32\barcodex.ocx if %OS%==64BIT echo MachineSecurityLevel2003.reg if %OS%==64BIT echo UserSecurityLevel2003.reg if %OS%==64BIT echo F| XCOPY %location%\DBPix20.ocx %SystemRoot%\syswow64\DBPix20.ocx /h /f /y if %OS%==64BIT echo F| XCOPY %location%\barcodex.ocx %SystemRoot%\syswow64\barcodex.ocx /h /f /y if %OS%==64BIT echo regsvr32 %SystemRoot%\syswow64\DBPix20.ocx if %OS%==64BIT echo regsvr32 %SystemRoot%\syswow64\barcodex.ocx pause CLS color 1E echo "----------------------------------------------------------------------------------------"; echo Libraries copied and registered successfully pause @echo on وتسهيلا على إخواني Xcopy Command Syntax Use the following syntax for the xcopy command: xcopy source [destination] [/a] [/b] [/c] [/d [:date]] [/e] [/f] [/g] [/h] [/i] [/j] [/k] [/l] [/m] [/n] [/o] [/p] [/q] [/r] [/s] [/t] [/u] [/v] [/w] [/x] [/y] [/-y] [/z] [/exclude:file1[+file2][+file3]...] [/?] Xcopy Command Options Item Description source This defines the files or top level folder that you want to copy from. The source is the only required parameter. Use quotes around source if it contains spaces. destination This option specifies the location where the source files or folders should be copied to. If no destination is listed, the files or folders will be copied to the same folder you run the xcopy command from. Use quotes around destination if it contains spaces. /a Using this option will only copy archive files found in source. You can not use /a and /m together. /b Use this option to copy the symbolic link itself instead of the link target. This option was first available in Windows Vista. /c This option forces xcopy to continue even if it encounters an error. /d [:date] Use the command with /d option and a specific date, in MM-DD-YYYY format, to copy files changed on or after that date. You can also use this option without specifying a specific date to copy only those files in source that are newer than the same files that already exist in destination. This is helpful when using xcopy to perform regular file backups. /e When used alone or with /s, this option is the same as /s but will also create empty folders in destination that were also empty in source. The /e option can also be used together with the /t option to include empty directories and subdirectories found in source in the directory structure created in destination. /f This option will display the full path and file name of both the source and destination files being copied. /g Using xcopy with this option allows you to copy encrypted files in source to a destination that does not support encryption. This option will not work when copying files from an EFS encrypted drive to a non-EFS encrypted drive. /h The command doesn't copy hidden files or system files by default but will when using this option. /i Use the /i option to force xcopy to assume that destination is a directory. If you don't use this option, and you're copying from source that is a directory or group of files and copying to destination that doesn't exist, the xcopy command will prompt you enter whether destination is a file or directory. /j This option copies files without buffering, a feature useful for very big files. This option was first available in Windows 7. /k Use this option when copying read-only files to retain that file attribute in destination. /l Use this option to show a list of the files and folders to be copied... but no copying is actually done. The /l option is useful if you're building a complicated command with several options and you'd like to see how it would function hypothetically. /m This option is identical to the /a option but xcopy will turn off the archive attribute after copying the file. You can not use /m and /a together. /n This option creates files and folders in destination using short file names. This option is only useful when you're using the command to copy files to a destination that exists on an drive formatted to an older file system like FAT that does not support long file names. /o Retains ownership and Access Control List (ACL) information in the files written in destination. /p When using this option, you'll be prompted before the creation of each file in destination. /q A kind of opposite of the /f option, the /q switch will put xcopy into "quiet" mode, skipping the on-screen display of each file being copied. /r Use this option to overwrite read-only files in destination. If you don't use this option when you want to overwrite a read-only file in destination, you'll be prompted with an "Access denied" message and the command will stop running. /s Use this option to copy directories, subdirectories, and the files contained within them, in addition to the files in the root of source. Empty folders will not be recreated. /t This option forces the xcopy command to create a directory structure in destination but not to copy any of the files. In other words, the folders and subfolders found in source will be created but there we be no files. Empty folders will not be created. /u This option will only copy files in source that are already in destination. /v This option verifies each file as it's written, based on its size, to make sure they're identical. Verification was built in to the command beginning in Windows XP, so this option does nothing in later versions of Windows and is only included for compatibility with older MS-DOS files. /w Use the /w option to present a "Press any key when ready to being copying file(s)" message. The command will begin copying files as instructed after you confirm with a key press. This option is not the same as the /p option which asks for verification before each file copy. /x This option copies file audit settings and System Access Control List (SACL) information. You imply /o when you use the /x option. /y Use this option to stop the command from prompting you about overwriting files from source that already exist in destination. /-y Use this option to force the command to prompt you about overwriting files. This might seem like a strange option to exist since this is the default behavior of xcopy but the /y option may be preset in the COPYCMD environment variable on some computers, making this option necessary. /z This option allows the xcopy command to safely stop copying files when a network connection is lost and then resume copying from where it left off once the connection is reestablished. This option also shows the percentage copied for each file during the copy process. /exclude:file1[+file2][+file3]... This option allows you to specify one or more file names containing a list of search strings you want the command to use to determine files and/or folders to skip when copying. /? Use the help switch with xcopy to show detailed help about the command. Executing xcopy /? is the same as using the help command to execute help xcopy.

ما شاء الله عليك عمي جعفر ... رجل المهمات الصعبة 😊 وأزيد على ما قلت .. أيضا لا تنسوا إخفاء علامات التبويب من قائمة الخصائص .. جعلتها ضاهرة فقط لتسهيل معرفة الصفحة أثناء التصميم .. 🙂 ما شاء الله عليك أنت لها 😉💪🏼 فعلا أنقذتني من ورطة ما كنت عارف أسويها 😅

تم التعديل أخ العزيز 🙂 ولكن للعم .. الحقول المحسوبة لا تعمل إلى عند اكتمال البيانات AMAN (2).accdb

تسلم ايدك على هذه الهدية الجميلة ساقوم بالتجربة وافيك بالنتائج

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

مبدع استاذ @Moosak

حياك الله 🙂

استاذ / @Moosak يعطيك الف عافية ـ الله الله عليك شكرا كثيرا لحضرتك ـ ما رأت عينى اجمل من هذا نور الله طريقك ونفعك بما تعلمت كل الاحترام والتقدير

السلام عليكم 🙂 1. تم عمل الحقل text_1 في الجدول ، 2. في النموذج ، تم تحويل حقل text_1 الى حقل نص عادي ، 3. لما تختار من القائمة Head_1 ، تظهر لك رسالة تطلب منك التأكيد على ملئ بيانات الحقل text_1 ببيانات الحقل Head_1 ، . وهذا هو كود تعبئة البيانات: Private Sub Head_1_AfterUpdate() Dim Msg, Style, Title, Response Msg = "ستقوم بتعبأة الحقل" & vbCrLf & _ " text_1 " & vbCrLf & _ "ببيانات الطالب من الحقل" & vbCrLf & vbCrLf & _ Me.Head_1 & " < " & Me.Head_1.Column(1) Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons. Title = "هل انت متأكد" ' Define title. Response = MsgBox(Msg, Style, Title) If Response = vbYes Then ' User chose Yes. DoCmd.SetWarnings False mySQL = "UPDATE Stu_select SET text_1 = " & [Forms]![تلاميذ محددين]![Head_1] mySQL = mySQL & " WHERE perm3=True" DoCmd.RunSQL mySQL DoCmd.SetWarnings True Me.Requery End If End Sub جعفر 1425.تحديد عناصر قائمة منسدلة وربطها بأخري.accdb.zip

جرب هذا لعله يفيدك تمنياتي بالتوفيق Msgbox.accdb

بالاضافة الي ما تفضل به الاساتذة الكرام قد واجهتني مشكلتك عند التعامل مع السرفر لأول مرة وكانت المشكلة في عدم جلب المفتاح الرئيس لكل جدول فعند تصدير الجداول من الاكسس ببعض البرامج لا يتم تحديد المفاتيح الأساسية لكل جدول لذي تظهر الجداول بالأكسس مجمدة ولا تعمل وكانها غير موجودة أصلا لذي عليك الدخول الي السرفر والتعديل في تصميم الجداول لتحديد المفاتيح الأساسية لكل جدول هذا والله اعلم عودا أحمد @ابو محمد2

رغم كوني لست من الخبراء الذين تستدعيهم ولكن هذه تجربتي في التعامل مع الاسكربت لعلها تفيدك فقط بعد تصميم الاسكربت وتحديد متي اريد تنفيذ الوظيفة الخاصة به ( وفي الغالب بيكون الوقت اما قبل أو بعد شيئ ما) اقوم بوضعها بملف الستأب -- للبرنامج الخاص بي وفي العادة استخدم هذا البرنامج المجاني لعمل الملف التنفيذي لبرامجي والذي يسمي smart install maker وفي الشاشة التالية اضيف كل الاسكربتات التي اريد تشغيلها مع عملية التسطيب واحدد وقت تنفيذ كل اسكربت وزمن تنفيذ هذه الاسكربتات قبل الفك ام بعده تمنياتي بالتوفيق ارجو ان اكون قد افدتك بشئ

السلام عليكم ورخمة الله تم التعديل Sub ImpClass() Dim ws As Worksheet, Sh As Worksheet Dim LR As Long, LS As Long Dim i As Long, p As Long Dim Cls As String, Spld As String, Knd As String Set ws = Sheets("arshef") Set Sh = Sheets("ك.غ") LR = ws.Range("B" & Rows.Count).End(3).Row j = 2 Do While j <= 310 Sh.Range("C" & j + 3).Resize(25).ClearContents Cls = Sh.Range("G" & j).Text Spld = Sh.Range("K" & j).Text Knd = Sh.Range("AF1").Text For i = 5 To LR If ws.Range("Q" & i).Text = Cls Then If ws.Range("P" & i).Text = Spld Then If ws.Range("L" & i).Text = Knd Then p = p + 1 Sh.Range("C" & p + j + 2) = ws.Range("B" & i) End If End If End If Next p = 0 j = j + 28 Loop End Sub

السلام عليكم ----- شكرا للاساتذه الكرام لسؤلهم عنا الاستاذ محمد سلامة ------والاستاذ جعفر وجميع الاساتذه الكرام

السلام عليكم ورحمة الله استخدم الكود التالى Sub ImpClass() Dim ws As Worksheet, Sh As Worksheet Dim LR As Long, LS As Long Dim i As Long, p As Long Dim Cls As String Set ws = Sheets("arshef") Set Sh = Sheets("ك.غ") LR = ws.Range("B" & Rows.Count).End(3).Row j = 2 Do While j <= 310 Cls = Sh.Range("G" & j).Text For i = 5 To LR If ws.Range("Q" & i).Text = Cls Then p = p + 1 Sh.Range("C" & p + j + 2) = ws.Range("B" & i) End If Next p = 0 j = j + 28 Loop End Sub

تفضل 🙂 صفحة رئيسية مطورة.accdb

هذه واحدة من الواجهات التي صممتها بطريقة مميزة نوعا ما : والشكر لك مهندسنا @jjafferr على البرنامج الراااااااااائع 🙂 ومن هنا التحميل : صفحة رئيسية مطورة.accdb ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ وهذي الواجهة الثانية بناءا على فكرة الأخ @الحلبي ☺️ القوائم الفرعية مع ملف التحميل : صفحة رئيسية مطورة.accdb ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ تظهر الأزرار الفرعية عند النقر المزدوج وتختفي عند النقر مرة واحدة .. 😅 وهذه صورة توضيحية .. مع إضافة بعض الأمور الجمالية عند مرور الماوس .. وإظهار الصفحات الخاصة بالزر .. وملف التحميل 🙂 صفحة رئيسية مطورة.accdb ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ وهذا التصميم الثالث : القوائم المطوية وكالعادة ملف التطبيق 🙂 صفحة رئيسية مطورة - التصميم الثالث.accdb جعفر صفحة رئيسية مطورة.zip ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ النموذج الرابع ... شكل جذاب بإطار مميز هذه المرة شكل جديد معتمد على عناصر مصممة بالفوتوشوب ومدمجة مع عناصر الأكسس 🙂 وملف التصميم كما تعودتم 🙂 ‏‏صفحة رئيسية مطورة - التصميم الرابع.accdb520 kB · 439 downloads ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ النموذج الخامس : قائمة مطوية وأزرار فرعية ... وفيها جمع بين فكرتي النموذجين الثاني والثالث ... بـالستايل الأسود لمحبي الستايلات الغامقة 🙂 وهنا التحميل لكل شخص جميل 🙂 : ‏‏صفحة رئيسية مطورة - النموذج الخامس.accdb ⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨⭐🌟⭐✨ النموذج السادس : قوائم منسدلة وأزرار جانبية 🙂 وملف التحميل 🙂 صفحة رئيسية مطورة - النموذج السادس.rar

التلميح داخل مربع النص مع علامة مائية فى حالة كان مربع النص فارغ ويختفيان بمجرد التركيز داخل مربه النص او الكتابة ... ToolTip.mdb

اليوم اقدم لكم أضخم كتاب عربي لتعلم برنامج EXCEL يحتوي على شرح مفصل لصيغ والدوال وكذالك مرفق مع الكتاب تطبيقات نموذجية . غلاف الكتاب المحتويات 1.بداية الكتاب معلومات اساسية عن برنامج إكسل 2007 2. استخدام الدالات في الصيغ 3. شرح كافة المعادلات في والتطبيق في إكسل 4. شرح صيغ الصفيف وأمثلتها المستحيلة في إكسل 5. شرح جداول Pivot والمراجع الدائرية المقصودة والمخططات والرسوم البيانية والتنسيق الشرطي والادوات والتنقيح 6.في النهاية الغير متوقعة شرح لغة VBA وطريقة كتابة الصيغ فيها لتحميل الكتاب اضغط هنا حجم الكتاب: 39.7 MB رابط اخر على 4shared أرجو الدعاء لي ولصاحب الكتاب وناشره جزاكم الله خيرا

شكرا جزيلا أخ yahiaoui وجزاك الله خيرا على ما قدمت وأود أن أنبه الإخوة إلى ملحوظة رائعة في النسخة الحالية للمنتدى والتي تسمح لك بتحميل مضمون الموضوع في ثلاث صور 1-صورة للطباعة 2-صورة صفحة html 3-صورة ملف وورد ولتحميل جميع مشاركات أي موضوع اتبع الآتي تجد أسفل الموضوع هذه الصورة اضغط فيها على تحميل سيظهر لك صفحة أخرى كما بالصورة اضغط على ملف وورد سيت تحميل الموضوع كاملا على جهازك يمكنك تصفحة في أي وقت تحياتي أخوكم أبو عبد الله محمد صالح