Discussion :

[tieuphuong]

Bonsoir,

Mon moteur de recherche plante cette fois ci dans le code suivant de ma fonction If_GetTableLst (), pourriez vous m'expliquer pourquoi ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
'.....
For i = 0 To qrs.Count - 1
 
If Not (qrs(i).Name Like "*Temp*") And Not (qrs(i).Name Like "Msys*") _
And Not (qrs(i).Name Like "*tmp*") Then
rst.AddNew
rst.Fields(0) = qrs(i).Name
rst.Update
End If

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rst.Fields(0) = qrs(i).Name

me donne l'erreur suivante :

ERREUR D EXECUTION "3421" erreur de conversion de type de données.

[PsykotropyK]

ton fields(0) ca doit etre quoi? du texte, du numérique, du boolean, etc.... ?

si c autre chose que du texte normal que ca bug, vu que .name renvoie un string (fin me semble )

Mais je t'avoue que la tu donnes pas ssez d'infos a mon avis

[tieuphuong]

desolé pour le temps de reponse mais je cherchais la solution....

voici le code avec lequel cela marche pour ceux qui seraient face au même problème !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
...
 
rst.AddNew
rst![nom du champ de la table "TempLstTbl"] = CStr (qrs(i).Name)
rst.Update
End If

Probleme resolu!
merci bcp d'avoir créé ce forum d'entre aide et ce site : c'est une véritable mine d'or bien sympathique !