Newsgroup: it.comp.appl.access
Titolo: Impostare data su apertura db

Buongiorno a tutti.
In seguito al mio post "accettare data solo se del mese corrente" per chi 
l'avesse letto, ho pensato che sarebbe pi� utile per le mie esigenze 
impostare IO all'apertura del db la data di now.
Perch� per es oggi 03/08, ho delle difficolt� a registrare le ft di Luglio 
avendo indicato questo nella data di registrazione iva
If Month([REGISTRAZIONE IVA]) <> Month(Date) Or Year([REGISTRAZIONE IVA]) <> 
Year(Date) Then MsgBox "Data fuori periodo IVA"
quindi avrei preferito dire al db che oggi � ancora il 31/07....
Suggerimenti?
-- 
Giorgia 



 Giorgia
Puoi mettere Date() o Now () come valore predefinito del text box (ti
funziona, però, solo se il record è nuovo e non se è già esistente e
deve essere aggiornato).
Altrimenti puoi fare in modo che il warning rimanga tale e non ti
impedisca di inserire mesi diversi dall'attuale.
Ancora, potresti accettare il mese precedente:
If Month([REGISTRAZIONE IVA]) = Month(Date)-1  then
ok = MsgBox  ("Registrazione mese precedente, confermi ?", vbyesno)
if ok <> vbyes then
..... fai quello che vuoi...
exit sub            'devi uscire per evitare il secondo controllo
endif
' poi passi al controllo della data
If Month([REGISTRAZIONE IVA]) <> Month(Date) Or Year([REGISTRAZIONE
IVA]) <>
Year(Date) Then MsgBox "Data fuori periodo IVA"
Prova se ti funziona .
Ciao.
Alberto


Posto che questo � un problema che ti aveva gi� rilevato BFS nel post a cui 
ti riferisci, al posto tuo seguirei il suo suggerimento. Cambiare la data 
del computer mi sembra una pessima idea, finiresti sicuramente con combinare 
casini nelle registrazioni.
Piuttosto segui la strada indicata a mio parere in questo modo:
una tabella in cui metti mese ed anno del periodo IVA ed un campo chiuso o 
no. poi i confronti li fai con quel valore, cos� il messaggio fuori periodo 
lo puoi lasciare, tipo IVA luglio il mese 6 per < te lo segnala, poi se vuoi 
aggiungi un confronto > per non permettere la registrazione di fatture di 
agosto fino alla chiusura del periodo 7.
Al contrario imbrogliando il computer sul mese in cui stai lavorando rischi 
di registrare fatture di agosto in luglio senza accorgertene.
Se invece vuoi proprio modificare la data con cui registri all'apertura, 
allora non usare quella del computer ma una che salvi in tabella o variabile 
quando accedi e fagli mettere quella come data di registrazione aggiungendo 
per� un campo ulteriore con data effettiva per poter risalire ai casini che 
puoi fare.
Ad un computer poi chiedere molto ma non di correggere gli errori che 
volutamente gli facciamo fare.
Ciao, Valerio.


ciao, Giorgia 

 Giorgia
Puoi mettere Date() o Now () come valore predefinito del text box (ti
funziona, per�, solo se il record � nuovo e non se � gi� esistente e
deve essere aggiornato).
Altrimenti puoi fare in modo che il warning rimanga tale e non ti
impedisca di inserire mesi diversi dall'attuale.
Ancora, potresti accettare il mese precedente:
If Month([REGISTRAZIONE IVA]) = Month(Date)-1  then
ok = MsgBox  ("Registrazione mese precedente, confermi ?", vbyesno)
if ok <> vbyes then
..... fai quello che vuoi...
exit sub            'devi uscire per evitare il secondo controllo
endif
' poi passi al controllo della data
If Month([REGISTRAZIONE IVA]) <> Month(Date) Or Year([REGISTRAZIONE
IVA]) <>
Year(Date) Then MsgBox "Data fuori periodo IVA"
Prova se ti funziona .
Ciao.
Alberto
Grazie per le diverse alternative!
penso che la terza sia quella che pi� mi consenta di ottenere quello che 
desidero e allo stesso tempo di controllare i possibili errori.
Buona giornata.
Giorgia