Bonjour,

j'essaie de réaliser ma toute première appli pour lire une base SQL Server 2008 en ADO.
J'ai trouvé dans les tutoriels, un guide super et j'ai essayé de le suivre.
Mais j'ai une erreur lors de la lecture de la requête SQL.
« Erreur d'exécution '3001': l'application utilise les arguments qui sont de type incorrect, sont hors de plage acceptable ou sont en conflit avec un autre. »
Voici mon code qui est divisé en 3 boutons commandes :
le premier pour établir la connexion
le 2ème pour faire la requête
le 3ème pour fermer la connexion

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
 
NomUtilisateur = "sa"  
MotDePasse = "lemien"
NomServeur = "SRV_SQL\I08"
NomBaseDeDonnées = "BIJOU"
cnx.ConnectionString = "UID=" & NomUtilisateur & ";PWD=" & MotDePasse & ";" & "DRIVER={SQL Server};Server=" & NomServeur & ";Database=" & NomBaseDeDonnées & ";"
 
cnx.Open 
 
'  XXXXX deuxième bouton
Dim rst As New ADODB.Recordset
rst.Open "SELECT CT_NUM FROM F_COMPTET", cnx 
rst.MoveLast
rst.MoveFirst
 
While Not(rst.EOF)
  MsgBox rst("CT_NUM")
  rst.MoveNext
Wend
 
 
' Troisième bouton
rst.Close
La même requête fonctionne sur mon Sql Management Studio et avec la même connexion (sa)

Dans mon projet, j'ai les références suivantes :
Visual Basic For Applications
Visual Basic runtime objects and procedures
Visual Basic objects and procedures
OLE automation
Microsoft ActiveX Data Objects 2.7 Library

(j'ai essayé en remplacçant par le 2.8 mais résultat identique)


Auriez-vous une idée ?

Merci