[VB6] DataCombo e tipo dati non esatto

[Petra]

Ho un modulo chiamato Conn al cui interno è disposto il seguente codice:

Option Explicit
Public cn As New ADODB.Connection

Public rsClienti As New ADODB.Recordset
Public rsControllo As New ADODB.Recordset

Il codice seguente, invece, è disposto nell'evento Form_Load() di una form:

Conn.cn.CursorLocation = 3
Conn.cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb"
If Conn.rsClienti.State = 1 Then
    Conn.rsClienti.Close
    Set Conn.rsClienti= Nothing
End If
Conn.rsClienti.Open "SELECT * FROM QueryClienti", Conn.cn, 3, 3
Set Me.DataCombo.RowSource = Conn.rsClienti
Me.DataCombo.ListField = "NomeCliente"
Me.DataCombo.BoundColumn = "IdCliente"

Quando eseguo, tramite un Command_Click(), questa query...

If Conn.rsControllo.State = 1 Then
    Conn.rsControllo.Close
    Set Conn.rsControllo = Nothing
End If
Conn.rsControllo.Open "SELECT * FROM QueryClienti WHERE (IdCliente = " & Me.DataCombo.BoundText & ")", Conn.cn, 3, 3

...a volte , mi segnala un errore che mi dice che il tipo di dati non è esatto. Eseguo il debug e posiziono il mouse su Me.DataCombo.BoundText...invece di restituirmi l'IdCliente mi restituisce il NomeCliente. Come faccio a risolvere questo problema ? ? Grazie!!

[Petra]

[ladyBlu]

Ciao

Per prima cosa vorrei darti alcuni consigli di carattere "grammaticale".
Tu hai inserito nel tuo progetto un modulo che hai chiamato 'Conn'. All'interno di questo modulo hai poi dichiarato le variabili Public per la gestione della connessione al db e la raccolta dei dati.
Allora, nel momento in cui dichiari variabili Public in un modulo .bas, quando vai ad utilizzare tali variabili all'interno delle form del progetto, non è necessario specificare il nome del modulo in cui si trovano.
La visibilità delle variabili dichiarate come Public in un modulo è TOTALE.
Poi, ogni volta che chiami la DataCombo non serve anteporre Me. perchè sei già nel form in cui si trova la combo

E' solo il mio personale parere, ma trovo che scrivere come te "appesantisca" un pochino.
Chiaro che sei libera di scegliere il modo a te più congeniale, ok?


Per quanto riguarda invece il problema che ti si presenta, stavo provando il tuo codice ma figurati che a me nemmeno si caricano i dati nella data combo.
Spero di poterti aiutare a risolvere il tuo problema, intanto continuo a provare.

[ladyBlu]

Allora, io ho provato il codice utilizzando il controllo DataCombo (iconcina azzurra).
Per usare questo oggetto ho incluso tra i componenti:
Microsoft DataList Controls 6.0 (SP3)


è lo stesso oggetto che usi tu?

[Petra]

Per quanto riguarda la grammatica sono pienamente consapevole che sono aggiunte in più al codice. Sono abituata!!

Utilizzo l'oggetto che mi hai citato sopra!!! Come mai nn riesci a connetterti ?!

Comunque ho risolto in un altro modo, anche se nn sono riuscita a capire il perchè faceva quell'errore!!

[ladyBlu]

Originariamente inviato da Petra
Per quanto riguarda la grammatica sono pienamente consapevole che sono aggiunte in più al codice. Sono abituata!!

Utilizzo l'oggetto che mi hai citato sopra!!! Come mai nn riesci a connetterti ?!

Comunque ho risolto in un altro modo, anche se nn sono riuscita a capire il perchè faceva quell'errore!!

E' una scelta tua figurati! Se ti trovi bene così ok!

Scusa, ho scritto un'imprecisione. con quell'oggetto io non ho errori di alcun tipo. è che avevo provato ad usare un altro oggetto: Microsoft Data Bound List Controls 6.0 (SP6)
e con questo non andava



Bene, sono contenta che hai risolto!

Buona lavoro

[Petra]

Ti ringrazio...buon lavoro anche a te!!!