ورود

View Full Version : انجام یک کار هر چند دقیقه یک بار



HamidVB
سه شنبه 20 مرداد 1383, 16:06 عصر
چگونه می توان کاری را هر چند دقیقه یک بار انجام داد.با کنترل تایمر خواستم این کار را انجام دهم ولی زمان آن را نمی توان بیش از 1 دقیقه تنظیم کرد.

mahe_zibaei
پنج شنبه 22 مرداد 1383, 02:58 صبح
mitoni az ontimer.....gosub estefade koni fekr konam
in baraname qbasic ro minvisam shaiad komaket kone
to ar sanie zamane system ro print migire

[b]cls
on timer(1) gosub timeupdate
timer on
$print "time:" ; time$
starttime=timer
do while timepast<10
timepast= timer -starttime
loop

end
timeupdate:
print "time: ";time$ ali

return

MM_Mofidi
دوشنبه 26 مرداد 1383, 10:48 صبح
از Scheduled Tasksاستفاده کن با input Parameter

H_r_m
دوشنبه 26 مرداد 1383, 15:02 عصر
سلام
میتونی تو همون تایمر زمان رو همان یک دقیقه تنظیم کنی سپس تو قسمت کدهای تایمر
از یه متغیر استفاده کنی
اینطوری که هر یک دقیقه متغیر رو چک میکنه اگر برابر 3 بود کار خاصی رو انجام میده و متغیر و هم صفر کنه اگه نه یک واحد به متغیر اضافه میکنه و الی اخر
امیدوارم متوجه شده باشید

H_r_m
دوشنبه 26 مرداد 1383, 15:06 عصر
البته منظورم از عدد 3 همان عدد دلخواهی است که شما میخواهید :متفکر:

mahdi_farhani
جمعه 30 مرداد 1383, 01:56 صبح
شما می توانید از تابع Api به نام GetTickCount استفاده کنید
این تابع طمان کار ویندوز را به میلی ثانیه نمایش میده
شما اول بیاید یک زمان اولیه را داخل یک متغییر بریز و برنامه ات را با استفاده از دستور DoEvents داخل یک حلقه بزار دستور Doevents از ایجاد وقفه داخل حلقه های جلوگیری میکنه و حالا یک شرز بزار که اگر زمان به زمان دلخواهت رسید کاری که می خواهی برات انجام بده.
موفق باشی. :wink: