السلام عليكم ورحمة الله وبركاته
لقد صممت برنامج للموظفين بفيجوال نت وقاعدة البيانات اكسس ولكن واجهتني مشكلة
وهو التاريخ التقاعد مثلا
ميلاد شخص 1/4/14200هـ ويتقاعد بعد 40 سنة
الناتج 1/7/1440هـ
كيف الطريقة مع اضافة اليوم والشهر حيث انه ثابت 1/7 ويجمع عدد السنين
ارجوكم
استخدم الدالة Datediff لحساب الفرق بالتواريخ حيث يمكنك ايجاد أمثلة عنها إن استخدمت محرك البحث في المنتدى
عن عائشة رضي الله عنها أن النبي صلى الله عليه وسلم قال: إن الله يحب إذا عمل أحدكم عملا أن يتقنه
نعيب زماننا والعيب فينا ... وما لزماننا عيب سوانا
ونهجو ذا الزمان بغير ذنب ... ولو نطق الزمان لنا هجانا
محمد سامر أبو سلو
لقد وجدت الدالة Datediff وحاولت ولكني لم استطع ان احسب عدد السنوات فقط وابقي اليوم ثابت والشهر ثابت 1/7 ارجوك اذا ما عليك امر الطريقة
الف شكر على سرعة تجاوبك
انا مبتدئي بفيجوال نت وحاولت بس عجزت ممكن الطريقة
انتظرك يا اخي A7med_prof
السلام عليكم ورحمة الله وبركاته اخي العزيز
انت تريد طرح التاريخ على مثالك مثلا 1/4/14200هـ 40 سنه ام تريد اضافة 40 سنه ؟
ملحوظه :
ياريت لا تطلب الحل من عضو بعينه .
شكرا ,,,
بالتوفيق ,,,,,
A7med_prof
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
الأخ الفاضل ...
يمكنك استخدام DateAdd لحساب عمر التقاعد، لمزيد من الشرح ومثال، راجع: كيفية حساب ايام واضافة هذة الايام علي التاريخ
شكراً
تم تعديل هذه المشاركة بواسطة Eng. Usama El-Mokadem في 17 ديسمبر 2007 في 17:31
Nothing is impossible, the word impossible itself says that: I M - Possible
السلام عليكم ورحمة الله وبركاته
لو كان قصدك ذي ما فهمت وتريد اضافة 40 سنه على تاريخ معين استخدم الداله DateAdd والمعامل هيكون Year .
والكود التالي يوضح مقصودي :
Dim x As Date
x = CDate("1/4/1420")
MsgBox(DateAdd(DateInterval.Year, 40, x))بالتوفيق ,,,,,
A7med_prof
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
A7med_prof كتب:والكود التالي يوضح مقصودي :Dim x As Date x = CDate("1/4/1420") MsgBox(DateAdd(DateInterval.Year, 40, x))A7med_prof
أعتقد أخى تقصد استخدام "yyyy" بدلاً من DateInterval.Year
MsgBox (DateAdd("yyyy", 40, CDate("1/4/1400")))Nothing is impossible, the word impossible itself says that: I M - Possible
السلام عليكم ورحمة الله وبركاته
أوافقك اخ محمد سامر أبو سلو
فكنت انوي ان اطلب منك هذا الطلب ,,,,,
بالتوفيق ,,,,,
A7med_prof
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
اولاً آسف اذا بدر مني اي كلام من غير قصد ونحن إخوة هنا زي ما قال مشرفنا العزيز محمد سامر أبو سلو
وانني اشكر الاستاذ A7med_prof على سرعة رده وكذلك الاخ العزيز Eng. Usama El-Mo للمشاركته
ولقد جربته كود اخي العزيز A7med_prof وكذلك كود الاخ العزيز Eng. Usama El-Mo ووجدت انها جميع الاكواد تعطي نتيجة واحدة
الف شكر لكلم
اخوكم
comiler error
variable not defiened
الغلط فين
لا يوجد غلط ولا حاجة وممنوع الصيد في الماء العكر
هذا الموضوع مغلق.