ابوخليل

تمام .. الحمدلله او تكتب التاريخ كامل في الجدول ثم تجعل المعيار في الاستعلام كما تفضلت

وعليكم السلام يمكن الفلترة في الاستعلام حسب الشهر والسنة فقط في حقل التاريخ ، مع رقم الهوية في الحقل الآخر

الطلب غريب نوعا المفترض كل عقدة ولها اسمها تفضل حسب طلبك توضع في حدث النقر على العقد Dim v As Integer Dim i As String i = Node.FullPath v = Mid(Node.Key, 2, 1) If Mid(Node.Key, 1, 1) = "s" Then lblPath.Caption = TreeView2.Nodes.Item(v) Else lblPath.Caption = Left(i, InStr(i, "-") - 1) End If لاحظ اني غيرت اسم العقدة الابن من اجل التعرف على الأب شجرة2.rar

وعليكم السلام اخي ابحث عن هذه الجملة في المحرر Node.FullPath واستبدلها بهذه Node.Text

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

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

امتنع متصفح قوقل من تنزيلة اخفق : تم اكتشاف فيروس جرب رفعه على موقع آخر

انظر هنا

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

الأصل اكسس لا يتعامل مع البيانات بالنسخ واللصق وانما بالاستيراد والتصدير جرب الاستيراد من مصنف اكسل

نعم ربما يكون هو السبب لان اكسس لم يهيأ للعمل بصيغة exe

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

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

عليكم السلام اولا يجب نقل جميع الملفات التشغيلية التي يعتمد عليها البرنامج dll ' ocx الى الجهاز الجديد وتسجيلها من المعوقات التي يكثر حدوثها : 1- امان اكسس مرتفع 2 - تنصيب البرنامج وامان وندوز مرتفع ( يسبب امتناع تسجيل المكتبات ) 3- بعض اصدارات اكسس 2007 ناقصة وتسبب بعض المشكلات

السلام عليكم نعم اذهب الى خصائص الحقل في الجدول القيمة مفهرس : ستجدها غير قابلة للتكرار بياناتك اعلاه مكررة

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

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

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

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

تفضل هذه الاسطر البرمجية تقوم بعمل اللازم Public fld1 As Integer Public Function tstfld() Dim rs As Object Dim fld2 As String Dim i As Integer Set rs = CurrentDb.OpenRecordset("tbl1") If rs.RecordCount > 0 Then rs.MoveFirst Else Exit Function End If With rs Do While Not (.EOF) If !wrd = 3 Then fld1 = !id .MoveNext If !wrd = 1 Then Call werCrtr DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE Tbl1 SET Tbl1.tst = 1 WHERE (((Tbl1.id)=werCrtr() Or (Tbl1.id)=werCrtr()+1))" DoCmd.SetWarnings True End If End If .MoveNext Loop End With Set rs = Nothing End Function Public Function werCrtr() werCrtr = fld1 End Function db2.rar

الآن عند ادخال الرقم في الرئيس تظهر الانتدابات في ورقة البيانات لماذا لا تضيف الانتداب الجديد من ورقة البيانات نفسها ؟

اخونا وسيم لا بد اننا نلتزم بقواعد المشاركة كل سؤال مختلف جديد يجب ان يفتح له مشاركة جديدة بعنوان جديد سأجيبك هنا على سوالك الاخير وسأقوم بفصلها بموضوع مستقل فائدة : باستخدامك الحروف العربية في تسمية الجداول والحقول لن تتعلم ابدا كيف ؟ انظر الكود الذي وضعته لك في الحل طبعا لن تفهم منه شيء والسبب انه مختلط الاتجاهات ( حروف عربية الى اليمين واخرى الى اليسار ) db17.rar

بعد اذن استاذ السيد اذا غير موجود كما تقول افتح عللى خصائص الحقل/ لسان التبويب : تنسيق وفي القيمة تنسيق الصق هذه : yyyy/mm/dd

فضلا قم بتحويله الى mdb

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