مشاركة مع اخي محمد
يمكن الاستعانة بوسيط لإخراج الصور على النحو التالي :
افتح البرنامج على عرض التصميم
في جزء التنقل :
- حدد النموذج الذي يحتوي على صورة خلفية أو تنسيق تلقائي تريده
- انقر بزر الماوس الأيمن على النموذج في جزء التنقل وحدد تصدير >> XML
في الصفحة الأولى من المعالج ، حدد مكان الحفظ
انقر التالي او موافق
سيظهر لك مربع حوار صغير به ثلاثة مربعات اختيار
قم باختيار الخيار الأول (البيانات) والخيار الثالث (العرض التقديمي) ثم اضغط موافق
انقر فوق الزر "إغلاق" في الصفحة الأخيرة من المعالج بعد اكتمال عملية التصدير
اذهب الى مكان الحفظ ستجد جميع صورك في مجلد Images
مشاركة معكم احبتي
يوجد حل آخر للحماية بشروط ، او هي شرطين :
الاول ان من يعمل على البرنامج لا يشمله الحجب ( لأنه حين يكون متصلا بالجدول من داخل البرنامج ، يمكنه نسخه)
الثاني ان تكون الحماية على على الحقول النصية في الجدول فقط
الطريقة هي تشفير الجدول عند غلق البرنامج
سبق لي من زمن ليس بالقريب ان عملت نوت بوك بريمج صغير لتسجيل الاسماء وارقام هواتفهم وبيانات اخرى .. وكان طلب صاحبي ان لا يتمكن احد من قراءة البيانات عند غلق البرنامج .
حماية تشفير.mdb
السلام عليكم
فى التراث القديم ( وما أروع أعضاءه )
تم عمل هذا التدرج اللونى لخلفية النموذج فى أكسس
ومن المتعارف عليه أن هذا التنسيق لا يتواجد إلا فى وورد بالتحديد
إذن كيف تم عمل هذا !!
Crack-by-zahrah.rar
العلم تراكمي والخبرة وليدة الحاجة والتجربة .. نعم ما زلنا نتعلم .. وكمال العلم لله سبحانه .
يوجد اكواد تعالج استخراج الصور من النموذج ومن ضمنها صورة الخلفية ، وايضا اعتقد قرأت انه يمكن التعامل مع هذه الصور من خلال جدول النظام .
وحاولت وقتها ولكني لم اوفق .. المسألة بحاجة الى وقت للمحاولة والتجربة
ولكن طريقة استخدام الوسيط في تصدير الفورم سهلة وقريبة .. ولا يحتاجها الا المصمم فقط . حين يفقد محفوظاته
تفضل تم تغيير الحدث
Dim x As Integer
x = Nz(DCount("asm", "tbl1", "asm='" & Me.asm & "'"), 0)
If x > 0 Then
Beep
MsgBox "هذا الاسم موجود سابقا", , ""
DoCmd.CancelEvent
Exit Sub
End If
الاسم موجود سابقا3.rar
اخي الكريم
الموضوع قديم جدا ..
من سياسات المنتدى أن تقوم بفتح موضوع جديد تذكر فيه طلبك .. ثم تشير لهذا الموضوع في حال وجود رابط بينهما ..
اعانك الله ووفقك
السلام عليكم
لا مشكلة في الكود
قمت بنجربة الكود على النص العربي يملفك والكود شغال 100%
الكود يتعامل مع الحروف الإنجليزية والعربية، لأن دالة Split وخصائص Characters وFont.ColorIndex تعمل مع جميع النصوص، بغض النظر عن اللغة
الدالة Len تعمل مع جميع النصوص بغض النظر عن اللغة، سواء كانت النصوص مكتوبة باللغة العربية، الإنجليزية، أو أي لغة أخرى. فهي ببساطة تُرجع عدد الأحرف في النص، ولا تهتم بنوع الأحرف أو اللغة المستخدمة.
وطريقة عمل التلوين
حيت تقوم بتحديد النص المراد تلوبن احد حروفه او اكثر من حرف ثم تكتب الحرق في الصندوق inputbox قيتم تلوبن النص
بالتوفيق
تفضل أخي الكريم
تم عمل زر لسهولة التلوين . اختر الخلايا أولا ثم اضغط على الزر و أكتب حروف أو كلمات سواء عربي أو انجليزي و سيقوم بتلوينها
تلوين حروف.xlsm
تفضل
وجدت الخلل في ترتيب شروط الدالة
عدلتها وايضا عدلت على دالة النتيجة النهائية مثلها بالضبط
ايضا لاحظ اني عملت متغير عام يأخذ قيمته عند حدث بعد التحديث لحقل الصف في نموذج التقارير .. وقيمته هي معرف الصف
البحث وتعديل درجات3.rar