Un état E_FAIL a été renvoyé par le fournisseur. etc

[Beaudelicius]

Bonjour Forum,

J'ai un problème lors d'une requête que je fais dans un BD MYSQL,
le problème survient lorsque j'utilise ".recordcount"

J'ai lu sur cette erreur et le problème vient souvent a cause des date, j'ai donc changer le type de valeur de mes colonne date en type LONG, donc en nombre, mais le problème est toujours là!

POuvez vous m'aider.

voici mon code :

Code :

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
Set cnnLiv = New ADODB.Connection
With cnnLiv
    .Open ConnectStringBDLiv()
    .CommandTimeout = 0
    .CursorLocation = adUseClient
End With
 
strSQLLiv = "SELECT idlivraison, contrat, produit, usine, amount, dateprod, dateliv, clients, address, ville, capacite, trailer, ordre, periode, duree, camionneur, statut, dateretour, " & _
                    "commentaire, cod, qtepaquet, fenetre, statutcod, livisconfirm, manuel " & _
                        "FROM livraison " & _
                        "WHERE dateliv = '" & dateliv & "'"
 
 
Set rsLiv = New ADODB.Recordset
With rsLiv
    .CursorLocation = adUseClient
    .Open strSQLLiv, cnnLiv, adOpenStatic, adLockReadOnly
 
    If Not .RecordCount = 0 Then
    .MoveFirst
    End If
End With
 
Private Function ConnectStringBDLiv() As String
ConnectStringBDLiv = "Driver={MySQL ODBC 3.51 Driver};Server=xxx;Database=xxxx;User=xxx; Password=xxx;Option=3;"
End Function

Merci