kkhalifa1960

استاذي @ابو جودي اثلجت صدري بمرورك علشان كده انا كاتب لمن يهمه الأمر .

ضبط التلاعب بتاريخ الكمبيوتر الشرح بالفيديو التالي . Manipulating computer Date settings.rar

تفضل استاذ @فؤاد الدلوي المرفق بعد التعديل بطلبك ... test (555-1).rar

انا حليت لك هذه المشكلة من قبل ولكنك مصمم تعرض من ليس له ادخال بالجدول !!!!!!!!!!!!! test.rar

خطوات فحص الربط بين Access وMySQL: التأكد من تثبيت موصل (Driver) MySQL ODBC: تأكد من أن لديك الإصدار الصحيح من موصل MySQL ODBC المثبت على جهازك. اختر الإصدار الذي يتوافق مع بنية نظامك (32-bit أو 64-bit). يمكنك تحميل الموصل من موقعMySQL. إعداد DSN بشكل صحيح: افتح ODBC Data Source Administrator. أضف مصدر بيانات جديد (DSN) وربطه بقاعدة البيانات MySQL. تأكد من إدخال جميع معلومات الاتصال الصحيحة: الخادم (localhost)، المنفذ (عادةً 3306)، اسم المستخدم، وكلمة المرور. استخدام الرابط المناسب في Access: افتح Access، ومن علامة التبويب بيانات خارجية (External Data)، اختر ODBC Database. اختر Link to the data source by creating a linked table. حدد مصدر البيانات (DSN) الذي قمت بإعداده، ثم اختر الجدول المراد ربطه. التحقق من إعدادات MySQL: تأكد من أن قاعدة بيانات MySQL مهيأة للسماح بالاتصالات من المضيف المحلي (localhost). تأكد من أن المستخدم الذي تقوم باستخدامه يمتلك الأذونات الكاملة للوصول إلى الجداول في MySQL. فحص الأخطاء في برنامج XAMPP: افتح لوحة تحكم XAMPP وتحقق من الأخطاء أو التنبيهات الخاصة بـ MySQL. تأكد من أن خادم MySQL يعمل بشكل صحيح ولا توجد أي قيود على الوصول المحلي. التحقق من التوافق: تأكد من أن إصدار Access متوافق مع إصدار ODBC وMySQL. قد تسبب الإصدارات القديمة بعض المشاكل. استخدام استعلام مباشر (Pass-Through Query): جرب استخدام استعلام مباشر في Access للاتصال بقاعدة MySQL. هذه الطريقة يمكن أن تساعد في عزل المشكلة. يمكنك كتابة استعلام مثل: SELECT * FROM my_table_name; هذا يساعد في التأكد من أن الاتصال والبيانات يعملان بشكل صحيح. إذا استمرت المشكلة بعد تنفيذ هذه الخطوات، يمكننا مراجعة إعدادات أكثر تفصيلاً أو مشاركة لقطة شاشة للأخطاء، وسأحاول مساعدتك بشكل أعمق! 😊

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

VBAaccess ::: خطأ محجوز (-7745) لاتوجد رسالة لهذا الخطأ يبدو أن الخطأ المحجوز (-7745) في Access يشير إلى مشكلة في قاعدة البيانات أو في الاتصال بها. هذا النوع من الأخطاء قد يحدث بسبب تلف في السجلات أو الجداول، أو بسبب مشاكل في الشبكة أثناء الاتصال بقاعدة البيانات. خطوات لحل المشكلة: ضغط وإصلاح قاعدة البيانات: افتح Access. من قائمة "أدوات"، اختر "ضغط وإصلاح قاعدة البيانات". هذا الإجراء يمكن أن يساعد في إصلاح أي تلف بسيط في قاعدة البيانات. التحقق من السجلات التالفة: إذا كنت تستخدم استعلامات VBA، حاول تشغيل استعلام لتحديد السجلات التالفة. يمكنك حذف السجلات التالفة واستبدالها بنسخة احتياطية إذا كانت متوفرة. التحقق من الشبكة: إذا كانت قاعدة البيانات موجودة على خادم، تأكد من أن الاتصال بالشبكة مستقر. أي انقطاع في الشبكة أثناء الكتابة أو القراءة قد يؤدي إلى تلف البيانات. استخدام أداة إصلاح متقدمة: إذا لم تنجح الخطوات السابقة، يمكنك استخدام أدوات مثلDataNumen Access Repair لاستعادة البيانات التالفة. نسخ قاعدة البيانات إلى ملف جديد: قم بإنشاء قاعدة بيانات جديدة. انسخ الجداول والكائنات الأخرى من القاعدة القديمة إلى الجديدة.

تفضل استاذ DDBoAhmed -1.rar

تفضل استاذ @أبو أحمد حسب مافهمت اليك مرفق بطلبك . ووافني بالرد . DDBoAhmed.rar

للرفع

تفضل المرفق بعد التعديل . saad-3.rar

تفضل أخي @2saad الشرح والمرفق بعد التعديل . saad-2.rar

تفضل لستاذ @2saad حسب مافهمت .. saad-1.rar

كله تمام لكن وضح طلبك بالتفصيل

تفضل أخي @husseinharby مع التحفظ عليه .... كود من مايكروسوفت . Private Sub UserForm_Initialize() On Error Resume Next End Sub

بالنسبة للسجلات السابقة يمكن تعديلهم بسهولة وبعدة طرق أما السجلات اللاحقة فيجب ضبط القيم الافتراضية للحقلان كما بالشرح إما يدوياً .. أو فقط اضغط على الزر الاحمر كما بالشرح ... اليك الشرح والمرفق . test-112.rar

استاذ @فؤاد الدلوي هل هذا ماتبحث عنه .... ادخل سنة البحث 2025 وطالع الناتج .. ووافني بالرد . test-111.rar

اليك أخي @ahmedha هذا المرفق كنت سويته أحد الزملاء يمكن يساعدك اقرأة جيدا واذا احتاجت مساعدة حاضرين . GavanDB.rar

اليك أخي @moho58 المرفق بعد التعديل ...... Limousine Programe-1.rar

تفضل استاذ @moho58 اليك احدي الحلول لأنك لم ترفق مرفق !!! الحل الأول: ضبط إعدادات الطباعة يدويًا باستخدام VBA يمكنك تغيير إعدادات الطابعة عبر VBA قبل طباعة التقرير بحيث يتم تصغير المحتوى ليلائم حجم الورقة A4. الكود: Private Sub PrintReportA4() Dim rpt As Report Dim strReportName As String strReportName = "اسم_التقرير" ' استبدل باسم تقريرك ' فتح التقرير في وضع المعاينة DoCmd.OpenReport strReportName, acViewPreview ' التأكد من أن التقرير مفتوح If SysCmd(acSysCmdGetObjectState, acReport, strReportName) <> 0 Then Set rpt = Reports(strReportName) ' ضبط إعدادات الطابعة للطباعة على ورقة A4 مع تصغير الحجم With rpt.Printer .PaperSize = acPRPSA4 ' ضبط حجم الورقة إلى A4 .Orientation = acPRORLandscape ' (اختياري) ضبط الاتجاه أفقي أو عمودي End With ' طباعة التقرير بعد ضبط الإعدادات DoCmd.PrintOut ' إغلاق التقرير بعد الطباعة DoCmd.Close acReport, strReportName End If End Sub الحل الثاني: تصغير التقرير تلقائيًا عند الطباعةالكود لحفظ التقرير كـ PDF ثم الطباعة: إذا كان التقرير يحتوي على عناصر تتجاوز حجم A4، يمكنك تعديل خاصية التكبير والتصغير (Zoom) للطباعة بدون قص الأجزاء الكبيرة. استخدم إعدادات Fit to Page في الطابعة، ولكن يتم ذلك عبر إعدادات الطابعة وليس VBA مباشرة. الحل الثالث: حفظ التقرير كملف PDF ثم الطباعة إذا كان هناك مشاكل في الطباعة المباشرة، يمكنك حفظ التقرير بصيغة PDF ثم طباعته بالحجم المطلوب. الكود لحفظ التقرير كـ PDF ثم الطباعة: Private Sub ExportAndPrintPDF() Dim strReportName As String Dim strFilePath As String strReportName = "اسم_التقرير" ' استبدل باسم تقريرك strFilePath = "C:\Temp\ReportOutput.pdf" ' مسار حفظ التقرير ' تصدير التقرير إلى PDF DoCmd.OutputTo acOutputReport, strReportName, acFormatPDF, strFilePath ' طباعة الملف المحفوظ Shell "cmd /c start /min " & Chr(34) & strFilePath & Chr(34), vbHide End Sub ملحوظات: تأكد من ضبط إعدادات الطابعة الافتراضية للطباعة على A4. إذا كان التقرير يحتوي على عناصر كبيرة جدًا، قد تحتاج إلى إعادة تصميمه بحيث يكون قابلًا للطباعة على A4 بشكل أوضح. تأكد من تجربة الطباعة أولًا عبر المعاينة (acViewPreview) قبل الطباعة الفعلية.

اين المرفق لمساعدتك ؟؟؟؟

تفضل استاذ @ابو هاله النبلسي المرفق . ووافني بالرد . DDNabulsi-1.rar

ابشر

تفضل استاذ @ابو هاله النبلسي المرفق . ووافني بالرد . DDNabulsi.rar

تفضل استاذ @ازهر عبد العزيز المرفق بعد التعديل بطلبك حسب مافهمت . ووافني بالرد . borrow.rar