Dream_Works

أرجو أن يكون هذا مبتغاك لقد تم حل المشكلة كالتالي : 1 - تغيير حجم قسم ( التفاصيل ) Details ... ووضع الحجم المناسب لتجنب الزيادة في حجم الفراغات عند الطباعة 2- طلب طباعة عمودين في الريكورد الواحد كالتالي: File -> Page Setup -> Columns Number Of Columns : 2 Width : 4 ( مقدار التباعد بين البطاقات ) _________________.zip

لقد أخطأت في الاقتباس السابق ... :) أرجو توضيح كلامك .... لم أفهم ما تريد

انسخ قاعدة بياناتك و جرب التالي على النسخة 1- قم بعمل compact and repair Tools -> Database Utilities -> Compact and Repair 2- أرفق النماذج المطلوبة فقط مع جداولها و استعلاماتها و امسح الباقي وجود قاعدة بياناتك سيساعدنا كثيرا في حل مشكلتك

أرجو أن يكون هذا مبتغاك Private Sub Name_BeforeUpdate(Cancel As Integer) Dim SearchResult As String, DestinationCode As Integer SearchResult = Nz(DLookup("[code_no]", "[Personal data]", "[Name]=form![Name]"), "") If SearchResult <> "" Then MsgBox "هذا الإسم موجود من قبل !" DestinationCode = CInt(SearchResult) Me.Undo DoCmd.GoToRecord acDataForm, Me.Name, acGoTo, DestinationCode End If End Sub ___.zip

فكرة رائعة

هل هذا هو ما تريد ؟ أعتقد إن تصميم قاعدة بيانات ممكن يكون أفضل ... لو 1- وضعت التاريخ الكامل فقط بالجدول و حذفت الشهر و اليوم ... و مع تعديل بسيط بالكود ممكن يعطي نفس النتائج و بمساحة ذاكرة أقل أنا تركت تصميمك كما هو و لم أعدل فيه prices.zip

أرجو التوضيح

جرب هالكود ... احتمال ينفع docmd.setWarnings false Open HyperLink docmd.setWarnings true

احتمال تغيير هوامش الصفحة ينفع ؟؟؟ ... أرجو إرفاق قاعدة بياناتك إن أمكن

يستحسن ارفاق قاعدة بيانات في هذه الحالة ... و لكن أعتقد لإظهار اليوزر نيم الحالي يمكنك استخدام القيمة current user في الفيجوال بيسك

شكلها جميلة جدا ... و حركة ربط قاعدة البيانات بقاعدة أخرى جميلة جدا .... و لكن للأسف البرنامج يعطيني run time error ؟؟؟؟ و لم أستطع استكشافه أكثر

للأسف حاولت فيها و لم أستطع الى الآن .... و ما زالت المحاولات مستمرة أرجو من أحد الخبراء مساعدتنا إن أمكن

يصعب شرح هذه الأمور بالكتابة ... من الأفضل إرفاق قاعدة بياناتك أو نسخة مصغرة منها 1- يوجد أكثر من طريقة الاستعلام لمعرفة عدد السجلات select count(*) أو شيء من هذا القبيل استخدام الكود Recordset 2- بتغيير طريقة الربط بين الجدولين Left join or right join

أرجو أن يكون هذا مبتغاك فقط وضعت هذا الكود عند ضغط زر الطباعة في الفورم Dim ReportName As String ReportName = "حصر الصنف الوارد حسب مدة محددة" DoCmd.OpenReport ReportName, acViewNormal, , , acHidden DoCmd.Close acReport, ReportName, acSaveNo db2.zip

أعتقد ممكن تسويها بالكود ... ارفق مثالك

تفضل أرجو أن يكون هذا هو المطلوب db3.zip

أعتقد أنه يجب أن تتأكد من طول الحقل و نوعه في الجدول حقل memo ممكن يحمل 255 حرف تقريبا أرجو إرفاق قاعدة بياناتك إن أمكن

أعتقد إنك تحتاج حق هالكود Dim DateDifference As Integer DateDifference = DateDiff("d", #8/4/2007#, #8/5/2007#) لاحظ أخوي في التواريخ المكتوبة -- > اليوم بالنص و الشهر هو أول رقم

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

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

أخوي انت ما تحتاج تحط حقل و تخفيه .... امسح الحقل و عدل الكود اللي مكتوب عندك كالتالي ... السطور 2 - 3 - 4 Dim Currentdate As Date Currentdate = Weekday(Date) Select Case Currentdate

السلام عليكم أرجو وضع موقع أو مجموعة قواعد بيانات أكسيس تحتوي على تصميمات جميلة للنماذج و التقارير

يمكنك إنشاء جدول جديد ووضع القيمة فيه ... أو إنشاء public variable ووضع القيمة به يمكنك إرفاق قاعدة بياناتك :)

للأسف لم يمكنني تحميل المثال .... أعتقد أن هناك مشكلة في التحميل

ما هي أفضل الطرق لنقل البيانات بين الشاشات المختلفة في الأكسيس؟ أنا استخدمت طريقة معينة قرأتها في كتاب و هي ... تعريف public variable في module و نقل اسم الفورم و اسم ال control من فورم الى آخر و من هناك تتم التعبئة ..... و هذه الطريقة أثبتت نجاحها و لكني لم أستطع تعريف اسم ال (subform ) ووضعه في variable و استخدامه و هذا هو المثال عند استخدام زر com من الفورم JournalVoucher ثم اضغط زر رجوع من الفورم الناشئ .... سيظهر الخطأ مباشرة ... اذا وجدت طريقة أخرى أفضل لنقل البيانات أرجو تبليغي بها خصوصا إنني أفضل طريقة عامة لأني سأستخدم نفس فورم البحث في أكثر من فورم SKM_Accounts_System.zip