Newsgroup: it.comp.appl.access
Titolo: test aggiornamento record

Ciao a tutti; vorrei effettuare un test per capire se effettivamente un
record è stato modificato o semplicemente l'utente ha dato una scorsa ai
dati senza effettuare modifiche al record. Come si puo' fare?
grazie
Francesco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Hai almeno 2 possibilità:
1)Intercettare l'Evento After_Update che viene scatenato solo in seguito a
modifica.
2)Verificare la proprietà Dirty di Form, oppure se usi A>97 anche l'Evento
OnDirty.
Poi come attualizzare il tutto dipende da che gestione ne vuoi fare....!
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


Voglio fare questo test per aggiornare un campo con la data dell'ultima
modifica, che in seguito uso per esportate i dati in un range di date (da
xx/xx/xxxx a yy/yy/yyyy).
Quindi il test dovrebbe essere:
se il record corrente è stato modificato, aggiorna il campo data, altrimenti
lascia invariato
ciao
F


 F
In che Tabella è il Campo Data da aggiornare.....???
Se nella stessa tabella allora ti conviene su evento OnDirty mettere
ME.DataUpdate=Now()
Se hai una tabella separata allora devi scrivere 2 righe di codice
oppure eseguire una Qry UPDATE sul campo Data relativo...!!



il campo data è nella stessa tabella; scusami ma non ho capito dove inserire
il test sul record
grazie
Francesco


 Francesco
Il fatto che il Campo sia nella Stessa tabella non ti aiuta, ma
si puň fare:
La Form ha una serie di Eventi, tra questi esistono:
Private Sub Form_DataChange(ByVal Reason As Long)
    'Inserisci quě la registrazione
End Sub
Private Sub Form_Dirty(Cancel As Integer)
  'Inserisci quě la registrazione
End Sub
Private Sub Form_Timer()
 'Inserisci quě la registrazione
End Sub
'Per questo imposta un Tempo di Timer=250ms
Tutte dovrebbero funzionare, ma devi provare quella
che da migliori garanzie...!
Se invece volessi usare l'After_Update rischieresti
di entrare in LOOP....!
Ciao-


Ho provato così e sembra funzionare:
Private Sub Form_Dirty(Cancel As Integer)
If Me.Dirty = False Then
Me.dataultmodif = Now()
End If
End Sub
che ne pensi?
ciao
F



Smentisco......mentre vado avanti con lo scorrimento dei records
all'improvviso mi chiude tutto, maschere e db
sigh!!!!!!!!!!!!



Scusa, se l'utente sta scorrendo i record non effettua nessuna modifica. Al
contrario, appena l'utente modifica un valore di qualsiasi controllo sulla
maschera su scatena l'evento "prima di inserire" poi all'atto della
registrazione si scatena "prima di aggiornare" in quel caso (a mio avviso)
dovresti impostare la nuova data...
Ciao.
--
Sergio MAZZA

 ha
scritto:

Scusami per la precarietą della risposta; in realtą mi sono reso conto che
la sub funziona, ma siccome ad un certo punto mentre scorrevo i records ho
notato che si chiudeva all'improvviso tutto ed io avevo imputato a questa
sub l'errore ed invece mi sono reso conto che la chiusura era dovuta
all'accesso ad un collegamento ad una immagine esterna che ho nella
maschera......mah! Altro mistero
