Newsgroup: it.comp.appl.access
Titolo: Aggiornamento campi di un subform con valore campo form

Ho un form con un campo data e vorrei aggiornate un equivalente campo data 
nella subform
I form sono legati com ecampo chiave per codice articolo
Dovrei gestire, eventualmente, il fatto che in prima battuta non ci sono 
record nel subform quindi se aggiorno in campo data del form principale non 
deve darmi l'errore
grazie

 ha scritto nel messaggio
news:_Bz6e.59260$zZ1.1...@twister1.libero.it...

Ciao Claudio,
non č chiarissimo quello che vuoi fare.
Tu hai un campo data nella maschera principale e un campo data nella
sottomaschera, vuoi che quando inserisci una data nella maschera principale,
la stessa data venga assegnata alla sottomaschera, ho capito bene?
E se cambi la data deve cambiare anche nella sottomaschera?
Se č cosě il dubbio che mi viene č: ma ti serve la data nella sottomaschera?
se č sempre uguale a quella contenuta nella maschera princičale sembrerebbe
ridondante.... se vuoi solo impostarla di default al valore contenuto nella
maschera principale, avendo poi la possibilitŕ di modificarla, potresti
mettere questa istruzione nell'evento Prima di Inserire della sottomaschera:
Me.DataSottomaschera = Me.Parent.Form.DataMascheraPrincipale
Ovviamente dovrai mettere i nomi corretti dei controlli...
Ciao
Cinzia

 wrote in message 
news:425adde9$0$8080$5fc...@news.tiscali.it...

Questa č l'istruzione messa nell'evento al cambio data del form
(data_validita_listino)
Mi cambia solo il primo record del sub_form
Form!Distinta_Base_Componente!Data_validita = Data_validita_listino
Se metto questa al variare del record del sub_form e modifico esempio la qta
mi aggiorna la data
Me!Data_validita =
Format(Forms![Distinta_Base_Header]!Data_validita_listino, "yyyy/mm/dd")
Pero' questo significa che devo aggiornare ogni rec del sub_form
Spero di essermi fatto capire
ciao


Ciao Claudio,
potresti lanciare una query di aggiornamento che vada a modificare le date
nei record contenuti nella sottomaschera al cambio della data nella maschera
principale:
DoCmd.Execute "update  tabella set  Data_validita_listino=#" &
me.Data_validita_listino &"#  Where [Cod_Articolo]=" & me.Cod_Articolo
me.Sottomaschera.Form.Requery
per aggiornare  i dati caricati nella sottomaschera con il nuovo valore
Saluti
Cinzia

 wrote in message 
news:425cd53a$0$11716$5fc...@news.tiscali.it...

Ho provato la tua istruzione adattandola ma mi dice che
compile error Method or data member not found
e si ferma su   = #" & Me.Data_validita_listino & "#
ciao 

 wrote in message 
news:425cd53a$0$11716$5fc...@news.tiscali.it...

Ho provato a sistemare l'istruzione cosi' pero' mi dice sintax error ma non 
riescoa trovarlo
Per il campo Me.Data_validita_listino  devo preoccuparmi di mettere
Format(Me.Data_validita_listino ,"yyyy/mm/dd") ?
 Dim SQL As String
 SQL = "UPDATE Distinta_Base_Componente " & _
 "SET Distinta_Base_Componente.Data_validita  #" & Me.Data_validita_listino 
& "# " & _
 "WHERE Distinta_Base_Componente.Codice_Articolo = " & Me.Codice_Articolo
 DoCmd.RunSQL SQL, False
ciao 

 wrote in message 
news:pof7e.44455$IN.8...@twister2.libero.it...

Son sempre io avevo dimenticato il segno di = nel SET
Come faccio a eliminare la finestrella di sistema che mi dice :"sto per
aggiornare numero 2 record accetti si/no"
?
ciao


Ciao Claudio,
DoCmd.Setwarning False
DoCmd.RunSQL SQL, False
DoCmd.Setwarning true
Ciao
Cinzia