• الإعلانات

    • فيصل الحربي

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

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

a7msd

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

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

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

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

0 عادي

عن a7msd

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

طرق الإتصال

  • ICQ 0
  1. اتمنى من الاعضاء او المشرفين ان لا ينسونا من تقديم الدعم في حال المرور على الاستفسار لان كلي ثقة بجهود الجميع
  2. اتمنى من الاعضاء او المشرفين ان لا ينسونا من تقديم الدعم في حال المرور على الاستفسار لان كلي ثقة بجهود الجميع
  3. ما زلت بانتظار الخبراء في المنتدى بالرد على استفساري
  4. السلام عليكم ورحمة الله وبركاته،،، اود الاستفسار يوجد لدي قاعدة بيانات للموظفين واريد ان اصحح وضح السجلات بحيث تصبح تاريخ السجلات صحيحة في التسلسل وذلك لوجود سجلات تاريخ البداية او نهاية تتقاطع مع سجل اخر لنفس الموظف وكذلك يوجد سجلات تاريخ نهاية السجل وتاريخ بداية السجل الثاني في نفس الشهر والمفترض ان السجل الثاني يبداء من الشهر التالي آمل المساعدة من بناء كود برمجي يساعد على البحث لمثل هذه الحالات   . مع شكري وتقدير لأعضاء المنتدى اختبار.xlsx
  5. السلام عليكم ورحمة الله وبركاته،،، اود الاستفسار يوجد لدي قاعدة بيانات للموظفين واريد ان اصحح وضح السجلات بحيث تصبح تاريخ السجلات صحيحة في التسلسل وذلك لوجود سجلات تاريخ البداية او نهاية تتقاطع مع سجل اخر لنفس الموظف وكذلك يوجد سجلات تاريخ نهاية السجل وتاريخ بداية السجل الثاني في نفس الشهر والمفترض ان السجل الثاني بيداء من الشهر التالي آمل المساعدة من بناء كود برمجي يساعد على البحث لمثل هذه الحالات   . مع شكري وتقدير لأعضاء المنتدى اختبار.xlsx
  6. اتوقع ان توجد قدرات عالية في المنتدى ولكن حتى الان لم يتم قراء السوال من الخبراء لتوضيح كيفية معرفة حل مثل هذه الاستفسار مع شكري لجميع من مر على هذ السوال
  7. السلام عليكم امل المسادة في كيفية معرفة سجلات متداخلة بالتواريخ ان وجد في قاعدة البيانات لشخص معين مثال السجلات :- 1- رقم الموظف تاريخ بداية الاجازة تاريخ نهاية الاجازة 12345 01/01/2011 28/02/2011 12345 09/02/2011 03/03/2011 12345 10/05/2011 15/05/2011 يوجد تداخل للموظف 12345 في السجل الثاني وذلك لبدايته من 09/02/2011 قبل نهاية السجل الاول 28/02/2011 وذلك لتصحيح معلومات قاعدة البيانات ان وجد مثل هذه التداخلات هل توجد طريقة بالاستعلام لاستخراج مثل هذا التداحل في السجلات بالمقارنة للموظف الواحد بجميع سجلات المسجلة في قاعدة البيانات ، او بناء كود للبحث عن هذه الحالات امل المساعدة مشكورين ليعم الفائدة لجميع اعضاء المنتدى
  8. اخي ekseer اتقدم بشكر الجزيل حسن تعونك وعلى هذا الكود الجميل،
  9. السلام عليكم ورحمة الله وبركاته اتمنى من الخبراء في المنتدى المساعدة في الوصول الى دالة تعطي عدد المسافات في نص (معرفة عدد الفراغات في النص) مثال توجد دالة لمعرفة طول النص مثال (Len) ، اتمنى مساعدتى وذلك لاني اعمل كود يقسم الاسم الى اربعة اقسام ولكن عند وجود اسم مكون من ثلاثي او اثنائي ينتج خط
  10. شكرا على هذ الرد ولكن يوجد خط في الكود عند قيمة y الرسالة microsoft visiual baaic For Each controal variable on arrays must be variant
  11. السلام عليكم عندي كود اخذته من احد الزملاء لتقيسم الاسم الرباعي الى اربعة اجزاء ولكن عندي مشكلة احتمال ان لايكون الاسم رباعي فيعطيني خطاء في الكود كيف اعدل على الكود بحيث يفسم الاسم الرباعي اوالثلاثي الى الاسم الاول والثاني والثالث والرابع Dim Continue As Boolean Continue = True Dim X, Y, m As Integer X = 0 Y = 0 m = 0 'arabic_name Capture First Name------------------------------------------- Do While Continue = True X = X + 1 If Mid(name_a, X, 1) = Space(1) Then Continue = False Else Continue = True 'MsgBox (Mid(FullName, X, 1)) End If Loop Y = X name1_a = Mid(name_a, 1, X - 1) 'Capture Second Name------------------------------------------- Continue = True Do While Continue = True Y = Y + 1 If Mid(name_a, Y, 1) = Space(1) Then Continue = False Else Continue = True 'MsgBox (Mid(FullName, Y, 1)) End If Loop m = Y father_a = Mid(name_a, X + 1, Y - X) 'Capture Third Name------------------------------------------- Continue = True Do While Continue = True m = m + 1 If Mid(name_a, m, 1) = Space(1) Then Continue = False Else Continue = True 'MsgBox (Mid(FullName, Z, 1)) End If Loop grand_a = Mid(name_a, Y + 1, m - Y) 'Capture Family Name------------------------------------------- family_a = Mid(name_a, m + 1, 10)
  12. السلام عليكم ورحمة الله وبركاته شكر وتقدير الى كل المبدعون في هذا المنتدى . طلب مساعده من الخبراء في برنامج اكسس وهو عندي تقرير يطبع على فورم الجوازات تم عمله ووزنها وتجربته على طباعة على قورم الجوزات ولكن المشكله لم نقلت البرنامج على جهاز ثاني وطابعة اخرى اختلف الوزنيات الحقول في الطباعة كيف اثبت خصائص التقرير بحيث لا يختلف وزنه من جهاز اخر او طابعه اخرى......... **كيف اثبت طباعة التقرير على فورم معين بحيث لايختلف من نقل البرنامج من جهاز الى جهاز ؟؟؟؟؟ *هل يوجد طريقة تحديد كل حقل في الطباعة بكود فيجول بيسك بحيث احدد السطر و العمود لكل حقل ، افيدوني ياهل الخبرة وشكراً على من قراء هذا الرسالة او من يساعدني ودمتم:'(
  13. السلام عليكم ورحمة الله وبركاته شكر وتقدير الى كل المبدعون في هذا المنتدى . طلب مساعده من الخبراء في برنامج اكسس وهو عندي تقرير يطبع على فورم الجوازات تم عمله ووزنها وتجربته على طباعة على قورم الجوزات ولكن المشكله لم نقلت البرنامج على جهاز ثاني وطابعة اخرى اختلف الوزنيات الحقول في الطباعة كيف اثبت خصائص التقرير بحيث لا يختلف وزنه من جهاز اخر او طابعه اخرى......... *هل يوجد طريقة تحديد كل حقل في الطباعة بكود فيجول بيسك بحيث احدد السطر و العمود لكل حقل ، افيدوني ياهل الخبرة وشكراً على من قراء هذا الرسالة او من يساعدني ودمتم:o
  14. لك الشكر يا أشرف خليل على سرعة اجابتك وتعاونك وعلى جميع العملين وهو اشبه بي منتدى خلية النحل :D بس هناك استفسار في التقرير هي هذه العباره (من) Sumمنkamih
  15. السلام عليكم ورخمة الله وبركاته اخواني الكرام الرجو مساعدتي في اخارج تقرير مثالي هذا http://mypage.ayna.com/am909a/stor11.zip اتمنى ان يكون سؤالي واضح