ezatshalpy@gmail.com

فين البرنامج

نقف على الجدول وكلك يمين وننختار التحويل الى جدول محلى

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

هذا كود هو تقريبا للحفظ حصلت عليه من احد المنتديات والسؤال هو لماذا كل هذا الكود للحفظ ونعلم ان الحفظ يتم تلقائى ام هو لغرض اخر ؟ وشكرا ارجو ذكر الفائدة من الكود Private Sub أمر412_Click() On Error Resume Next Dim db As DAO.Database Dim rst As Recordset Dim strsql As String Dim i As Integer strsql = "SELECT * FROM ENTER_SAFF where saff_code = " & txt6.Value & " ORDER BY stud_name,gender_code" Set db = CurrentDb Set rst = db.OpenRecordset(strsql, dbOpenDynaset) x.Value = (x.Value) + 1 i = x.Value StTotal = rst.RecordCount MsgBox StTotal Do rst.Edit rst![st_no] = i rst.Update rst.MoveNext i = i + 1 Loop Until rst.EOF rst.Close Set rst = Nothing Set db = Nothing MsgBox "تم الحفظ بنجاح" End Sub

شكرا جزيلا محمد ابو عبد الله فكرتك وصلتنى للحل ممتاذ شغلك

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

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

لو عندى قيمة محسوبة فى الفورم او الاستعلام واريد تسجيلها فى الجدول هل هناك طريقة او كود لعمل ذلك وهذة القيمة فى sub form من فورم رئيسى ولكم جزيل الشكر

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

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

السلام عليكم ممكن كود اضافة عدد من الاشهر الى تاريخ معين حيث ان العدد يتغير غير ثابت ممكن شهرين او اى عدد من الاشهر