Newsgroup: it.comp.appl.access
Titolo: Rieccomi :-)

ciao esperti, mi trovo davanti ad un nuovo problema.
in una maschera ho la possibilità di scegliere tramite casella combinata la
banca che voglio utilizzare, vorrei che cliccando sulla banca desisterata
devono automaticamente riempirsi le tre caselle di teso sottostanti che
contengono ABI, CAB e numero di CC (quindi sono tutti numeri). Spero in un
vostro aiuto!! GRAZIEEEE!!!

 ha scritto nel messaggio
news:NY579.216837$Jj7.5...@news1.tin.it...

Uno dei modi sarebbe : query
- Hai due tabelle una sarà....mhm.... quella dei clienti, l'altra , a naso,
quella delle banche con campi del tipo : IDBanca, NomeBanca, NomeFiliale,
..., ABI, CAB
- Nella query selezioni i tuoi dati dalla prima tabella tra cui ci sarà (
immagino io ) il riferimento al IDBanca ( chiave esterna della prima
tabella ) e dalla seconda ABI, CAB..(IDBanca ovviamente sarà la chiave
primaria della seconda tabella)
Per essere esplicito eccoti un es.
Tabella1:                    |   Tabella2:
IDCliente                   |   IDBanca ( c. primaria )
NomeCliente              |      .
   .                              |     .
   .                              |   ABI
IDBanca (c. esterna)   |  CAB
-----------------------------------------------
SQL
SELECT  Tabella1.IDCliente, Tabella1.NomeCliente, ...., Tabella1.IDBanca,
...,Tabella2.ABI, Tabella2.CAB,....,
(.....);
- In teoria, se hai fatto le cose per bene, ad ogni nuovo inserimento nella
query dopo aver digitato l'IDBanca ( o aver scelto da un menù a tendina (
avendo impostato nella prima tabella1 IDBanca come casella di ricerca nella
tabella2)) dovrebbero comparire automaticamente ABI, ...  .
- La maschera a quel punto puoi farla sulla query.... e tutto questo siori
senza una riga di codice.
Ciao. Fabrizio.

 ha scritto nel messaggio
news:NY579.216837$Jj7.5...@news1.tin.it...

bene devi su afterupdate della casellacobminata creare un recordset della
tabella banche e poi cercare la banca interessata, dopodichè importare i
valori
esempio:
    Dim db As Database
    Dim rs As Recordset
    Set db = CurrentDb
    Set rs = db.OpenRecordset("select * from ComponentiBordaturaQ")
 Set rs = db.OpenRecordset("select * from tabellabanche
where([tabellabanche].=" & [Forms]![tuaform]![casellacombinata] & ")")
[Forms]![tuaform]![abi]=rs!abi
[Forms]![tuaform]![cab]=rs!cab
[Forms]![tuaform]![cc]=rs!cc
rs.Close
Set db = Nothing
ciao ciao. fammi sapere l'esito

 ha scritto nel messaggio
news:NY579.216837$Jj7.5...@news1.tin.it...

Per favore scrivi una richiesta con un oggetto più significativo
(descrivendo il problema); grazie.
Se hai una tabella "Banche" con campi "nomeBanca", "abi", "cab", "cc" una
soluzione protrebbe essere quella di associare alla casella combinata una
query che restituisca i campi: nomeBanca, abi, cab, cc. Nell'evento "dopo
aggiornamento" inserisci il codice:
'-------
if not isnull(me!nomeCasellaCombinata) then
    me!abi = me!nomeCasellaCombinata.Column(1)
    me!cab = me!nomeCasellaCombinata.Column(2)
    me!cc = me!nomeCasellaCombinata.Column(3)
end if
'-------
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:ajlhic$7tl$1...@canarie.caspur.it...



Ok; ma leggiti le regole di questo NG le trovi su 
www.sitocomune.com
,
Grazie.
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:ajo7lq$ris$1...@canarie.caspur.it...


 ok, grazie
Sigh! Non le hai lette...
Ciao.
--
Sergio MAZZA

 Sigh! Non le hai lette...
Sigh...
Antonio


Bentornato!
Ciao.
--
Sergio MAZZA

 Bentornato!
Grazie...
Il tempo passa, le ferie se ne vanno...ma i soliti comportamenti non
cambiano mai!!!
Antonio