ابوخليل

اربطها في الاستعلام الا اذا اردت ان تقيد المستخدم بادخال معين اجباريا اذا المشكلة ما زالت قائمة راجع العلاقات ستجد علاقات يجب ازالتها

اخي الكريم يجب الاهتمام باختيار عنوان مناسب يصف الموضوع حتى لاتعرض موضوعك للاغلاق

عليكم السلام اطلعت على العلاقات بين الجداول وكأنها بيت العنكبوت العلاقات لانضعها بين الجداول الا لتقييد الادخال احذف العلاقة الموجودة بين جدول names وجدول Store

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

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

Me.Page = Me.Pages استاذنا العزيز هل يمكن ترجمة الجملة اعلاه ؟ واذا لا تترجم حرفيا فماذا تعني ؟

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

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

وهذا برنامج آخر .. محمي عن التعديل اسم المستخدم =1 وكلمة المرور=1 Yatem.rar

وجدت لك برنامجا يخص اليتيم اعتقد انه اعم واشمل ، اتمنى ان يفي بحاجتك يتيم.rar

المعذرة اخوي حلبي وملاحظتك صحيحة لا غبار عليها غير الرقم 3 الى 2 في موضعين الاول في الحقل A والثاني في محرر الفيجوال في حدث بعد التحديث لحقل التحضير TXTCOD ولاحظ ان حقلي الوقت عند فتح النموذج متساويين ولا تنسى الاتصال بالانترنت

تفضل db7.rar

تفضل جمعية احباب الله قاعدة بيانات الايتام5.rar

السلام عليكم اخواني واحبتي : كنت قد اعددت درسا لم يكتمل بعد عن العلاقات عامة ومن ضمنها امكانية صنع الجداول والعلاقات برمجيا وحيث ان الغرض هو نشر المعلومة هذا مثال بضغطة زر لعمل الجداول وعلاقاتها وتتالي تحديث الحقول وتتالي الحذف Option Compare Database Function CreateTableScripts() CurrentProject.Connection.Execute "CREATE TABLE [categories]([categoryid] LONG IDENTITY(1,1) , [categoryname] VARCHAR(15) NOT NULL , [description] LONGTEXT , [picture] IMAGE , PRIMARY KEY ( [Categoryid]))" CurrentProject.Connection.Execute "CREATE TABLE [customers]([customerid] VARCHAR(5) , [companyname] VARCHAR(40) NOT NULL , [contactname] VARCHAR(30) , [contacttitle] VARCHAR(30) , [address] VARCHAR(60) , [city] VARCHAR(15) , [region] VARCHAR(15) , [postalcode] VARCHAR(10) , [country] VARCHAR(15) , [phone] VARCHAR(24) , [fax] VARCHAR(24) , PRIMARY KEY ( [Customerid]))" CurrentProject.Connection.Execute "CREATE TABLE [employees]([employeeid] LONG IDENTITY(1,1) , [lastname] VARCHAR(20) NOT NULL , [firstname] VARCHAR(10) NOT NULL , [title] VARCHAR(30) , [titleofcourtesy] VARCHAR(25) , [birthdate] DATETIME , [hiredate] DATETIME , [address] VARCHAR(60) , [city] VARCHAR(15) , [region] VARCHAR(15) , [postalcode] VARCHAR(10) , [country] VARCHAR(15) , [homephone] VARCHAR(24) , [extension] VARCHAR(4) , [photo] VARCHAR(255) , [notes] LONGTEXT , [reportsto] LONG , PRIMARY KEY ( [Employeeid]))" CurrentProject.Connection.Execute "CREATE TABLE [orderDetails]([orderid] LONG , [productid] LONG NOT NULL , [unitprice] MONEY NOT NULL DEFAULT 0 , [quantity] INTEGER NOT NULL DEFAULT 1 , [discount] SINGLE NOT NULL DEFAULT 0 , PRIMARY KEY ( [Orderid], [Productid]))" CurrentProject.Connection.Execute "CREATE TABLE [orders]([orderid] LONG IDENTITY(1,1) , [customerid] VARCHAR(5) , [employeeid] LONG , [orderdate] DATETIME , [requireddate] DATETIME , [shippeddate] DATETIME , [shipvia] LONG , [freight] MONEY DEFAULT 0 , [shipname] VARCHAR(40) , [shipaddress] VARCHAR(60) , [shipcity] VARCHAR(15) , [shipregion] VARCHAR(15) , [shippostalcode] VARCHAR(10) , [shipcountry] VARCHAR(15) , PRIMARY KEY ( [Orderid]))" CurrentProject.Connection.Execute "CREATE TABLE [products]([productid] LONG IDENTITY(1,1) , [productname] VARCHAR(40) NOT NULL , [supplierid] LONG , [categoryid] LONG , [quantityperunit] VARCHAR(20) , [unitprice] MONEY DEFAULT 0 , [unitsinstock] INTEGER DEFAULT 0 , [unitsonorder] INTEGER DEFAULT 0 , [reorderlevel] INTEGER DEFAULT 0 , [discontinued] YESNO DEFAULT =No , PRIMARY KEY ( [Productid]))" CurrentProject.Connection.Execute "CREATE TABLE [shippers]([shipperid] LONG IDENTITY(1,1) , [companyname] VARCHAR(40) NOT NULL , [phone] VARCHAR(24) , PRIMARY KEY ( [Shipperid]))" CurrentProject.Connection.Execute "CREATE TABLE [suppliers]([supplierid] LONG IDENTITY(1,1) , [companyname] VARCHAR(40) NOT NULL , [contactname] VARCHAR(30) , [contacttitle] VARCHAR(30) , [address] VARCHAR(60) , [city] VARCHAR(15) , [region] VARCHAR(15) , [postalcode] VARCHAR(10) , [country] VARCHAR(15) , [phone] VARCHAR(24) , [fax] VARCHAR(24) , [homepage] LONGTEXT , PRIMARY KEY ( [Supplierid]))" CurrentProject.Connection.Execute "CREATE UNIQUE INDEX idx_Categoryname_Categories ON [Categories]([CategoryName])" CurrentProject.Connection.Execute "CREATE INDEX idx_Categoryid_Products ON [Products]([CategoryID])" CurrentProject.Connection.Execute "CREATE INDEX idx_City_Customers ON [Customers]([City])" CurrentProject.Connection.Execute "CREATE INDEX idx_Companyname_Customers ON [Customers]([CompanyName])" CurrentProject.Connection.Execute "CREATE INDEX idx_Companyname_Suppliers ON [Suppliers]([CompanyName])" CurrentProject.Connection.Execute "CREATE INDEX idx_Customerid_Orders ON [Orders]([CustomerID])" CurrentProject.Connection.Execute "CREATE INDEX idx_Employeeid_Orders ON [Orders]([EmployeeID])" CurrentProject.Connection.Execute "CREATE INDEX idx_Lastname_Employees ON [Employees]([LastName])" CurrentProject.Connection.Execute "CREATE INDEX idx_Orderdate_Orders ON [Orders]([OrderDate])" CurrentProject.Connection.Execute "CREATE INDEX idx_Orderid_OrderDetails ON [OrderDetails]([OrderID])" CurrentProject.Connection.Execute "CREATE INDEX idx_Postalcode_Customers ON [Customers]([PostalCode])" CurrentProject.Connection.Execute "CREATE INDEX idx_Postalcode_Employees ON [Employees]([PostalCode])" CurrentProject.Connection.Execute "CREATE INDEX idx_Postalcode_Suppliers ON [Suppliers]([PostalCode])" CurrentProject.Connection.Execute "CREATE INDEX idx_Productid_OrderDetails ON [OrderDetails]([ProductID])" CurrentProject.Connection.Execute "CREATE INDEX idx_Productname_Products ON [Products]([ProductName])" CurrentProject.Connection.Execute "CREATE INDEX idx_Region_Customers ON [Customers]([Region])" CurrentProject.Connection.Execute "CREATE INDEX idx_Shippeddate_Orders ON [Orders]([ShippedDate])" CurrentProject.Connection.Execute "CREATE INDEX idx_Shippostalcode_Orders ON [Orders]([ShipPostalCode])" CurrentProject.Connection.Execute "CREATE INDEX idx_Shipvia_Orders ON [Orders]([ShipVia])" CurrentProject.Connection.Execute "CREATE INDEX idx_Supplierid_Products ON [Products]([SupplierID])" CurrentProject.Connection.Execute "ALTER TABLE [orderDetails] ADD CONSTRAINT Fk_orderidorderDetails FOREIGN KEY ( [Orderid] ) REFERENCES [Orders]([Orderid]) ON DELETE CASCADE " CurrentProject.Connection.Execute "ALTER TABLE [orderDetails] ADD CONSTRAINT Fk_productidorderDetails FOREIGN KEY ( [Productid] ) REFERENCES [Products]([Productid]) " CurrentProject.Connection.Execute "ALTER TABLE [orders] ADD CONSTRAINT Fk_customeridorders FOREIGN KEY ( [Customerid] ) REFERENCES [Customers]([Customerid]) ON UPDATE CASCADE " CurrentProject.Connection.Execute "ALTER TABLE [orders] ADD CONSTRAINT Fk_employeeidorders FOREIGN KEY ( [Employeeid] ) REFERENCES [Employees]([Employeeid]) " CurrentProject.Connection.Execute "ALTER TABLE [orders] ADD CONSTRAINT Fk_shipviaorders FOREIGN KEY ( [Shipvia] ) REFERENCES [Shippers]([Shipperid]) " CurrentProject.Connection.Execute "ALTER TABLE [products] ADD CONSTRAINT Fk_categoryidproducts FOREIGN KEY ( [Categoryid] ) REFERENCES [Categories]([Categoryid]) " CurrentProject.Connection.Execute "ALTER TABLE [products] ADD CONSTRAINT Fk_supplieridproducts FOREIGN KEY ( [Supplierid] ) REFERENCES [Suppliers]([Supplierid]) " With DoCmd .RunCommand 133 'acCmdRelationships .RunCommand 149 'acCmdShowAllRelationships .RunCommand 20 'acCmdSave .RunCommand 58 'acCmdClose End With Application.RefreshDatabaseWindow MsgBox (" The tables have been create. Please view the table object window") End Function Private Sub zer1_Click() Call CreateTableScripts End Sub انشاء الجداول والعلاقات برمجيا.rar

تفضل هذا تعديل حسب طلبك جمعية احباب الله قاعدة بيانات الايتام4.rar

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

مسألة غريبة ان كل موظف يأتي يفتح النموذج ولا اعلم لماذا لا يبقى النموذج مفتوحا باستمرار علما ان الدالة وافية ومحكمة ولا تفتح مجال لتعديل الوقت ، الا ان كنت تريد قصدا فتح المجال حتى تصيد المتلاعب فضلا حول المرفق الى صيغة mdb كل ما تفكر به مقدور عليه بإذن الله ، ولكن اعلم ان الوقت الصحيح لن يرجع الا بتوفر الانترنت

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

لا يمكن تجميع التاريخ الا اذا كانت متساوية بل هو ينطبق على كل قيمة وليس التاريخ فقط ولتحقيق مطلوبك يجب استخراج رقم الشهر فقط من التاريخ انظر المرفق New تطبيق Microsoft Office Access2.rar

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

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

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

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

المعذرة نسيت ارفاق القاعدة تفضل تم اصلاح الاسم في الرسالة اكتب الرقم الوطني في حقل الرقم جمعية احباب الله قاعدة بيانات الايتام2.rar

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