VB et MySQL/Erreur d'exécution
Bonjour,
mon problème est le suivant, lorsque j'exécute le code suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| 'Instanciation de variable
Set rst = New ADODB.Recordset
Set cnx = New ADODB.Connection
'Procédure de connection
Call Connexion(cnx)
rst.Open"SELECT * FROM recu ORDER BY CONVERT(SUBSTRING(mat_rec,4,999999999), SIGNED)", cnx, adOpenKeyset, adLockOptimistic, adCmdText
If rst.RecordCount <> 0Then
rst.MoveLast
i = Mid(rst!mat_rec,4)
i = i + 1
txtrec(0).Text = "REC" & i
i = rst!num_rec + 1
txtrec(1).Text = i
end if
...... |
le débogeur s'arrete à la ligne en rouge et j'ai le message d'erreur suivant :
Citation:
Erreur d'exécution '458':
La variable utilise un type Automation non géré par Visual Basic
et je signale que le type de num_rec est définie par mediumint(8) unsigned et i est défininie integer.
Comment faire ?
Merci d'avance.
