Problema con ADO [VB 6.0]

[cappedj]

Ciao a tutti, ho un big problem.

Come faccio a farmi tornare un recordset da questa connessione MDB utilizzando la seguente query?

Dim CON As Connection
Set CON = New Connection
CON.Open "Provider=Microsoft.jet.oledb.4.0; Data Source=" & App.Path & "\Settings.mdb"

strSQL = "SELECT * FROM [Applicativi] WHERE [Applicativo] = '" & txtApplicazione.Text & "' AND [Gruppo] = '" & Oggette_linkato_ad_applicazione & "' "
CON.Execute strSQL


Grazie mille.

[darkblOOd]

Dim Recordset As new Adodb.Recordset
Recordset.Open(StringaSQL,ConnessioneAperta)

[ladyBlu]

utilizzando un Recordset per aprire la SELECT e non la Connessione, così:

Dim CON As Connection
Dim RS As New Adodb.Recordset
Set CON = New Connection
CON.Open "Provider=Microsoft.jet.oledb.4.0; Data Source=" & App.Path 
        & "\Settings.mdb"
        
strSQL = "SELECT * FROM [Applicativi] WHERE [Applicativo] = '" & 
         txtApplicazione.Text & "' AND [Gruppo] = '" & 
         Oggette_linkato_ad_applicazione & "' "

RS.Open strSQL, CON, 1, 3

[ANTAGONIA]

Ma dovresti anche settare il record come hai fatto per la connessione
cosi:

Dim rec as recordset
set rec = new adodb.recordset
rec.Open "select id_cliente,nome,cognome,residenza,provincia, codFiscale,Datanascita,città,provincia2,società,ve icolAcquis,importo from cliente", conn, adOpenKeyset, adLockPessimistic

POI CON UN CICLO DO WHILE... VEDI IL CONTENUTO DEL RECORD CHE TI SERVE!

cIAO

[cappedj]

grazie mille a tutti, ho avuto un buco di memoria.
Era da tanto che non lavoravo sui DB utilizzando VB 6.

Nell'ultimo periodo ho utilizzato + vb.net e i datasets.


Grazie ancora.

[darkblOOd]

Originariamente inviato da ANTAGONIA
Ma dovresti anche settare il record come hai fatto per la connessione

se usi As NEW nel dimensionamento non c'è bisogno di fare la set

@ Lady:
potevi ricordargli cosa significa 1 e 3

e poi perchè non usi le Enum per il tipo anzichè il valore?

[ladyBlu]

Originariamente inviato da darkblOOd
se usi As NEW nel dimensionamento non c'è bisogno di fare la set

@ Lady:
potevi ricordargli cosa significa 1 e 3

e poi perchè non usi le Enum per il tipo anzichè il valore?

hai ragione dark, piccola svista...