Ouverture d'un recordset : type incompatible

Question

Aidez-moi s'il vous plaît je vais devenir fou !

Je bosse sur un projet pour lequel je dois chercher des données dans une base dBASE IV.

Dans un module j'ai déclaré une variable publique pour mon objet base de données :

Public oBase As Database

Dans mon formulaire j'ai :
Private Sub Form_Load()
    'Ouverture de la base de données
    Set oBase = OpenDatabase(PathBase(FICHIER_CONF_PATH), False, False, "dBASE IV")
    
    'Récupérer les données
    RemplirListeArticles
        
    
End Sub

Donc j'instancie mon objet base de données (FICHIER_CONF_PATH est le chemin d'un fichier ini qui contient le répertoire de ma base de données).

Ensuite j'ai ma procédure :
Private Sub RemplirListeArticles()
    Dim nbArticles As Integer
    Dim sql
    Dim rs As Recordset
    sql = "select count(refno) from invart"

    Set rs = oBase.OpenRecordset(sql)
    
    nbArticles = rs.Fields(0)
    
    Set rs = Nothing
End Sub

Voilà, dans mon projet, à l'exécution ça plante sur la ligne Set rs = oBase.OpenRecordset(sql) avec l'erreur "type incompatible".

Donc j'ai créé un autre projet, j'ai fait des copier/collé (dans mon projet j'ai d'autres choses mais rien qui concerne une base de données) des lignes ci-dessus (y compris la fonction pathBase qui renvoie le chemin contenu dans mon fichier ini) et là ça marche parfaitement !!!

J'ai vérifié, j'ai les mêmes références et composants pour mon projet (vb6).

Alors quoi ?????

Merci d'avance
Lilian

cs_Pascal06 · Answer

et avec dim SQL as string ?

cs_Lilian · Answer

Merci pour ta réponse.

En fait, comme je le pensais mon code était correct. Le problème venait de l'environnement :-(

J'ai viré toutes les références de mon projet et je les ai remises une à une pour voir laquelle posait problème. Et en fait, après les avoir toutes remises, ça fonctionnait toujours.

J'en profite donc pour remercier micro$oft

A bientôt
Lilian

jddz · Answer

La solution est bien &#224; chercher dans l'environnement surtout si on combine de l'ado et du dao

il faut que le dao soit prioritaire sur l'ado

jddz;;;;

Ouverture d'un recordset : type incompatible

3 réponses

Discussions similaires