[VB6] operazioni a determinati orari

[uomolupo]

Ciao a tutti, non sono molto esperto e quindi chiedo a voi, ho bisogno, in una applicazione, di far partire alcune operazioni a determinati orari, per sempio alle 9:10, alle 13:35, alle 14,40 etc.
Attualmente uso dei timer per "intercettare" l'ora giusta e tutto funziona come dovrebbe. In VBA esiste però l'istruzion Applicaton ontime .... e mi chiedevo se non ci fosse una cosa del genere anche in VB6. Forse vi farò inorridire per la domanda ma una istruzione del genere mi semplificherebbe non poco la vita.

Per fare un esempio oggi come oggi scrivo in un text box il valore 09:10 e leggendolo creo la variabile:

orainizio = Cdate(text1.text)

poi in un timer con interval 60000 scrivo

private sub timer2_timer()
dim currenttime as date

if abs(DateDiff("n", timevalue(now(), orainizio)) <=2 then
timer2.interval = 1000
end if

currenttime = Timevalue(now)
if currenttime >= orainizio then
timer2_timer.enabled = false
call miaroutine
end if


Vedete sistemi più "agili" ?
Grazie, ciao
uomolupo

[uomolupo]

Nessun commento ?
uomolupo

[gibra]

Non ti devi stupire.

Chiedendo:
1)

se in VB6 esiste una funzione come: Applicaton ontime di VBA

Presuppone che uno debba conosca VBA, ma quale versione di VBA?

2)

Vedete sistemi più "agili" ?

Cosa intendi per più agili?
Non sappiamo nemmeno cosa fa la tua

call miaroutine

Vorrei ricordarti che il codice dovrebbe contenere commenti per far capire a chi legge qual'è lo scopo che si prefigge. Non sempre il codice è sufficiente alla comprensione.

Ad esempio, perchè parti con un Interval a 60000 poi lo riduci a 1000 ?

Ciao

[uomolupo]

Originariamente inviato da gibra
Non ti devi stupire.

Chiedendo:
1)

Presuppone che uno debba conosca VBA, ma quale versione di VBA?

Questo non lo so , so solo che su excel 2002 lo programmavo

2)

Cosa intendi per più agili?
Non sappiamo nemmeno cosa fa la tua

call miaroutine

Vorrei ricordarti che il codice dovrebbe contenere commenti per far capire a chi legge qual'è lo scopo che si prefigge. Non sempre il codice è sufficiente alla comprensione.

Ad esempio, perchè parti con un Interval a 60000 poi lo riduci a 1000 ?

Agili visto dal punto di vista di un programmatore, la "miaroutine" è solo un esempio per indicare che, per esempio, alle 09:10 devono venire eseguite una serie di operazioni tra cui l'attivazione di un timer, l'assegnazione di alcuni valori a diverse variabili etc. Poi con quel timer ogni 5 minuti verranno fatte nuove operazioni. Il timer lo inizio con 60000 genericamente perchè non so a che ora lancio il programma, quando mi avvicino all'ora X lo riduco a 1000 per intercettare l'ora voluta con un errore inferiore al secondo.

Ciao

Ciao