Erreur d'éxécution 1004, erreur générale ODBC

bteuma

XLDnaute Nouveau
Bonjour .
J ai recupéré un macro VBA qui tourne sur NT4 et excel 97 et je veut la faire tourner sur XP excel 2002.
Sur NT la macro s'execute en 40 minutes
Sous Xp elle met plus de 5 heures
Le code qui ralenti l'exécution est le traitement de la requete SQL

l_s_Nombase = g_s_dossierTemp & "TM_PARAM.xls"
l_s_temp = ExtraitChemin(g_s_dossierTemp)
l_s_Connect = "ODBC;DSN=Excel Files;DBQ=" & l_s_Nombase & ";DefaultDir=" & l_s_temp & ";DriverId=22;MaxBufferSize=2048;PageTimeout=5;"

'-- Exécution de la requête Paquet TM et Point Mesure
With g_o_PWS("Relation1").QueryTables.Add(Connection:=l_s_Connect, _
Destination:=g_o_PWS("Relation1").Range("A1"), Sql:=l_s_Requete2)
.FieldNames = True
.Refresh BackgroundQuery:=False
End With

Est ce que les paramètres de connection sont adaptés ????????
 

Discussions similaires

Statistiques des forums

Discussions
314 058
Messages
2 105 121
Membres
109 272
dernier inscrit
V@n