ارسال پاسخ 
 
امتیاز موضوع:
  • 12 رأی - میانگین امتیازات: 3.5
  • 1
  • 2
  • 3
  • 4
  • 5
ایجاد دفترچه اقساط به کمک تابع AddToDate
نویسنده پیام
CPSD Admin آفلاین
مدیر سایت
*******

ارسال‌ها: 177
تاریخ عضویت: تير ۱۳۸۹
اعتبار: 0
ارسال: #1
Information ایجاد دفترچه اقساط به کمک تابع AddToDate
ضمن سلام

به نظر میاد جهت بررسی اکتیو ایکس Persian Date Converter مناسب باشه به برخی توانمندیهای اون در قالب پاسخ دهی به سئوالات و مشکلات فرا روی برنامه نویسان در خصوص تاریخ هجری شمسی , نیم نگاهی داشته باشیم

Persian Date Conveter با تکیه بر تنها دو خط برنامه نویسی !! , قدرت خودش رو به رخ تمامی رقبای Open Source کنونی خودش میکشه تا جایگاهش رو به عنوان یکی از کاملترین مبدلهای تاریخ شمسی به اثبات برسونه

این دو خط به شرح زیر هستند :

کد:
Dim MyVar As New CPSD_PDC.CPSD_PersianDateConverter

جهت معرفی و بارگذاری اکتیو ایکس و کد :

کد:
MyVar.AddToDate(txtFirstRpaymentDate, Mah, (Interval * i), EzafeKardan)

جهت استفاده از تابع AddToDate

در گذشته در خصوص رابطه مستقیم بین حجم کد نویسی موجود در یک فایل اکسس و احتمال تخریب فایل توضیحاتی در این مقاله درج شده بود , Persian Date Converter در این خصوص جایی برای بحث باقی نمیذاره

Persian Date Converter نه در تئوری , بلکه در عمل توانایی خودش رو در حل مسائلی که دیگر سورس کدهای عمومی که مورد استفاده کاربران بوده و ضمناً از حل اونها به صورت اصولی ناتوان هستند , به کاربران خودش نشون میده

در واقع در همین حال حاضر راه حلهای موجود در داخل این اکتیو ایکس راه حلهایی هستند که شاید در آینده به سورس کدهای موجود اضافه بشن

در مثال پیش رو به نحوه ایجاد یک دفترچه قسط و نحوه ایجاد توالی تاریخی پرداخت اقساط آشنایی لازم رو پیدا خواهید کرد

توضیح : Persian Date Converter یک پروژه رایگان و جهت استفاده عموم بوده ولیکن در صورت امکان نیم نگاهی به آخرین جمله مندرج در صفحه ابتدایی فایل کمک این اکتیو ایکس داشته باشید ( البته عمل به اون الزامی نیست و تنها در حد یک درخواسته )

فراموش نکنید عزیزانی که امروز اونها رو سالمند می نامیم , در گذشته همچون ما جوان بودند , همونطوری که ما هم در آینده سالمند نامیده خواهیم شد


[تصویر:  PDC_Aghsat%20Shots.png]



.zip  CPSD_PDC_AddTODate_1.zip (اندازه: 63.06 KB / تعداد دفعات دریافت: 619)

توضیح : در صورتی که اقدام به نصب Persian Date Converter ننموده اید , اقدام به بارگذاری و نصب این اکتیو ایکس نمایید ( لینک دانلود )

موفق باشید

لینک مقاله مرتبط

درگاه : وب سايت | فروشگاه | وبلاگ
۲۲ تير ۱۳۹۰ ۰۹:۰۸ عصر
مشاهده‌ی وب سایت کاربر یافتن تمامی ارسال‌های این کاربر نقل قول این ارسال در یک پاسخ
me_mohammadiyan آفلاین
تازه وارد
*

ارسال‌ها: 1
تاریخ عضویت: دي ۱۳۹۱
اعتبار: 0
ارسال: #2
RE: ایجاد دفترچه اقساط به کمک تابع AddToDate
باسلام
در صورتی که در هر ماه بخواهیم با توجه به تعداد نوبت های مشخص اضافه شود در این مثال چگونه باید عمل کرد
به عنوان مثال تعداد قسط 4 قسط در ماه (تقسیم در ماه)
1-1-90
9-1-90
17-1-90
25-1-90
۱۷ بهمن ۱۳۹۱ ۰۱:۵۱ صبح
یافتن تمامی ارسال‌های این کاربر نقل قول این ارسال در یک پاسخ
CPSD Admin آفلاین
مدیر سایت
*******

ارسال‌ها: 177
تاریخ عضویت: تير ۱۳۸۹
اعتبار: 0
ارسال: #3
Lightbulb RE: ایجاد دفترچه اقساط به کمک تابع AddToDate
ضمن سلام

سئوال شما دوست گرامی ارتباط چندانی با فعالیت این فروم نداره و در واقع مساله ای مجزا از اکتیو ایکس PDC هستش

علی ایحال توضیحات ذیل درج میشه , امیدوارم که مثمر ثمر واقع بشه :

هسته مرکزی در مثال موجود در بخش زیرین قرار داره :

کد:
For i = 0 To txtRepaymentAmount - 1
        rs.AddNew
        rs.Fields("AghsatName") = txtRepaymentName
        ' rs.Fields("RepaymentDate") = DateAdd("m", (Interval * i), txtFirstRpaymentDate)
        rs.Fields("RepaymentDate") = MyVar.AddToDate(txtFirstRpaymentDate, Mah, (Interval * i), EzafeKardan)
        rs.Fields("Value") = txtRepaymentValue
        rs.Update
    Next i

در این حلقه برنامه با گرفتن ورودیها اقدام به محاسبه تاریخ میکنه

در مثال فوق محاسبه اقساط بر مبنای توالی زمانی ماه در نظر گرفته شده

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

کد:
rs.Fields("RepaymentDate") = MyVar.AddToDate(txtFirstRpaymentDate, Rooz, (7 * i), EzafeKardan)

تنها خطی از برنامه که مرتبط با فعالیت این فروم هستش , تنها همین یک خط هستش

متاسفانه در صورتی که با مابقی خطوط با مشکل مواجه هستید , امکان پشتیبانی خاصی در این خصوص وجود نداره

قوانین فروم


موفق باشید

درگاه : وب سايت | فروشگاه | وبلاگ
۱۷ بهمن ۱۳۹۱ ۰۷:۲۹ عصر
مشاهده‌ی وب سایت کاربر یافتن تمامی ارسال‌های این کاربر نقل قول این ارسال در یک پاسخ
ارسال پاسخ 


پرش به انجمن:


‍CPSD.ir Website

وب سايت      |      وبلاگ      |      فروشگاه

 

Center Point SD - Software Developer

Yaldex PopUp