ابوخليل

تفضل تم تعديل اسماء الجداول والحقول .. لعدم الالتزام بطرق التصميم الصحيحة المهم ان حل مشكلتك يكمن في هذا السطر .... وظيفته تحويل النص الى تاريخ DateValue([tblOld].[sdate]) testdate2.mdb

جرب ان تحول النص الى تاريخ قبل التحديث باستخدام متغير

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

شكرا لمرورك استاذ عبدالله واثرائك الموضوع لا اوافقك التسمية بل ارى ان يسمى برنامج مبيعات فقط لأن كل نشاط له خاصية ويمكن الجمع بينهم اذا أسسنا الجداول المناسبة . فبرامج المبيعات وهي ما تسمى نقاط البيع هي وحدة منفصلة على طرفية ( الكاشير ) وتشترك معها المشتريات على طرفية اخرى ( ادارة المؤسسة ) للمشتريات وادارة المخازن كل بيانات البيع والشراء تصب في جدول واحد ____________________________ اما برامج المحاسبة والقيود وشجرة الحسابات فغير مناسبة لهذا النشاط ولا تخدمه ، ويمكن توظيفها في انشطة اخرى مثل الأعمال الكثيرة الأخرى في المصانع والمشاريع والمؤسسات التجارية والخدمية الأخرى . ومع ذلك يمكننا العمل على برنامج المحاسبة منفصل بحيث يقوم المحاسب بالعمل عليه في المؤسسات التجارية التي تمتهن البيع والشراء ، بحيث يدخل يدويا الخلاصات اليومية او الاسبوعية وغيرها مما يخص اعمال المؤسسة . اليوم الكل يستخدم التقنية ويبحث عن السرعة والسهولة .. فبرامج المبيعات بشقيها : 1_طرفية نقطة البيع 2_وطرفية المشتريات وايداعها في المخازن _ لا يستخدم فيها الإدخال اليدوي وانما عن طريق ماسح الباركود .. ومع كل هذه السرعة واليسر بالامكان الاستبيان والاستعلام عن ادق تفاصيل العمليات ،

تم الفصل وافراد النقاش حول الجداول بهذا الموضوع الجديد

تفضل Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub Command27_Click() Dim i As String i = Me.k_code ShellExecute Me.hwnd, "open", CurrentProject.Path & "\files\" & i & ".tif", "", "", 1 End Sub Downloads.rar

هذا حسب ما فهمت اتمنى ان يحقق مطلوبك ff3.rar

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

آمين ولك بمثل ما دعوت

الاصل ان يكون مثالك الأول مطابقا لحاجتك ، لتتمكن من نقل العملية بشكل صحيح يمكنك ارفاق نماذجك التي تعمل عليها

تفضل عملت لك جدول يحتوي على حقل واحد يسجل فيه اسم الموظف المسؤول من اجل اتاحة المجال للمستخدم بتغيير اسم الموظف ، لانه من عير المنطقي برمجيا اني اكتب اسم موظف داخل الأكواد مشكلة في التقرير5_552.rar

تقصد ان القيمة واحدة في جميع السجلات؟

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

تفضل السجل المرحل لن يتم تكراره ابدا ، باستخدام استعلام الحاق ff2.rar

المقصود وعلى حسب طلبك : ان الشرط في اختلاف الشخصين في حساب 201 لتحول المبلغ الى دائن لا يكفي فكر فيها على راحتك وكما ذكرت لك لا يصلح ان نبني على اسم سمير فقد يستبدل سمير بغيره هل في برنامجك جدولا بأسماء الموظفين ؟

البرنامج ما يعرف سمير بشخصه فقد يذهب ليحل احدا آخر مكانه فلا بد من وجود ضابط وهي صفة خاصة لمن يمثل هذه الوظيفة انت فاهمني .. فسمير اسم من ضمن عمود الأسماء .. يعني يجب ان يكون هناك عمود خاص يكون فيه صفة خاصة بالموظفين عبارة عن رقم معين اما بالنسبة لتسمية الحقول لا يلزم المام باللغة الانجليزية يكفي ان تكون الحروف انجليزية مثى كلمة الصافي تكتبها بمعناها العربي : safe وهكذا في بقية الكلمات

المشكلة لديك في تأخر جلب عدد السجلات من النموذج الفرعي لذا جعلت الجلب مباشرة من الجدول تفضل م11.rar

اذا تأكدت من عمل الكود يمكنك تطوير الكود واستبدال on error resume next بسطر ينبه على الطالب الذي ليس له صورة

يعمل عندي بكل كفاءة .. انظر الصورة وضعت on error resume next فقد يكون بعض الطلاب ليس لديهم صور فيقفز الخطأ لما بعده لو وضعت المؤشر على السطر الأصفر واطلعت على قيم oldName و NewName لتبين لك مكان الخلل

شكرا اخي الكريم سبع مشاركات وكلها عطاء بارك الله لك في عمرك ومالك وأهلك وولدك

قد تلاحظ تأخر الأعضاء عن المبادرة في المساعدة خاصة فيما تدخل فيه الاكواد ضمن الحلول ، والسبب هو الحروف العربية التي كتبتها لأسماء الحقول تصور ان عمل كود يشتمل على شروط يذهب بالمتعة وتستحيل قراءته وفهمه وما لم تغير طريقة عملك وهي الابتعاد عن الحروف العربية في التسميات فلن تتعلم ولو بقيت سنين الحروف العربية متاحة في التسمية التوضيحية لكل حقل انظر الكود الذي عالجت به طلبك على صفتين واحدة باستبعاد الحروف العربية والأخرى مع الحروف العربية ، واحكم بنفسك ايهما اقرب للفهم والتعلم مشكلة في التقرير5552.rar

يوجد استعلام ثالث باسم modvou71 ومن اجل التأكد ارفق مثالك حتى نتمكن من مساعدتك

هل تقصد اذا اختلف : (من حساب) و (اسم الموظف) في البند 201 يكون مكانه عمود الدائن ؟ لانه يوجد عدة سجلات مشابهة مثل ما بين خالد محمد و سمير يحي في البند 201

اخي .. استعمل اداة عرض الكود .. والصق فيها بالنسبة للكود : يطول الشرح فكل سطر لوظيفة معينة لو سألت عن سطر او جملة افدناك بها اما مسألة تحديد اظهار عشرة سجلات فلا يوجد في الكود ذلك ، ولكنك ستجده في الاستعلام افتح الاستعلام على عرض sql ستجد في اول سطر عبارة Top 10 فقط امسحها

تفضل Dim i As Integer Dim rs As Recordset Set rs = Me.Recordset Dim OldName, NewName Dim x As Variant Dim xx As Variant With rs .MoveFirst For i = 0 To .RecordCount x = Me.Serial xx = Me.Name1 OldName = CurrentProject.Path & "\" & x & ".pdf" NewName = CurrentProject.Path & "\" & x & "_" & xx & ".pdf" Name OldName As NewName .MoveNext Next i End With ملحوظة : ضع البرنامج داخل مجلد الملفات ايضا تجنب تسمية الحقول بعبارات محجوزة في أكسس ... تم تعديل الحقل Name الى Name1 Students.rar