PDA

View Full Version : سوال: توالی تاریخ شمسی برای دفترچه اقساط



m0rteza2
چهارشنبه 15 تیر 1390, 23:24 عصر
سلام
من می خوام یک تاریخ شمسی به اکسس بدم و اکسس سررسید اقساط را به تاریخ شمسی از آن تاریخ مورد نظر مثلا برای یک سال 12 ماه یا 36 ماه یا بیشتر حساب کند . من با استفاده از کد زیر وتبدیل آن به جلالی با تابع j_jalaldate انجامش دادم ولی تاریخها برای چند ماه درست هستند و برای ماههایی که تعداد روزهای آنها در میلادی با شمسی مطابقت ندارد تاریخهای بدست آمده جلو عقب می شوند و مشکل دیگر اینکه باید به صورت بانکی تاریخها محاسبه شوند. (مثال در زیر)

DateSerial(Year([b1]),Month([b1])+1,Day([b1]))
b1 همان تاریخی هست که به صورت دستی وارد می کنیم و تاریخ بدست اومده رو دوباره تو همین فرمول می گذاریم


یک مثال :
1390/08/08
1390/09/08
1390/10/08
.....
از همه مهمتر

1390/05/31
1390/06/31
1390/07/30
1390/08/30
1390/09/30
1390/10/30
1390/11/30
1390/12/29
1391/01/31
یعنی روز 31 ماههای 31 روزه اگر به عنوان سررسید قرارداده شود در ماههای 30 روزه تبدیل به 30 و در اسفند تبدیل به 29 شود و دوباره از فروردین سال بعد 31 . و همینطور در ماههای 30 روزه اگر سررسید 30 شد در اسفند 29 و دوباره در فروردین سال بعد 30 شود. خواهش می کنم اگر module یا کدی (همراه با توضیح)در این مورد دارید دریغ نفرمایید . متشکرم

mehdi_fiz
جمعه 17 تیر 1390, 19:47 عصر
سلام دوست عزيز
شما از اكتيويكس آقاي پيروز مهر كه براي تبديل تاريخ نوشته شده است استفاده كنيد براي اين كار تابع دارد و كار با آن خيلي راحت است و همچنين فايل راهنما و توضيح كامل دارد

http://cpsd.ir/forum/forumdisplay.php?fid=5
موفق باشيد

m0rteza2
دوشنبه 20 تیر 1390, 20:36 عصر
با تشکر از پاسخی که دادید
من pdc رو دانلود و نصب کردم حالا چطور ازش استفاده کنم ، توی قسمت ActiveX , ocx هم آموزشی پیدا نکردم که چطور اکتیو اکس رو در اکسس رجیستر کنم فقط گفتن باید رجیستر بشه . اگر ممکنه لینکی از آموزش رجیستر کردن ActiveX بزارید و اینکه از چه تابعی استفاده کنم . متشکرم

Zero Defect
دوشنبه 20 تیر 1390, 23:13 عصر
سلام

در خصوص رجیستر کردن PDC شما وقتی که فایل Setup رو اجرا کردید , فایل دیگه به صورت رجیستر شده در اومده و شما تنها باید اقدام به اضافه نمودن و فعال سازی رفرنس اون در داخل برنامه مورد نظرتون کنید

ضمن اینکه در خصوص نحوه رجیستر نمودن دستی یک اکتیو ایکس هم در داخل فایل راهنما توضیحات لازم داده شده ( به بخش انتشار اکتیو ایکس رجوع کنید )

مسیر زیر رو طی کنید


Tools>Macro>Visual Basic Editor>Tools>References


از داخل صفحه باز شده اقدام به انتخاب گزینه CPSD PDC کنید ( تیک کنار اون رو بزنید ) در این حالت رفرنس به برنامه شما متصل میشه

در داخل PDC , تابعی که اقدام به اضافه/کم نمودن تاریخ میکنه هم AddToDate هستش

جهت اطلاع از نحوه کد نویسی هم به فایل کمک و مثال موجود به همراه پکیج رجوع کنید

خدانگهدار

Zero Defect
چهارشنبه 22 تیر 1390, 22:01 عصر
سلام m0rteza2

ضمن تشکر از دوستم جناب آقای فیض آبادی که علاوه بر اینکه یکی از استفاده کنندگان پر و پاقرض اکتیو ایکس Persian Date Converter هستند , ضمناً اقدام به معرفی و توصیه اون به این دوستمون فرمودن

شایسته دیدم نمونه ای رو برای دوستان آماده کنم تا ضرب شستی کوچک به مخالفان استفاده از اکتیو ایکسها نشون داده بشه و مهر تاییدی بخوره بر توصیه دوستمون مبنی بر استفاده از PDC و صد البته در خور و شایسته معرفی یکی از توانمندیهای این اکیتو ایکس

تصویر نمونه رو برای شما قرار میدم , که نشان از انطباق صد درصد اون با خواسته شما داره ( به تاریخها توجه کنید ) :


http://www.cpsd.ir/MyResource/images/training/PDC_Aghsat%20Shots.png


آگر میخواید بدونید Persian Date Converter (http://cpsd.ir/pdc.asp) چگونه تنها و تنها با دو خط کدنویسی !!! به وظیفه خودش عمل میکنه , نمونه رو دانلود کنید

برای دانلود اون وارد این بخش بشید (http://cpsd.ir/forum/showthread.php?tid=77)

دوست من m0rteza2

معمولا برنامه نویسان سنتی و کسانی که در مقابل تغییر مقاومت میکنند ( یک خصلت بارز اکثر هموطنان در تمامی اموز زندگی ) , به سادگی نمی پذیرند رویه های فعلیشون رو تغییر بدند و به سمت الگویی توانمند تر مهاجرت کنند

در واقع این طیف افراد حاضر نیستند که خودشون رو با آهنگ تغییرات همساز کنند حتی اگر به نفعشون باشه , نتیجه کاملا واضحه این طیف افراد در لابلای کتابهای گرد گرفته و محفوظات قدیمی خودشون به فراموشی سپرده خواهند شد , شما سعی کنید جزو اون گروه نباشید البته تصمیم گیرنده نهایی به قطع خود شما هستید

به هر حال لازمه تغییر هم صرف زمان و تلاش هستش که این امر به تناسب تغییر مورد نظر متفاوت هستش , زمانی شما تصمیم میگیرید که از حالت نشسته به ایستاده تغییر وضعیت بدید ( 2 ثانیه ) و زمانی هم به طور نمونه میخواید با اصول استفاده از اکیتو ایکسها آشنا بشید که نیازمند صرف زمان تقریبی بین یک ساعت الی دو ساعت هستش ( حداکثر )

تغییر و پذیرش اون لازمه پیشرفت و حفظ توانمندی هستش

در خصوص اکتیو ایکسها هم مقاله ای تنظیم شده که به مرور تکمیل میشه این مقاله به شما میتونه دیدی کامل در خصوص چیستی اکتیو ایکسها بده , که PDC یکی از اعضای کوچک این خانواده بسیار بزرگ و متنوع هستش ( لینک مقاله (http://www.cpsd.ir/forum/showthread.php?tid=72))

موفق باشید