[VB5] Problema con openDataBase

[Meldon]

hai provato a cambiare la DLL in una più recente come ti ho detto prima?

[firulifirula]

grandi news!
allora con la 3.51 non funziona..... ma con la 3.6 va.....
pero.....
io ho 5 record nel DB
dopo la query che ti giro ne tira fuori solo 1.

Dim rs As Recordset
Dim dbopen As Database
Dim wrk As Workspace

Set wrk = DBEngine.Workspaces(0)
Set dbopen = wrk.OpenDatabase("indirizzario.mdb")

Set query = dbopen.CreateQueryDef("", "SELECT * FROM ragione_sociale")
Set rs = query.OpenRecordset()

i = rs.RecordCount

[Meldon]

Io per apre il recordset avre fatto così:

Set rs = db.OpneRecordset(NomeRecordset)

Così dovrebbe funzionare
Alla prossima