• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

امير الكناني

اعضاء جدد
  • عدد المشاركات

    9
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

-6 مقبول

عن امير الكناني

  • الرتبة
    عضو جديد

معلومات الملف الشخصي

  • الجنس ذكر
  1. مساعده عرض الصور

    اتمنى الرد باسرع وقت ممكن 
  2. السلام عليكم لدي برنامج ويوجد فيه جدول فرعي للصور احتاج زر معاينه لعرض الصوره بمعنى عند الضغط على زر معاينه تظهر الصوره ولكن لم استطع ان افعلها ارجو من الخبراء لايقصرون وجزاكم الله خير  555.4.m.salama.accdb.rar
  3. في البداية شكرا الى جميع الاعضاء والى الاخ محمد امين الذي ساعدني في برنامج الاجازات ولكن لدي مشكله بعد تكبير قاعده البيانات وربطها مع سيرفر sql server  ظهرت لدي مشكله علما ان النموذج يعمل ولكن نموذج تحديث الاجازات تظهر هذه المشكله مرفقه الصور هل هناك تعديل للكود او اضافة كود الربط مع sql او odbc ليعمل النموذج التحديث وهذا هو الكود كاملا  Option Compare Database Private Sub Form_Load() Dim Udate1 As Variant Dim Udate2 As Variant Dim Uyear1 As Variant Dim Uyear2 As Variant Udate1 = DLookup("tmonth", "tblmonth") Udate2 = Format(Now(), "MM") Uyear1 = DLookup("tyear", "tblmonth") Uyear2 = Format(Now(), "yyyy") Dim db As DAO.Database Dim rs As DAO.Recordset2 Set db = CurrentDb Set rs = db.OpenRecordset("الاسماء", dbOpenTable) If Udate1 <> Udate2 Then With rs .MoveFirst Do While rs.EOF = False .Edit .Fields(7) = .Fields(7) + 3 .Update .MoveNext Loop End With DoCmd.RunSQL ("update tblmonth set tblmonth.tmonth='" & Udate2 & "'") MsgBox "تم اضافة رصيد" End If If Uyear1 <> Uyear2 Then With rs .MoveFirst Do While rs.EOF = False .Edit .Fields(7) = .Fields(7) + 36 .Update .MoveNext Loop End With DoCmd.RunSQL ("update tblmonth set tblmonth.tyear='" & Uyear2 & "'") MsgBox "تم اضافة رصيد" End If Me.T1 = "التحديث لغاية 1/" & Udate1 + 1 & "/" & Uyear2 End Sub
  4. ارجو المساعده والدخول فورا

    معقوله هذا الموقع الضخم لا احد يستطيع مساعدتي 
  5. ارجو المساعده والدخول فورا

    لدي في البرنامج خانه مكتوب رصيد اول العام عندما ادخل رصيد على سبيل المثال 30 يوم اريد ان يزيد الرصيد كل شهر 3 ايام وهكذا ياريت احد يساعدني بهذا الخصوص والبرنامج مرفق نسخه منه وعملت التقارير وايضا اريد ان يضاف عند سحب التقارير ارجو الرد بسرعه 
  6. اخواني توقف عملي حاليا ارجو المساعده من الاخوه الموجودين بالمنتدى الرائع ياريت احد يساعدني البرنامج هو اجازات الموظفين ولكن لدي رصيد اريد ان يضاف الى الرصيد 3 ايام بالشهر الواحد وهكذا كل شهر تضاف 3 ايام الى الرصيد يعني خلال السنه تضاف 36 يوم ارجو المساعده بهذا الخصوص بصراحه عملي متوقف الان على هذا الموضوع  اجازات الموظفين.rar
  7. السلام عليك شباب ارجو المساعده في برنامج الاجازات لدي قاعده بيانات واريد اضافة الرصيد سنويا 36 يوما برمجيا يعني كل سنه يضيف للموظف 36 يوما بدون ماضيف انا الرصيد يعني كل سنه يضيف 36 يوما او بمعنى 2016/12/31 وغدا هو 1/1/2017 يتم اضافة 36 يوما للرصيد القديم المدخل سابقا ارجو من يساعدني بهذا الخصوص ولكم الدعاء والشكر  Vacations_UP5.rar
  8. شباب مساعدة ضرورية منتدى راقي

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