PDA

View Full Version : بانک اطلاعاتی



shahriar22
پنج شنبه 23 فروردین 1386, 18:45 عصر
من یک بانک اطلاعاتی با استفاده از ویژوال بیسیک ساخته ام وچند فیلد در ان گذاشته ام ودر یک ان را dobble گذاشته ام می خواهم کاری کنم هروز اعداد ان کمتر شود برای مثال در گارانتی شرکت ها دو سال دیگر کارانتی اقای x تمام میشود که اگر این را به روز در اوریم می شود مثلا 620 روز من می خواهم کاری کنم فردا بشود 619 روز دیگر مهلت گارنتی ان فرد به پایان میرسد من قبلا این سوال را پرسیده بودم ولی شما با استفاده از تاریخ گفته بودید من با استفده از عدد را میخوهم

hesam_ezi
پنج شنبه 23 فروردین 1386, 19:06 عصر
سلام
شما می تونی یه عدد مثلا همون ٦٢٠ رو به فیلد عددی بدی بعد تاریخ ورود اون رو هم ذخیره
کنی و برای کم کردن عدد هم می تونی تاریخ ذخیره شده رو از تاریخ روز جاری کم کرده و عدد
بدست آمده رو از ٦٢٠ کم کنی.

shahriar22
پنج شنبه 23 فروردین 1386, 19:22 عصر
اقا اگر می شه برایم همین جا برنامش بنویسی

mahdyeh
سه شنبه 28 فروردین 1386, 16:12 عصر
ایشون راهنمایی کردن
دیگه برنامش رو باید خودتون بنویسید

mahdyeh
سه شنبه 28 فروردین 1386, 16:20 عصر
در ضمن کاری نداره که .
شما میتونید کسر تاریخ ها رو به روز نشون بدید .
مگه همین رو نمیخواید ؟

CodeMasterX
چهارشنبه 29 فروردین 1386, 00:43 صبح
همه حال و حول و کیف برنامه نویسی به خودیادگیریش هست!
شما میتونی با تابع DateDiff اختلاف روزها،ماه ها و یا سال ها و هفته های بین دو تا تاریخ رو بگیری،اینجوری می تونی با اجرا هر بار برنامه تعداد روزهای بین تاریخ امروز و تاریخ آخرین اجرا رو بگیری و نسبت به گارانتی و تاریخ کل عملیاتت رو انجام بدی.
برای استفاده از DateDiff و بدست آوردن روزهای بین دو تاریخ هم میتونی از این کد استفاده کنی:



Dim iDays As Integer
iDays = DateDiff ("d" , Format(Now,"mm/dd/yyyy") , Format(txtLastDate.Text,"mm/dd/yyyy"))

MsgBox "Days Between: " & iDays , vbInformation


اون "d" در تابع مشخص کننده این هست که Interval تابع روزها رو محاسبه کنه.