Newsgroup: it.comp.lang.visual-basic
Titolo: filtrare record in base a controllo combo

Sono alle mie prime esperienze con VB e non riesco a filtrare un record
in una form sulla base di quanto scelto in un controllo combo. MI spiego
meglio:
Ho una form con un controllo data che fa riferimento a un db access e
una serie di controlli collegati allo stesso che mi visualizzano i dati
dei relativi campi della tabella del Db.
Vorrei che dopo avere scelto il nominativo del CLiente in un controllo
Combo tutti i campi della form visualizzino i dati relativi al record di
quel Cliente che è identificato con un codice.
Mi manca solo l'istruzione da inserire dopo l'aggiornamento del
controllo Combo.
Saluti
Sergio
 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 controllo Combo.
Cosa ti fa pensare che sia un'istruzione sola?
-- 
Le persone non sono il proprio comportamento: devi sempre andare oltre,
essere flessibile, capire il punto di vista degli altri, interpretarne i
comportamenti ed intuirne le esigenze.
Per rispondere in privato elimina
dall'indirizzo "togliquesto"
MasterDavidex
David Ruscelli

Mi scuso se ho usato il singolare........... ! intendevo tutte le
istruzioni (o come altro si chiamano).


 istruzioni (o come altro si chiamano).
Facciamo finta che usi ado, prendi spunto da questo
    Dim rsTemp As New ADODB.Recordset
    Dim sQuery As String
'carico i dati
        sQuery = "SELECT ANNO , IDINTERV , IDRAPPOR , DATAAPERT, DATACHIUS ,
IDFORN , RAGFORN , " & _
                " DESINTERV , IDMAG , DESMAG , SITOINTERV , IDUTENTE ,
DESUTENTE , FLAGSTATO , IDCONFERMA , " & _
                " OGGETTO , SERIEOGGETTO , MODELLOOGGETTO , FLAGGEST ,
DESGUASTO FROM INTERVENTI WHERE ANNO='" & _
                Config.nAnno & "'  AND IDINTERV='" & sIdIntervento & "' "
        rsTemp.Open sQuery, Cn, adOpenForwardOnly, adLockReadOnly
        If rsTemp.EOF = True Then
            Screen.MousePointer = vbDefault
            Exit Sub
        End If
        'scrivo i dati sui campi
        txtIdInt.Text = rsTemp!IDINTERV & ""
        txtRapp.Text = rsTemp!IDRAPPOR & ""
        txtDataAp.Text = fn.DbConvertiData4(rsTemp!DATAAPERT, DATEISO,
DATEITA, "/")
        txtDataCh.Text = fn.DbConvertiData4(rsTemp!DATACHIUS & "", DATEISO,
DATEITA, "/") & ""
        txtDescGuasto.Text = rsTemp!DESGUASTO & ""
        txtSito.Text = rsTemp!SITOINTERV & ""
        txtUtente.Text = rsTemp!IDUTENTE & " - " & rsTemp!DESUTENTE & ""
        txtIdConf.Text = rsTemp!IDCONFERMA & ""
        txtOggetto.Text = rsTemp!OGGETTO & ""
        txtSerie.Text = rsTemp!SERIEOGGETTO & ""
        txtType.Text = rsTemp!MODELLOOGGETTO & ""
        txtDescInt.Text = rsTemp!DESINTERV & ""


>         'scrivo i dati sui campi
devo per forza scrivere i dati sui campi per visualizzarli sulla form,
non esiste un modo per filtrare i record a cui fà riferimento il
controllo data che ho messo sulla form?


 controllo data che ho messo sulla form?
Nel post iniziale non avevi citato il controllo Data.
Io ti ho espresso il mio modo di lavorare con Ado (che è lo strumento più
diffuso)
Visto che per me il controllo Data è osceno e non merita di essere usato non
ha senso che proseguiamo la discussione.
Se vuoi usa Ado, altrimenti specifica che usi Data e spera che qualcuno ti
risponda.
Ciao


 Ciao
Provvedo ad eliminare data ed usare Ado (sai sono proprio all'inizio....
e ci capisco veramente poco)
Ciao


 e ci capisco veramente poco)
Cosě mi fai sentire in colpa...
