Newsgroup: it.comp.appl.access
Titolo: passare dati da una list box ad un'altra..

.. è quello che cerco di fare.
La prima listbox ha come origine una tabella e la seconda è quella dove devo
registrare i dati stessi selezionati.
Ho provato in proprio ma ho bisogno di aiuto visto che (come spesso mi
accade..)non sono riuscito a combinare un bel nulla
grazie
BC

 ha scritto nel messaggio 
news:43ce4e7c$0$328$5fc...@news.tiscali.it...

Prendi una carta dagli imprevisti e passa al "sitocomune" 
(
www.sitocomune.com
); c'è un esempio di quello che vuoi fare:
Sezione Forms - 3.23 Trasferire righe tra due listbox
Ciao.
-- 
Sergio MAZZA 

no, conoscevo già l'esempio però non riesco a capire cos'è che al doppio
click su di una listbox determina al'aggiunta sulla seconda.. scusate ma mi
sono ingarbugliato sul SQL: qual'è la proprietà cioè che viene usata per
aggiungere il record sulla seconda.
nel mio tentativo più riuscito la cosa funziona, ma NON aggiunge il record
ma lo sostituisce a quello corrente nella seconda.
ancora grazie
BC

 ha scritto nel messaggio 
news:43ce752c$0$348$5fc...@news.tiscali.it...

Non è una proprietà ma è l'esecuzione di una istruzione SQL Insert Into e 
nell'esempio c'è anche descritto il come.
Quindi o invii il tuo codice descrivendo quello che fai o devi confrontarti 
con l'esempio...
Ciao.
-- 
Sergio MAZZA 


Allora, il codice non c'è perchè sto cercando di scriverlo...
Comunque: tldegenti (i ricoverati in un reparto) in relazione con tbldate
(contiene l'id di connessione e il campo Data), la tblEsamidiLaboratorio
(cioè l'lenco degli esami che ogni paziente deve fare ogni giorno..)
Sono una Form Nonna(frmdegenti) che contiene una subform figlia (frmdate)
che a sua volta contiene una subform nipote frmesamidilaboratorio.
in quest'ultima sono presenti due listbox (una contiene l'elenco degli esami
disponibili in laboratorio, l'altra al dblclick deve ricevere gli esami
selezionati nella prima
Pino pallino il giorno 12/12/2006 farà :emocromo,glicemia ecc..
non so se sono stato chiaro...
ma .. ci ho provato
BC

 BC
Ora è un po' più chiaro; tranne la maschera "Nonna" ma possiamo 
soprassederci (poveraccia!).
Il funzionamento dell'esempio di LBO prevede (se apri la tabella 
dell'esempio) nella tabella con l'elenso degli esami (es.) "tbElencoEsami" 
un campo "selezionato" di tipo sì/no (booleano) con valore predefinito a 0 
(zero = No).
L'unica modifica che devi fare è la registrazione nella tabella 
"tblEsamidiLaboratorio" degli esami che hanno il campo "selezionato" = -1 
(sì, true) e lo fai con una query di inserimento;
es.
Insert into tblEsamidiLaboratorio (esameDaFare) select esame from 
tbElencoEsami where selezionato = -1;
La registrazione degli esami da fare avverrà tramite la pressione di un 
bottone che esegue il metodo RunSQL (vedi help attivabile con ALT-F11, poi 
F1);
es.
'---
on error goto errori
if Dcount("selezionato","tbElencoEsami,"selezionato = -1")>0 then '<-- se ce 
ne sono di selezionati
    DocmdSetwarnings false
    DoCmd.RunSQL "Insert into tblEsamidiLaboratorio (esameDaFare) select 
esame from tbElencoEsami where selezionato = -1;
    DocmdSetwarnings true
'--> poi qui magari azzeri la selezione appena inserita
end if
exit sub
errori:
DocmdSetwarnings true
msgbox err.number & " " & err.description
'---
Ciao.
-- 
Sergio MAZZA