Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
strSql3 = "select tNomChamps, tTypeChamps from tblCreationChamps where fIdTable = " & arrTables(iIndex)			
			objRS3.Open strSql3, objConn, adLockOptimistic, adCmdTable
J'ai une erreur sur ces lignes, l erreur est :
Type d'erreur :
Erreur d'exécution Microsoft VBScript (0x800A01A8)
Objet requis: ''