Shivan Kurdi

نعم سيكون علامة صح امامه لكن اذا ضغطت على لا سيلغي علامة صح امامه

Dim pass As Integer Dim massage As Integer pass = InputBox("ادخل رقم سري خاص لانشاء مستخدم جديد", "ادخل رقم سري") If pass = 1212 Then DoCmd.OpenForm "اسم النموذج" Else massage = MsgBox("کتبت رقم سري خطأ") End If

IF MSGBOX( " هل انت متأكد من اعطاء المستخدم هذا صلحيات الادارة" , VBYESNO ,"") = VBYES THEN ME.MIREBIA = TRUE ELSE ME.MIREBIA = FALSE ENDIF غیر MIREBIA باسم مربع جيك بوكس اللي عندك

انا فقط غيرت في اسماء المربعات النصية مثلا بدل حرف Ė غیرت بحرف E القي نظرتا الى المسميات لكلا المرفق راح تعرف كل شيء تحياتي

حدث اي نوع من المشاكل ؟ هل ممكن ان ترفع قاعدة بيانات لكي نشوفه

عملت لك جدول اخر للسندات منتهية المدة وعملت استعلامين الاول ترحيل والثاني حذف واستخدمت هذه الاكواد في نموذج فرعي Private Sub Form_Current() Me.Text62 = Me.رقم_السند End Sub Private Sub mstagra_Click() If Me.mstagra = False Then If MsgBox("ھل تريد ترحيل ھذا السند الى جدول سند عقد منتهية ؟", vbYesNo, "ترحيل") = vbYes Then DoCmd.SetWarnings False DoCmd.OpenQuery "terhil" DoCmd.OpenQuery "deletesened" DoCmd.SetWarnings True MsgBox "تم ترحيل" Else Me.mstagra = True End If End If Me.Requery End Sub واليك ملف بعد تعديل واذا هذا ليس يكون طلبك وضح لي بالتفصيل ترحيل 55 (1).rar

القي نظرتا الى هذا ترحيل 55 (1).rar

صح اعمل زر جديد وفي محرر فيجوال الصق الكود في حدث عند النقر * وايضا هناك طرق اخر لحذف الكل في جدول

الیک ھذا السطرين يحذف كل سجلات الموجودة DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdDeleteRecord

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

اعمل جدول واحد لكل زبائن .. وبعدين تقدر تفرزها و تعمل اي شي تريد

السبب یرجع لان حقل نعم لا ھو فی جدول الشقق عند تعمل علامە صح امامه كانك تضع علامة صح امام كل السجلات ترحيل 55.rar

اتفضل ترحيل .rar

ھل ترید ھذا انا استخدمت دالة IIF ھکذا expr1: IIf( [نهايه العقد] < DATE() ; DateDiff("n";[wagtadhl] & [tarah];[wajtalhroj] & [nahatalajd]); 0) احتساب الوقت.rar

مادام ان هناك مدينة واحدة وهو القاهرة تم حذفت كومبوبوكس لنموذج الدخول مع كود خاص به وتم تغيير الاستعلام الالحاق .. حقل تابع المحافظة من Expr3: [Forms]![login]![City] الى Expr3:"القاهرة" اليك المرفق بعد تعديل login - Copie.rar

لا اعرف ھل انا ما فھمت من سؤالك ام ماذا القي نظرتا الى المرفق هل هذا هو ماتريد للعلم ان السبب للسجل الفارغ كان مصدر النموذج login - Copie.rar

اولا فتح نموذج الفرعي في وضع تصميم وفتح محرر فيجوال وغير Private ب كلمة Public للزر اللي تريد ان تناديه في نموذج الرئيسي مثال ستغير هذا Private Sub button2_Click() بهذا Public Sub button2_Click() وفي نموذج الرئيسي ستناديه هكذا Call Form_formsub.button2_Click اليك المرفقك بعد تعديل تشغیل زر نموذج فرعي بواسطة نموذج الرئيسي.rar

اخی الحبیب کما قلت لک من قبل غیر مسمیات راح یضبط معاك اليك المرفق بعد تعديل mohamed1 (2).rar

نعم القي نظرتا الى الصورة عملت لك كما مبينة في الصورة القي نظرتا الى الصورة عملت لك كما مبينة في الصورة اتفضل مع المرفق افتح نموذج واكتب فيها سنة و شهر مثلا 2017/07 وافتح التقاریر test 5000.rar

نعم لكن قلت خلي اجرب ... واللي انا اعرف ان استاذنا @ابوخليل بيستخدم اوفيس 2003 ... لعل عنده الجواب و اعتذر من سيادتكم

على الرغم انا ما عملت مثل هذه الشغل الكبير بعد لكن حسب تجربتي لبعض دقيقة عليه احتمال هناك خطأ عند تحويل التقرير الى html شوف ھذا بعد تحويل من جديد يظهر عندي هكذا واليك المرفق واحتمال ان هذا ليس يكون مطلبك تقبل تحياتي 2003عبارة.rar

السلام علیکم ورحمة الله وبركاته استاذ محمد هل ممكن تخبرنا ماذا تريد ان يظهر لان انا عم استخدم اوفيس 2010 وبيظهر معي هكذا بواسطة نموذج .. اظن انه مافي مشكلة

غیر هذا باسم اخر وجرب مثلا باسم numeroN

اذن اختر الجواب الصحيح اي اعمل علامة صح امام جواب صحيح لكي من يراجع هذه الرابط لكي يع8لم اي جواب هو جواب الافضل

اخي القي نظرتا الى اسماء الحقول ومربعات النصية احتمال ان تستخدم حروف عليها الرموز ... غيرها وارتاح