01-10-12, 04:16 PM
كاتب الموضوع : BADRMEDIA
فى بيئة دوت نت 2005 يوجد Class جديد يعود بتقوم أم القري لمن يحتاج للحصول على التاريخ الهجري
نعرف الفئة
كود :
[color=#000000][COLOR=#0000bb] Dim UmQ [/color][color=#007700]As New [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Globalization[/color][color=#007700].[/color][COLOR=#0000bb]UmAlQuraCalendar
[/COLOR][/COLOR]نحصل على التاريخ الحالي
كود :
[color=#000000][COLOR=#0000bb] Dim GetingDate [/color][color=#007700]As [/color][color=#0000bb]Date [/color][color=#007700]= [/color][color=#0000bb]Date[/color][color=#007700].[/color][COLOR=#0000bb]Now
[/COLOR][/COLOR]نعرف لليوم متغير ونرسل للفئة لنحصل منها على اليوم الهجري
كود :
[color=#000000][COLOR=#0000bb] Dim hijriDay [/color][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][color=#0000bb]UmQ[/color][color=#007700].[/color][color=#0000bb]GetDayOfMonth[/color][color=#007700]([/color][color=#0000bb]GetingDate[/color][COLOR=#007700])
[/COLOR][/COLOR]نعرف للشهر متغير ونرسل للفئة لنحصل منها على اليوم الهجري
كود :
[color=#000000][COLOR=#0000bb] Dim hijriMonth [/color][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][color=#0000bb]UmQ[/color][color=#007700].[/color][color=#0000bb]GetMonth[/color][color=#007700]([/color][color=#0000bb]GetingDate[/color][COLOR=#007700])
[/COLOR][/COLOR]نعرف للسنة متغير ونرسل للفئة لنحصل منها على اليوم الهجري
كود :
[color=#000000][COLOR=#0000bb] Dim hijriYear [/color][color=#007700]As [/color][color=#0000bb]Integer [/color][color=#007700]= [/color][color=#0000bb]UmQ[/color][color=#007700].[/color][color=#0000bb]GetYear[/color][color=#007700]([/color][color=#0000bb]GetingDate[/color][COLOR=#007700])
[/COLOR][/COLOR]وبعد ذلك أصبحت تملك التاريخ