Eng.Qassim

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

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

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

الف مبروك للاساتذة @عمر ضاحى و @Foksh على الترقية رغم اني تمنيت اضافة اخونا @شايب

السلام عليكم السؤال ..لماذا الاستعلام لايأخذ الباراميتر من النموذج ؟

بالتوفيق

صدقا نسيته لولا انك تذكرني

وعليكم السلام شوف هذه المشاركة

طبعا ...لان اسلوب مصدر البيانات اختلف

اسف جدا ..يمكن كان تعديلي على الملف المضغوط 20231002.accdb

الظاهر انك لم تستدعي الدالة عند فتح التقر 20231002.rar

ممكن توضح مطلبك على صورة الجدول او الاستعلام ؟

تفضل التعديل 20231002.rar

من اين يأخذ النموذج A2 بياناته؟ على كل حال استخدم الدالة TempVars قبل اغلاق النموذج لكل سجل كي يحتفظ بالبيانات وعند فتح التقرير اجعله مصدر بيانات الحقول لديك

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

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

وعليكم السلام وجدت لك هذه الخطوات من اليوتيوب

الاساتذة @AbuuAhmed.. @ابو جودي انا لا اسأل عن ال access runtime.. انما وجدت برنامج اكسس يعمل على جهاز حاسوب ليس فية برنامج اوفيس او اكسس رنتايم!! بحثت ووجدت ان UcanAccess يقوم بتشغيل برنامج الاكسس لكنه لايدعم الماكرو حاولت تنصيبه لاجربه لكنه لم يفتح معي لا.. فقط مستعرض

حمدا لله على سلامتك استاذ خليفة

زيادة الخير خيرين يا بشمهندس محمد وعلى كل حال هو جزء مما تعلمته منك ومن بقية الاساتذة الكرام

وعليكم السلام واجهة جميلة جدا..عاشت الايادي

وعليكم السلام استاذ @ابو جودي هي محاولة ..استبدل السطر اعلاه ب If Len(strOptionExtension) > 0 Then .Filters.Add "Select File", strOptionExtension Else .Filters.Add "Select File", "*.jpg;*.png" End If الاستدعاء .. Dim selectedFile As String selectedFile = CustomPicker(0, "*.jpg;*.png")

بالمناسبة ... UcanAccess ...لايعمل ان كان هناك ماكرو

السلام عليكم اخوتي وأساتذتي الكرام .. معضمنا يعلم بأنه يمكن تشغيل برنامج الاكسس دون الحاجة لتنصيب الاوفيس عبر استخدام Access RunTime عملت برنامج لاحد العملاء ..حينما نزلته على حاسوبه ..ليس فيه اوفيس او Access RunTime ..مع العلم ان لديه برنامج اكسس يعمل على نفس الحاسوب قمت بالبحث عن هذا الموضوع .. وجدت برنامج اسمه UcanAccess نزلت البرنامج لكنه لم يعمل معي ...هل لدى احد الاخوة اي خبرة في ذلك

بالتأكيد استاذ ابو خليل ..النموذج يفتح حينما يكون الجدول فارغ ..لانه سيلصق ال IP للحاسوب في الجدول حينما يتم نسخه الى حاسوب ثاني سوف لن يشتغل ..لانه سيقارن بين IP الموجود في الجدول مع ال IP للحاسوب الجديد بالمناسبة ..السطر الاول المفروض يكون هكذا ..حب ما اعتقد ارجوا منك استاذي ان تشرح لي الثغرة If DCount("[IpAddress]", "tblLog") = 0 Or DLookup("[IpAddress]", "tblLog") = Null Then