Interrompere un ciclo If in un pulsante
[ Nouvelle discussion
| Répondre au groupe
|
it.comp.appl.access ]
Sujet: Interrompere un ciclo If in un pulsante
De: ohcieloa...@libero.it (Cristina Bernazzani)
Groupes: it.comp.appl.access
Organisation: [Infostrada]
Date: 22. Aug 2008, 14:38:11
|
Buongiorno
in una maschera Prodotti ho un pulsante di comando " Aggiorna" che si comporta
in modo strano:
If Me.Fiori = "Azalee" And Cons = True Then
Call AggiornaMagazzinoEntrata
End If
If Me.Fiori = "Azalee" And Vend = True Then
Call AggiornaMagazzinoUscita
End If
La function "AggiornaMagazzinoEntrata" ha due condizioni:
Nel caso A aggiorna il record prodotti, apre la maschera Magazzino, aggiorna il
record correlato Magazzino
Salva, Chiude maschera Magazzino e lascia aperta la maschera Prodotti.
Nel caso B aggiorna il record Prodotti, apre la maschera Magazzino e mi permette
di aggiornarla a mano.
Siccome ci sono alcuni valori nel Magazzino che vanno ad aggiornare il record
Prodotti mi trovavo nella fastidiosa situazione
di un messaggio di sistema che chiedeva una ulteriore "autorizzazione a salvare
un record (su tabella Prodotti) aggiornato da altro utente"
Per ovviare ho fatto un giochino di "salva-apri-e-salva-chiudi" tra le due
maschere e funziona tutto alla perfezione.
Tranne....quel codice sul pulsante " Aggiorna" che nel caso B, mi restituisce un
messaggio di sistema del tipo:
L'Oggetto a cui si fa riferimento nell'espressione è stato chiuso o eliminato.
Il debug mi porta qui:
If Me.Fiori = "Azalee" And Vend = True Then
Ovvio, penso io, la maschera è temporaneamente chiusa...ma perchè se si è
verificata la prima condizione ( e quindi la prima azione)
nel pulsante Aggiorna e niente e nessuno a fatto nuovamente Click sullo stesso,
mi va DOPO a verificare la seconda?
Come posso fare per interrompere il ciclo if?
O l'unica strada sono due pulsanti separati?
Grazie e ciao a tutti
Cristina

|
 cette fonctionnalité est reservée aux membres ayant une session active !
|