Discussion :

[valie]

Bonjour à tous,

j'ai établi une connection à la base de données Access et je veux ensuite réaliser un update sur une table et c'est là que le problème se pose. La requête est incorrecte.

Voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
'Définition du pilote de connexion
        cnx.Provider = "Microsoft.Jet.OLEDB.4.0"
        'Définition de la chaîne de connexion
        cnx.ConnectionString = "S:\bb\Enquête Directe Investeringen\BOP2006  \Informatique\GRPFDI développement\DaDie\DaDie.mdb"
        'Ouverture de la base de données
        cnx.Open
 
        TmpSql = "Update CORPORATE_DATA Set ENTITY_ID = tabID(i), CORPORATE_NAME = tabName(i), COUNTRY = tabCountry(i), ACTIVITY = tabActivity(i), RIGHT = tabRight(i), MOTHER_COMPANY = tabMotherCompany(i), STOCK_EXCHANGE = tabStockExchange(i), END_YEAR = tabEndYear(i)"
 
        cnx.Execute (TmpSql)
        cnx.Close

Je vous remercie d'avance pour votre aide.

[Asdorve]

Code :

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

1
2
 
TmpSql = "Update CORPORATE_DATA Set ENTITY_ID = tabID(i), CORPORATE_NAME = tabName(i), COUNTRY = tabCountry(i), ACTIVITY = tabActivity(i), RIGHT = tabRight(i), MOTHER_COMPANY = tabMotherCompany(i), STOCK_EXCHANGE = tabStockExchange(i), END_YEAR = tabEndYear(i)"

explique ce que tu veux faire et à quoi tout ça correspond.

[valie]

Voici le code (j'avais oublié de copier la boucle):

Code :

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

1
2
3
4
For i = 0 To nbrLine
      TmpSql = "Update CORPORATE_DATA Set ENTITY_ID = tabID(i), 
CORPORATE_NAME = tabName(i), COUNTRY = tabCountry(i), ACTIVITY = tabActivity(i), RIGHT = tabRight(i), MOTHER_COMPANY = tabMotherCompany (i), STOCK_EXCHANGE = tabStockExchange(i), END_YEAR = tabEndYear(i)"
Next i

Je veux modifier certains champs de la table CORPORATE_DATA. Le valeurs qui doivent être modifiées sont contenues dans plusieurs tableaux tels que tabID, tabName, etc

[Asdorve]

dois-je en conclure que ça marche?

[pc75]

Bonjour,

Je suppose que les valeurs à updater sont dans les variables tabID(i), tabName(i), ... ?

Si c'est le cas :

Code :

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

1
2
 
TmpSql = "Update CORPORATE_DATA Set ENTITY_ID = " & tabID(i) & ", CORPORATE_NAME = '" & tabName(i) & "', COUNTRY = '" & tabCountry(i) & "', ACTIVITY = '" & tabActivity(i) & "', ........

[valie]

C'était bien ça l'erreur.

Merci beaucoup PC75