محمد التميمي

بارك الله فيك يا اخي واستاذي الكريم وجعله الله في ميزان حسناتك وجدت هذا الكد ادناه ايظاً في فديو انكليزي مع استعلام بسيط وقمت بترجمته وتطبيقه ونجح Dim FileName As String Dim FilePath As String FileName = Me.[اسم المشتري] & "رقم" & Me.رقم_الفاتورة FilePath = "C:\Users\Mxm\Desktop\" & FileName & ".pdf" 'DoCmd.OutputTo acOutputForm, "فاتورة البيع", acFormatPDF, FilePath DoCmd.OutputTo acOutputReport, "وصل بيع", acFormatPDF, FilePath MsgBox "تم حفظ التقرير بصيغة PDF بنجاح", vbInformation, "رسالة تنويه" مع فائق شكري واحترامي....

تفضل اخي ابو ياسين هذا الملف المرفق الكد الحالي يقوم بتصدير جميع الفواتير الى pdf والمراد تصدير فاتورة واحد فقط والشكر لك فاتورة.accdb

السلام عليكم استاذ ابو ياسين المحترم انا غيرت بالكد تغيير بسيط ولاكن لم افلح على امل ان يقوم بتصدير فاتورة من اختياري ولاكن قام بتصدير جمبع الفواتير لملف pdf واحد وحسب ما فهمت من الكد المكتوب نقوم بادخال رقم الفاتورة وانا اوريد اختيار اي فاتورة عشوائيا من خلال الضغظ على زو يقوم بتصديرها الى pdf ارجوا التصحيح وجزاكم الله خير الجزاء Dim RepName As String RepName = "[رقم الفاتورة]=" & Me![رقم الفاتورة] DoCmd.OutputTo acOutputReport, "وصل بيع", acFormatPDF, CurrentProject.Path & "\" & RepName & ".PDF", False

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

اخي واستاذي kanory رأيت الاضافة سلمت يداك ولاكن الكد يقوم باضافة قيمة جديدة للحقول المراد لها الاضافة ويحذف القيم القديمة اذا كانت موجودة سؤالي ماذا يكون شكل الكد لو اردنا اضافة قيم الى قيم موجودة سلفا بدون استبدالها او حذفها مجرد الزيادة عليها مع فائق الشكر والتقدير emp.accdb

السلام عليكم عذراً تم تغيير المداخلة الى مشاركة

شكرأ اخي midomashakel على الاجابة شكراً اخي استاذ جعفر على الاجابة بارك الله في جهودكم الطيبة وجعله الله في ميزان حسناتكم .

السلام عليكم استاذ جعفر لقد قمت بتطبيق الاكواد حسب المثال ولاكن باسماء انكليزي حسب البرنامج لدي ولاكن ماحدث هو ان عند الضغط على yes لايذهب الى السجل المكرر بل يذهب دائماً الى السجل الاول وبصراحة لم لتمكن من معرفة المشكلة مع فائق الشكر والتقدير Simply.mdb

احسنت وبارك الله بك ملاحظة \ الفواتير لا تضيف مواد فقط مادة واحدة تسجل بفاتورة البيع او الشراء

شكرأ استاذ صالح والشكر ايظاً للاستاذ جعفر عمل مميز ويستفاد من كثيراً عاشت الايادي

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

تفضل اخي ارجوا ان يكون هذا طلبك وحاول ان تتعرف على المتغيرات المعمولة وطريقة عمل الاكسس Database2.accdb

احسنت اخي عبد اللطيف كلك ذوق بالبرامج

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

وعليكم السلام اخي الكريم عنوان المشاركة مخالفة لقواعد المنتدى ارجوا منك يا اخي الكريم قراءة شروط المشاركة لكي يستفيد الجميع من المشاركات تفضل ارجوا ان يكون هذا طلبك 567.accdb

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

اخي الكريم يمكنك الاستفادة من هذا المرفق قائمة منسدلة متربطة بقائمة اخرى.accdb

احسنت اخي برنامج جميل نتمنى لك الموفقية

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

شكراً اخي ماقصرت

فهمتك اخي العزيز شكرا وبارك الله فيك

اخي ابو ياسين كنت قد وضعت هذا الكد سابقاً بالنموذج في بعد التحديث ولم يعمل

السلام عليكم اخواني الاعزاء في المرفق عملية حسابية بسيطة وهي ( يقسم الوزن على الطول ويضرب الناتج في نفسه) قمت بتكرار ناتج القسمة في txt1 و txt2 لينتج لي ناتجين مكررة وضربت الناتجين في txt3 ليضهر لي الناتج النهائي ما اوريده هو استبدال هذه العملية الحسابيى بكد كالاتي ( الوزن ÷ الطول = الناتج × نفسه ) واكن لكم من الشاكرين 22.accdb

شكراً جزيلاً

وعليكم السلام ورحمة الله وبركاته اخي الكريم AHMED0155079 نرحب بك اجمل الترحيب في هذا الصرح العظيم ونتمنى لك كل الخير والموفقية. سؤالك اخي العزيز عن برنامج معين تريده لا اعتقد ستجده في هذا الصرح لاننا لانتداول ونتبادل البرامج الجاهزة فكل ما موجود هنا هو تبادل للاراء والافكار والمواهب فتنتج برامج . توكل على الله وأبدء بتصميم برنامجك واين تقف ستجد الاعضاء والخبراء جاهزين للمساعدة وفقهم الله ونتمنى لك كل الخير