Newsgroup: it.comp.appl.access
Titolo: Forzare salvataggio nuovo record per inserimento record correlati

In relazione al mio database, devo poter inserire i numeri di telefono
direttamente da frmAggiungiUtente.
Il problema sorge nel momento in cui devo controllare se il record che
ho davanti è un record salvato oppure no; se non è salvato
l'integrità referenziale mi impedisce di aggiungere i numeri di
telefono.
La logica che ne ho tirato fuori è questa:
1. in frmAggiungiUtente clicco sul pulsante per aprire la maschera
AggiungiTelefono
2. la maschera contiene una routine che vede se il record è stato
salvato. se non è stato salvato ti chiede di salvarlo.
3.se
 clicchi su NO, semplicemente deve chiudersi la msgbox e tu devi
poter continuare con le tue operazioni
mentre se clicchi su SI deve essere eseguita la sub SalvaRecord()
4. se hai eseguito SalvaRecord() ti si deve infine aprire la maschera
per l'inserimento dei
numeri di telefono.
5. Quando hai inserito tutti i dati, all'uscita di frmAggiungiUtente,
poichè il record è già stato salvato, devi semplicemente uscire.
A scriverlo così è facile. A programmarlo, per me, un pò meno
perchè ad un certo punto mi perdo.
Come passo i parametri? A chi? Come rendere le variabili pubbliche?
Ecco il flusso logico che mi è venuto in mente.
1. sono in frmAggiungiUtente - clicco sul pulsante cmdAggiungiTelefono;
eseguo:
If Not RecordSalvato() Then
   If MsgBox("Stai cercando di assegnare dei valori ad un record non
ancora salvato. Salvare il record?",_
	& vbQuestion + vbYesNoCancel, "Salvataggio record") = vbYes Then
	SalvaRecord
	salvato = true
	DoCmd.OpenForm FormName:="frmTblTelefono", OpenArgs:=Me!idUtente,_
	& Wherecondition:="idUtente =" & Me!idUtente, windowmode:=acDialog
   Else
	Exit Sub
   End If
End If
_______________________________________________________________________________
Public Sub SalvaRecord()
	DoCmd.RunCommand acCmdSaveRecord
	Me.Requery
End Sub
RecordSalvato() è una funzione pubblica presente all'interno di un
modulo (deve essere di classe?)
modRecordSalvato
Public Function RecordSalvato()
	Dim salvato As Boolean
	salvato = False
End Function
Poi sul pulsante di uscita della frmAggiungiUtente, alla fine delle
operazioni un altro controllo per:
1. se il record non è stato salvato, chiedere di salvarlo
2. se è già stato salvato, uscire e basta
Ma non so come aggiustare il tutto. Come passare le variabili...le
function....
Mi potreste dare una mano per favore?
Grazie mille!

Grazie mille!
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

Ciao Rob....è tarda l'ora per rispondere ma prima non potevo :)
Ho mandato il database al sitocomune che credo gestisca anche tu,
perciò se lo hai visto avrai notato che inserire due sottomaschere
all'interno di frmAggiungiUtente incasinerebbe l'estetica della
finestra...
Sinceramente...voglio prima provare una serie di funzioni che mi son
venute in testa....se non vanno...vedremo cosa fare!!!
A presto!

Rob....ma che dico!!! Avevi perfettamente ragione!!!!
Ed io come al solito....
Basta creare due sottomaschere in modalità Maschera Continua, in cui
mostrare al max due record...far inserire li i numeri poi al limite
aggiungere un bottone per la visualizzazione del tutto :))))
Grazie per la dritta :)

Ho mandato il database al sitocomune che credo gestisca anche tu,
Non l'ho ancora visto: visiono la posta del webmaster solo una volta al mese
prima dell'aggiornamento del sito.
[CUT]
