Newsgroup: it.comp.appl.access
Titolo: che diavolo di errore è

Sull'evento prima di aggiornare di una maschera ho inserito un semplice
MsgBox
e mi ritorna il seguente errore:
"L'espressione prima di aggiornare immessa come impostazione della proprietà
di evento ha provocato il seguente errore: Non valido all'esterno di una
routine."
se invece del msgbox uso un qualsiasi altro comando (anche in un altro
evento della maschera o dei controlli) il messaggio è sempre lo stesso.
Ma che diavolo di errore è?

 routine."
Posta il codice.
Sib


OK ma ... non so se possa essere d'aiuto:
__ __ __
Private Sub Società_AfterUpdate()
On Error GoTo err_mio
MsgBox ("ciao")
err_mio:
    MsgBox Err.Description
    Resume Exit_pul_cliente_Click
End Sub
----------
So che è di una stupidità allucinante ma prima di infilarmi nella
costruzione del vero codice volevo capire il perché dell'errore!!

 ----------
E' untile, e' utile.
In questa Sub l'uso che fai della funzione msgbox e' sbagliata. Devi
scrivere:
MsgBox "Ciao"
Senza le parentesi, che invece si usano quando la msgbox deve restituire un
valore.
Sib

 costruzione del vero codice volevo capire il perché dell'errore!!
Questa pero', non e' la gestione dell'evento 'Prima di aggiornare'!!!
ma c'e' comunque un errore:
l'etichetta Exit_pul_cliente_Click non esiste
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


ok corretto!
ma ... IDEM con PATATE!!
e poi come dicevo non č il MsgBox il problema (l'ho messo solo per fare
delle prove) qualsiasi istruzione io scriva il messaggio č lo stesso
(possibile che io le abbia scritte tutte in modo errato???)

 ha scritto nel messaggio
news:3BB06292...@sitocomune.com...

Hai ragione:
come dicevo ho fatto varie prove e ne ho incollata una d'esempio

 ma ... IDEM con PATATE!!
Ma il resume che hai messo nella tua istruzione non fa riferimento ad alcuna
label.
Prova a togliere tutta la riga resume.
Sib

 > > > > routine."
CUT
Ritornando alla tua indicazione iniziale, hai fatto un compila e salva tutti
i moduli?
Cosa hai messo nell'evento "Prima di aggiornare"?
Sib

 come dicevo ho fatto varie prove e ne ho incollata una d'esempio
oh, ma l'errore si riferisce a qualcosa nella gestione dell'evento
prima di aggiornare, ergo, se non posti quella e' difficile
indovinare cosa c'e' scritto in quella routine!!!!!!!!!!!


 Private Sub Società_AfterUpdate()
 On Error GoTo err_mio
 MsgBox ("ciao")
EXIT SUB   ;-)
 err_mio:
     MsgBox Err.Description (se non c'è errore, e invocato comunque, dice
fesserie)
 End Sub

Ahhhhhhhhhhhhhhhhh!!!!!!!!!!!!!!!!!!!!!!!
Baci Baci......
la compilazione dei moduli mi ha evidenziato la linea con l'errore.....
avevo voglia a cercare l'errore provando tutti gli eventi possibili,
l'errore stava piu' in alto, molto piu' in alto (visivamente intendo!!):
guarda cosa c'era scritto nelle prime 3 righe del Class Module
Option Compare Database
Option Explicit
End Sub                                <==
Vi assicuro che non so come ci è arrivato quell' End Sub
(anche perchè all'inizio la prima routine l'ha aggiunta Access tramite una
autocomposizione e già mi dava l'errore....mahhh)
1000 e 1000 grazie Sib
e grazie anche a tutti gli altri