بحث مخصص من جوجل فى أوفيسنا
Custom Search

Shivan Rekany

الخبراء
  • Content count

    1,881
  • تاريخ الانضمام

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

  • Days Won

    56

Shivan Rekany last won the day on May 15

Shivan Rekany had the most liked content!

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

1,288 Excellent

عن العضو Shivan Rekany

  • الرتبه
    شفان ريكاني

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    ملاحظ
  • Location
    كوردستان

Contact Methods

  • Website URL
    https://www.facebook.com/Shivan1988
  • ICQ
    shivanrekany212@gmail.com

اخر الزوار

2,603 زياره للملف الشخصي
  1. جرب بدل ان تستخدم Me.السرعة استعمل هذا Me![السرعة] ووافيني بالنتيجة
  2. لانك ليس في سجل جديد بل انت على سجل قديم تعمل تعديلات اتفضل عند تضغط على زر الحفظ راح يحفظ ما عملت ويفتح سجل جديد لكي تعمل سجل جديد اي اضفت هذا الكود Private Sub ÃãÑ80_Click() Docmd.Runcommand accmdsaverecord DoCmd.GoToRecord , , acNewRec End Sub اتفضل مع القاعدة شكرا لملاحظتك استاذنا @jjafferr slamaa.rar
  3. وعليكم السلام ورحمة الله وبركاته واحد منهم كان انا شكرا لك انا نزلت البرامج ووصلت للمطلوب تقبل تحياتي
  4. ما فهمت قصدك ... هل قصدك سجل جديد ؟
  5. اتفضل تم اضافة هذا الكود على مثال استاذنا @jjafferr هذا لاوبشن كروب Private Sub opt_Click() If Me.opt = 1 Then Me.نوع_التعامل = "مميز" ElseIf Me.opt = 2 Then Me.نوع_التعامل = "عادي" ElseIf Me.opt = 3 Then Me.نوع_التعامل = "جيد جدا" End If End Sub وهذا ل ليست بوكس Private Sub lst_Click() If Me.lst = 1 Then Me.نوع_التعامل = "مميز" ElseIf Me.lst = 2 Then Me.نوع_التعامل = "عادي" ElseIf Me.lst = 3 Then Me.نوع_التعامل = "جيد جدا" End If End Sub ما في فرق بينهما واتفضل القاعدة الك بعد اضافة الكود 657.Database1.accdb.zip
  6. كم انت خبيث يعني يجب علينا ان نستعد انفسنا انتبه لنفسك ان الجيوشنا بالطريق وانتب مجددا لانك في الاخير ستقول " يا ليتني ما حربت مع الجيوش اوفيسنا ... " لان هناك احتمال اذا تحارب مع الجيش النازي ام امبراطور نابليون بونابرت ان تفوز لكن مع الجيوش اوفيسنا مســــــــــــــــتحيل
  7. هناك مافيه مشكلة اذا انت شرير ام لا .. فقط لا تكون ظالم لأن هناك قول "واحدة بواحدة والبادي أظلم" وايظا لا تفكر ان الجميع سيسكتون لان هناك قول اخر "المصبية ليست في ظلم الأشرار بل في صمت الأخيار" لان انا لا افكر ان في هذا الصرح العظيم ان يكون هناك من يحب المصائب ويصمته
  8. اللي حيرتني هو بعد انا عملت استعلام لكي اعرف كل اسم من الاسماء الجدول السبعة هم كم حروف ظهرت ان الجدول الاول والثاني كلهما حرف واحد "وانا لا اصدق هذا ان يقبل اسم مكرر لجدولين "!! لكن بعد طلعت ان اسم الجدول الاول = Chrw ("8205") و اسم الجدول الثاني = Chrw ("159") وشكرا لك على هذه الموضوع اخونا امير
  9. استأذن من استاذنا الحبيب @رمهان اتفضل اليك هذا DoCmd.OpenReport "ÊÞÑíÑ1", acViewPreview, True, "[رقم الحافظة]=" & Me.Text34 طباعة مرفقات.rar
  10. انفضل اليك بعض روابط على شبكة وهذه الروابط لل اتفضل تقبل تحياتي
  11. افتح جدول باسك اكسبر1 انظر الى اربع سجلات الاخيرة هم فارغة احذفه
  12. استأذن من استاذنا @عبد الله قدور اخي الكريم @حمادة عثمان السبب يرجع للمصدر النموذج وهو استعلام واذا تفتح الاستعلام لذا انا حذفت مصدر الاستعلام واستبدلت تيكست بوكس للرقم الى كومبوبوكس بها حقلين وعمل تلك الاستعلام الاولى مصدر لكومبوبوكس و عطيت كود بعد تحديث لكومبوبوكس اي عند تكتب الرقم او تختار الرقم سيجي اسم الى مربع نصي للاسم وملاحظة اخرى لا يجوز ان تعطي لاسماء المربعات النصي ارقام فقط يجب ان تكتب اي تبدأ بحرف وبعدين رقم لذا انا غيرت اسماء المربعات النصية ايضا اتفضل اليك قاعدة بياناتك بعد تعديل case 3.rar
  13. هل ما كان تريد هكذا استخدمت هذا hadr: [a] & [b] & [c] & [d] & [e] & [f] & [g] & [h] & [i] & [j] & [k] واذا تريد ان لا يجمع الحقول الفرغة يجب تستخدم iif لكن الكود سيكون طويل حسب عدد الحقول بس من الممكن ان تعمل فانكشن و تستخدمه في استعلام sumTxt.rar
  14. وعليكم السلام ورحمة الله وبركاته اللهم امين والحمد لله رب العالمين واللهم بلغنا رمضان تمام حقول نصية بها اسماء لذا بدل ان تستخدم + استخدم & تقبل تحياتي