Discussione:
Inserire nuovo record con valore id scelto da un altra maschera
(troppo vecchio per rispondere)
Miozzo Maurizio
2005-09-10 20:43:57 UTC
Permalink
Buona sera a tutti.
Access 2000 e VBA
ho 2 maschere che chiamerò FormOk e FrmBevande.
la maschera FormOk contiene una sottomaschera che chiamero MaskDettOrdi.
nella maschera FormOk ho un pulsante con cui apro la maschera FrmBevande
che contiene una lista di bevande(LstBevande).
io dovrei facendo click su una voce della lista ,inserire un nuovo record
nella sottomaschera MaskDettOrdi.
passo il codice:
Private Sub LstBevande_Click()
'non riesco ad aggiungere un nuovo record
Forms!formok!MaskDettOrdi!AddNew '................Questo non mi
funziona
'Da qui in poi tutto OK
Forms!formok!MaskDettOrdi!CmbIdPietanza = Me.LstBevande.Column(0)
Forms!formok!MaskDettOrdi!CmbIdPietanza.Requery
DoCmd.Close
End If
End Sub

Dove sbaglio ???

se qualcuno mi può spiegare come fare lo ringrazio in anticipo
Buona Domenica a tutti
Maurizio
Roberto dalla campagna
2005-09-11 08:20:00 UTC
Permalink
Post by Miozzo Maurizio
Buona sera a tutti.
Access 2000 e VBA
ho 2 maschere che chiamerò FormOk e FrmBevande.
la maschera FormOk contiene una sottomaschera che chiamero MaskDettOrdi.
nella maschera FormOk ho un pulsante con cui apro la maschera FrmBevande
che contiene una lista di bevande(LstBevande).
io dovrei facendo click su una voce della lista ,inserire un nuovo record
nella sottomaschera MaskDettOrdi.
Private Sub LstBevande_Click()
'non riesco ad aggiungere un nuovo record
Forms!formok!MaskDettOrdi!AddNew '................Questo non mi
funziona
'Da qui in poi tutto OK
Forms!formok!MaskDettOrdi!CmbIdPietanza = Me.LstBevande.Column(0)
Forms!formok!MaskDettOrdi!CmbIdPietanza.Requery
DoCmd.Close
End If
End Sub
Dove sbaglio ???
se qualcuno mi può spiegare come fare lo ringrazio in anticipo
Invece di:

Forms!formok!MaskDettOrdi!AddNew

prova con:

Forms!formok!MaskDettOrdi.SetFocus
DoCmd.GoToRecord , , acNewRec
Post by Miozzo Maurizio
Buona Domenica a tutti
Buona domenica a te.
Post by Miozzo Maurizio
Maurizio
--
Roberto

-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Miozzo Maurizio
2005-09-11 08:41:41 UTC
Permalink
Post by Miozzo Maurizio
Post by Miozzo Maurizio
Buona sera a tutti.
Access 2000 e VBA
ho 2 maschere che chiamerò FormOk e FrmBevande.
la maschera FormOk contiene una sottomaschera che chiamero MaskDettOrdi.
nella maschera FormOk ho un pulsante con cui apro la maschera FrmBevande
che contiene una lista di bevande(LstBevande).
io dovrei facendo click su una voce della lista ,inserire un nuovo record
nella sottomaschera MaskDettOrdi.
Private Sub LstBevande_Click()
'non riesco ad aggiungere un nuovo record
Forms!formok!MaskDettOrdi!AddNew '................Questo non mi
funziona
'Da qui in poi tutto OK
Forms!formok!MaskDettOrdi!CmbIdPietanza = Me.LstBevande.Column(0)
Forms!formok!MaskDettOrdi!CmbIdPietanza.Requery
DoCmd.Close
End If
End Sub
Dove sbaglio ???
se qualcuno mi può spiegare come fare lo ringrazio in anticipo
Forms!formok!MaskDettOrdi!AddNew
Forms!formok!MaskDettOrdi.SetFocus
DoCmd.GoToRecord , , acNewRec
Post by Miozzo Maurizio
Buona Domenica a tutti
Buona domenica a te.
Post by Miozzo Maurizio
Maurizio
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Non mi funziona.....
O meglio il setFocus mi funziona, ma non si sposta sulla riga del
NuovoRecord.
Grrr....
Maurizio
Roberto dalla campagna
2005-09-11 16:15:13 UTC
Permalink
Post by Miozzo Maurizio
Post by Miozzo Maurizio
Post by Miozzo Maurizio
Buona sera a tutti.
Access 2000 e VBA
ho 2 maschere che chiamerò FormOk e FrmBevande.
la maschera FormOk contiene una sottomaschera che chiamero
MaskDettOrdi.
Post by Miozzo Maurizio
Post by Miozzo Maurizio
Post by Miozzo Maurizio
nella maschera FormOk ho un pulsante con cui apro la maschera FrmBevande
che contiene una lista di bevande(LstBevande).
io dovrei facendo click su una voce della lista ,inserire un nuovo record
nella sottomaschera MaskDettOrdi.
Private Sub LstBevande_Click()
'non riesco ad aggiungere un nuovo record
Forms!formok!MaskDettOrdi!AddNew '................Questo non mi
funziona
'Da qui in poi tutto OK
Forms!formok!MaskDettOrdi!CmbIdPietanza = Me.LstBevande.Column(0)
Forms!formok!MaskDettOrdi!CmbIdPietanza.Requery
DoCmd.Close
End If
End Sub
Dove sbaglio ???
se qualcuno mi può spiegare come fare lo ringrazio in anticipo
Forms!formok!MaskDettOrdi!AddNew
Forms!formok!MaskDettOrdi.SetFocus
DoCmd.GoToRecord , , acNewRec
Post by Miozzo Maurizio
Buona Domenica a tutti
Buona domenica a te.
Post by Miozzo Maurizio
Maurizio
--
Roberto
Non mi funziona.....
O meglio il setFocus mi funziona, ma non si sposta sulla riga del
NuovoRecord.
Grrr....
A fronte dell'evento "Su clic" della casella di riepilogo che si trova su
FrmBevande esegui una query di inserimento nella tabella che è origine
record della sottomaschera inserendo come chiave esterna il valore della
chiave primaria del record corrente della maschera FormOk e come IdPietanza
il valore della prima colonna della casella di riepilogo, quindi esegui il
requery della sottomaschera con

Forms!FormOk!MaskDettOrdi.Form.Requery

D'altra parte se Maometto non va alla montagna bisogna provare a portare la
montagna a Maometto.
Post by Miozzo Maurizio
Maurizio
--
Roberto

-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Loading...