تجربة ناتج كــود متعلق بالتاريخ الهجري

[ثامر أبو بلقيس]

السلام عليكم ورحمة الله وبركاته
صديقي .. الجهاز عندي ملخبط .. وعندي مدة نخلط في الريجستري و ماشابه
لهذا صرت لا أثق فيه و في نتائجه ....
أحاول استخراج التاريخ الهجري من الجهاز بأقل تكلفة في الاكواد
فجربت هذه الخربشة :
os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%A:%c"));

هل الناتج صحيح .؟ و هل عند تجربة اختيار لغة اخرى للجهاز اعطت نفس النتيجة؟
اذ أمكنك رفع صورة

شكرا :abc_138:

في حالة النتائج كانت دقيقة يمكن تحويل الموضوع لقسم الدروس لتعميم الفائدة

[عبد الهادي بهاب]

السلام عليكم ورحمة الله وبركاته
صديقي .. الجهاز عندي ملخبط .. وعندي مدة نخلط في الريجستري و ماشابه
لهذا صرت لا أثق فيه و في نتائجه ....
أحاول استخراج التاريخ الهجري من الجهاز بأقل تكلفة في الاكواد
فجربت هذه الخربشة :
os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%A:%c"));

هل الناتج صحيح .؟ و هل عند تجربة اختيار لغة اخرى للجهاز اعطت نفس النتيجة؟
اذ أمكنك رفع صورة

شكرا :abc_138:

في حالة النتائج كانت دقيقة يمكن تحويل الموضوع لقسم الدروس لتعميم الفائدة

الناتج عندي

http://a.top4top.net/p_34mmkm1.jpg

[ياسرهتهت]

بسم الله الرحمن الرحيم
النتيجة 100/100 استاذي الفاضل

http://a.top4top.net/p_342fm91.png

ينقل لقسم الدروس لتعميم الفائدة

موفق بإذن الله ... لك مني أجمل تحية .
:abc_138::abc_138:

[عبد الهادي بهاب]

اضافة من اجل ان يظهر التاريخ الهجري و الميلادي مع بعض ........


os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%A %d/%m/%y \r\n\ %c"));

[ياسرهتهت]

اضافة من اجل ان يظهر التاريخ الهجري و الميلادي مع بعض ........


os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%A %d/%m/%y \r\n\ %c"));


----------------------------------------------------------------------
تمت التجربة بنجاح
بارك الله فيك اخي المحترف اقلي
وجازك الله كل خير
موفق بإذن الله ... لك مني أجمل تحية .

:abc_152::abc_152::abc_152:

[عبد الهادي بهاب]

كيف نوظف هذا الكود في استخراج التاريخ الهجري من اي تاريخ ميلادي كان ؟؟؟

ساحاول في انتظار البقية :abc_152::abc_152:

[عبد الهادي بهاب]

محاولة لتوظيف الكود الجميل في تحويل التاريخ الميلادي الى التاريخ الهجري

ضع 3 اببوتات ........الاول لليوم .........الثاتي للشهر ........الثالث للسنة

ثم اضف انوبت رابع للناتج .............تمام يا سيدي

في زر ضع هذا الكود :

d = String.ToNumber(Input.GetText("Input1"));
m = String.ToNumber(Input.GetText("Input2"));
y = String.ToNumber(Input.GetText("Input3"));
t = os.time({year=y, month=m, day=d})----------
os.setlocale("Arabic")
tt = String.Mid(os.date("%A : %c",t) , 1, String.Length(os.date("%A : %c",t))-11);
Input.SetText("Input4", tt);

انتظر التجربة يا سادة يا كرام

[عبد الهادي بهاب]

تمرين : جرب من اجل اتاريخ 6/6/2016

[ثامر أبو بلقيس]

تمرين : جرب من اجل اتاريخ 6/6/2016

t = os.time({year=2016, month=6, day=6})
os.setlocale("Arabic")
k = os.date("%x",t)
Dialog.Message("Notice", k);


موفق :abc_138: و لك ان تكتشف طريقة الاستعناء عن String.Mid

قد ألتزم الصمت .. الا لضرورة ... فما صار الوقت كاف لا للمتابعة و لا لتفاعل جاد

إليكم الخط بالتوفيق

[عبد الهادي بهاب]

t = os.time({year=2016, month=6, day=6})
os.setlocale("Arabic")
k = os.date("%x",t)
Dialog.Message("Notice", k);
موفق :abc_138: و لك ان تكتشف طريقة الاستعناء عن String.Mid

قد ألتزم الصمت .. الا لضرورة ... فما صار الوقت كاف لا للمتابعة و لا لتفاعل جاد

إليكم الخط بالتوفيق

رائع جدا ...........حرف x يختصر سطرا كاملا من المعادلات
ربي ينوركم استاذ ............

وجدت هذه المتغيرات


%a - Abbreviated weekday name (eg. Wed)
%A - Full weekday name (eg. Wednesday)
%b - Abbreviated month name (eg. Sep)
%B - Full month name (eg. September)
%c - Date and time representation appropriate for locale (eg. 23/04/07 10:20:41)
(Standard date and time string ) - see below for using os.setlocale to get the correct locale.
%d - Day of month as decimal number (01 - 31)
%H - Hour in 24-hour format (00 - 23)
%I - Hour in 12-hour format (01 - 12)
%j - Day of year as decimal number (001 - 366)
%m - Month as decimal number (01 - 12)
%M - Minute as decimal number (00 - 59)
%p - Current locale’s A.M./P.M. indicator for 12-hour clock (eg. AM/PM)
%S - Second as decimal number (00 - 59)
%U - Week of year as decimal number, with Sunday as first day of week 1 (00 - 53)
%w - Weekday as decimal number (0 - 6; Sunday is 0)
%W - Week of year as decimal number, with Monday as first day of week 1 (00 - 53)
%x - Date representation for current locale (Standard date string)
%X - Time representation for current locale (Standard time string)
%y - Year without century, as decimal number (00 - 99) (eg. 07)
%Y - Year with century, as decimal number (eg. 2007)
%Z - Time-zone name or abbreviation; no characters if time zone is unknown
%% - Percent sign

[ثامر أبو بلقيس]

رائع جدا ...........حرف x يختصر سطرا كاملا من المعادلات
ربي ينوركم استاذ ............

وجدت هذه المتغيرات


%a - Abbreviated weekday name (eg. Wed)
%A - Full weekday name (eg. Wednesday)
%b - Abbreviated month name (eg. Sep)
%B - Full month name (eg. September)
%c - Date and time representation appropriate for locale (eg. 23/04/07 10:20:41)
(Standard date and time string ) - see below for using os.setlocale to get the correct locale.
%d - Day of month as decimal number (01 - 31)
%H - Hour in 24-hour format (00 - 23)
%I - Hour in 12-hour format (01 - 12)
%j - Day of year as decimal number (001 - 366)
%m - Month as decimal number (01 - 12)
%M - Minute as decimal number (00 - 59)
%p - Current locale’s A.M./P.M. indicator for 12-hour clock (eg. AM/PM)
%S - Second as decimal number (00 - 59)
%U - Week of year as decimal number, with Sunday as first day of week 1 (00 - 53)
%w - Weekday as decimal number (0 - 6; Sunday is 0)
%W - Week of year as decimal number, with Monday as first day of week 1 (00 - 53)
%x - Date representation for current locale (Standard date string)
%X - Time representation for current locale (Standard time string)
%y - Year without century, as decimal number (00 - 99) (eg. 07)
%Y - Year with century, as decimal number (eg. 2007)
%Z - Time-zone name or abbreviation; no characters if time zone is unknown
%% - Percent sign

عندك في الموقع ما تريد منذ سنة و نصف :abc_138:
http://www.abc4web.net/vb/showthread.php?t=30173

[عبد الهادي بهاب]

عندك في الموقع ما تريد منذ سنة و نصف :abc_138:
http://www.abc4web.net/vb/showthread.php?t=30173

شكرا .......لم اراها سيدي الكريم ......و هذه مناسبة للتعرف عليها .......و ذكر فان الذكرى تنفع المؤمنين

[ثامر أبو بلقيس]

الناتج عندي

http://a.top4top.net/p_34mmkm1.jpg

ذكرنا أن الكود :
os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%x"));

يبرز التاريخ الهجري واضح من الصورة أن السنة و البوم معكوسين
نريد ان يظهر اليوم ثم الشهر ثم السنة من اليمين لليسار
هل من حل ؟

[ثامر أبو بلقيس]

بسم الله الرحمن الرحيم
النتيجة 100/100 استاذي الفاضل

http://a.top4top.net/p_342fm91.png

ينقل لقسم الدروس لتعميم الفائدة

موفق بإذن الله ... لك مني أجمل تحية .
:abc_138::abc_138:

ذكرنا أن الكود :
os.setlocale("Arabic")
result = Dialog.Message("Notice", os.date("%x"));

يبرز التاريخ الهجري واضح من الصورة أن السنة و البوم معكوسين
نريد ان يظهر اليوم ثم الشهر ثم السنة من اليمين لليسار
هل من حل ؟

[عبد الهادي بهاب]

هل يجوز استعمال string.mid
ام نبحث في دوال ليوا و الحروف مع %

[ثامر أبو بلقيس]

هل يجوز استعمال string.mid
ام نبحث في دوال ليوا و الحروف مع %

لك أن تكتب ما تريد السؤال كان بغرض لفت التظر لظهور التاربخ بترتيب غير عربي
فقط لك مع كل كود تكتبه فائدة اضافية إن شاء الله :abc_138:

[عبد الهادي بهاب]

لك أن تكتب ما تريد السؤال كان بغرض لفت التظر لظهور التاربخ بترتيب غير عربي
فقط لك مع كل كود تكتبه فائدة اضافية إن شاء الله :abc_138:

حتى نصل الى الحل بالكود المناسب هذه محاولة

os.setlocale("Arabic")
s = os.date("%x");
d= String.Mid(s,1,2);
m= String.Mid(s,4,2);
y= String.Mid(s,7,4);
Dialog.Message("", y.."/"..m.."/"..d);

[ثامر أبو بلقيس]

حتى نصل الى الحل بالكود المناسب هذه محاولة

os.setlocale("Arabic")
s = os.date("%x");
d= String.Mid(s,1,2);
m= String.Mid(s,4,2);
y= String.Mid(s,7,4);
Dialog.Message("", y.."/"..m.."/"..d);

بارك الله فيك صار الان التاريخ يظهر من اليمين لليسار - وهذا هو القصد فقد يستعمل لذا يكون جاهز أحسن -
في أقرب فرصة سـأحاول كتابة نفس الحل بطريقة تثري ردك شكرا :abc_138:

[ثامر أبو بلقيس]

للتحكم في تموقع الكلمات --- مختصر و مفيد ----
os.setlocale("Arabic")
result=os.date("%x");
b =string.gsub(result, "(%w+)%/(%w+)%/(%w+)", "%3/%2/%1")
Dialog.Message("Notice",b);

[ياسرهتهت]

للتحكم في تموقع الكلمات --- مختصر و مفيد ----
os.setlocale("Arabic")
result=os.date("%x");
b =string.gsub(result, "(%w+)%/(%w+)%/(%w+)", "%3/%2/%1")
Dialog.Message("Notice",b);

-----------------------------------------------------
بسم الله الرحمن الرحيم

بارك الله فيك استاذنا الكريم

كود من الصعب الوصول له
احد اكواد ابوبلقيس الحصرية

موفق بإذن الله ... لك مني أجمل تحية .

:abc_138::abc_138:

[ثامر أبو بلقيس]

-----------------------------------------------------
بسم الله الرحمن الرحيم

بارك الله فيك استاذنا الكريم

كود من الصعب الوصول له
احد اكواد ابوبلقيس الحصرية

موفق بإذن الله ... لك مني أجمل تحية .

:abc_138::abc_138:

مرور عطر أستاذنا الطيب :abc_138: تقديري :abc_138:

[أبو يوسف]

نقاش أخوي رائع سيؤدي حتما إلى إكتساب مزيد من العلم والمعرفة لتسخير ذلك لأجل الدين

بارك الله بكم جميعا :abc_028: