[VB6] Problème de lecture d'un fichier excel
Bonjour,
Voici mon problème :
j'ai une application VB6 qui lit une feuille excel et enregistre ses données dans une tables access.
J'ai un problème sur un champs en particulier qui contient du texte ou du numérique.
Quand je fais :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
| strSQL2 = "SELECT [TMP_INDUSTRY].* From [TMP_INDUSTRY];"
Set sRS = New ADODB.Recordset
sRS.Open strSQL2, SCnn, adOpenKeyset, adLockOptimistic
'on remplit la base access avec tous les champs du fichier excel
While Not mRS.EOF = True
sRS.AddNew
sRS!Code = Nz(mRS!Code)
sRS!update_code = Nz(mRS!update_code)
sRS!English = Nz(mRS!English)
sRS!French = Nz(mRS!French)
sRS.Update
i = i + 1
num = i + 1
mRS.MoveNext
sRS.MoveNext
Wend |
les champs update_code, english et french sont lu sans problème. Par contre, le champ code n'est lu que pour le texte (et non le numérique)... résultat, j'ai un enregistrement sur deux dans ma table access... D'où cela peut il venir ? merci![/quote]