Newsgroup: it.comp.appl.access
Titolo: gestione errori

Salve gente, ho un problema da esporvi:
Ho due tabelle relazionate ed una query da codice che elimina un campo in 
una delle due tabelle, fortunatamente essendo relazionate non mi fà svolgere 
l'operazione dicendomi:
"impossibile eliminare 1 record nella query di eliminazione a causa di 
violazioni di chiave e 0 record a causa di violazioni di condivisioni."
Il problema è che vorrei sostituire questo messaggio coc un'altro più 
specifico e con  on error go to no funziona, baypassa la gestione errori e 
mi manda sempre il messaggio di errore.
Spero di essere stato chiaro ma se volete vi posto anche il codice.
Dove sbaglio?
Saluti Andrea 

 ha scritto nel messaggio 
news:44cde404$0$30237$4faf...@reader1.news.tin.it...

Nel voler continuare a cancellare prima il record padre e poi i figli.
Crea due query di eliminazione che eseguirai in sequenza, prima 
l'eliminazione dei figli e poi del padre. Gestisci l'evento "prima di 
conferma eliminazione" e li ci metti il msgbox e le due query...
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:eakq23$uiu$1...@area.cu.mi.it...

Ciao Sergio, avevo capito che succedeva quello che tu mi hai spiegato ed io 
il msgbox l'ho già messo, però l'utente distratto che conferma 
l'eliminazione vorrei che avesse un mio messaggio e non riuscisse comunque 
ad eliminare il record.
Vi posto il codice:
Private Sub Elenco46_DblClick(Cancel As Integer)
On Error GoTo errore
If MsgBox("Vuoi eliminare il PLOTTER selezionato?", vbQuestion + vbYesNo, 
"Cancellazione PLOTTER") = vbYes Then
    DoCmd.RunSQL "INSERT INTO plottertipo ( idplotter, nomeplotter, 
idmarcaplotter, costoavviamentostampa, costoavviamentotaglio, 
costoavviamentostampaetaglio, risoluzione, costotagliometro, 
costostampametro, costostampatagliometro, scartolatodx, scartolatosx, 
scartofinale, scartoiniziale, larghezzamax, taglio, stampa ) SELECT 
plotterusato.idplotter, plotterusato.nomeplotter, 
plotterusato.idmarcaplotter, plotterusato.costoavviamentostampa, 
plotterusato.costoavviamentotaglio, 
plotterusato.costoavviamentostampaetaglio, plotterusato.risoluzione, 
plotterusato.costotagliometro, plotterusato.costostampametro, 
plotterusato.costostampatagliometro, plotterusato.scartolatodx, 
plotterusato.scartolatosx, plotterusato.scartofinale, 
plotterusato.scartoiniziale, plotterusato.larghezzamax, plotterusato.taglio, 
plotterusato.stampa FROM plotterusato WHERE (((plotterusato.idplotter) = 
Elenco46))ORDER BY plotterusato.nomeplotter;"
    DoCmd.RunSQL "Delete plotterusato.idplotter, plotterusato.nomeplotter, 
plotterusato.costoavviamentostampa, plotterusato.costoavviamentotaglio, 
plotterusato.costoavviamentostampaetaglio, plotterusato.risoluzione, 
plotterusato.costotagliometro, plotterusato.costostampametro, 
plotterusato.costostampatagliometro, plotterusato.scartolatodx, 
plotterusato.scartolatosx, plotterusato.scartofinale, 
plotterusato.scartoiniziale, plotterusato.larghezzamax, plotterusato.taglio, 
plotterusato.stampa FROM plotterusato WHERE 
(((plotterusato.idplotter)=Elenco46))"
End If
    Elenco46.Requery
    Elenco44.Requery
    Me.Requery
    Exit Sub
errore:
MsgBox "non puoi eliminarmi appartengo ad un preventivo"
Exit Sub
End Sub
Saluti Andrea 

 ha scritto nel messaggio 
news:44cdf35d$0$15863$4faf...@reader2.news.tin.it...

Come ti ho spiegato, gestisci l'evento della form "prima di conferma 
eliminazione" e ci inserisci il tuo codice...
Ciao.
-- 
Sergio MAZZA 

 eliminazione" e ci inserisci il tuo codice...
Non avevo mai visto che si poteva gestire tutte quelle cose sulla maschera, 
stasera provo a fare come mi hai detto.
Grazie per ora se poi non riesco domani Vi ri-stresso :)
Saluti Andrea