Discussion :

[juju05]

Je souhaite insérer des enregistrements dans une table stockée sous Oracle à l'aide de vba excel.

Pour cela, j'ai codé:

Code :

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

1
2
 Set rsRecords = conn.Execute("INSERT INTO toppdm.object (ID_USER_CREATE, CREATION_DATE, TYPE, FILENAME , DESCRIPTION , ID_ENTREPRISE, FILELINKED,ID_OBJECT_CATEGORY, ORIGINAL_FILENAME, ID_COMPANY, LINK_TYPE) " _
                             & "VALUES (1661, to_date('29/05/2015','DD/MM/YY'),2, '" & chemin & "','" & nom_fichier & "',1,0,9,'" & chemin & "',1,3")

A l'exécution, j'ai un message d'erreur:

Code :

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

ORA00917: virgule absente

Je ne vois pas d'où cela peut provenir.

[Invité]

Bonjour,
type est un mot réservé, dans une requête on encadre les mots réservés ou avec ses espace!
[type] deplus je ne voie pas la fin de values

Code :

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

1
2
3
insert
(champs)
values (valeur);

[juju05]

Je vais encadrer TYPE. Par contre, je ne sais pas comment coder correctement mon insert. Il semble manquer une parenthèse.

[Invité]

Ta requête doit ce trerminer comme ça: values (...,13);")

[juju05]

Dois-je mettre les données que je récupère d'une précédente requête entre ' ' ?

[Invité]

Bonjour,

Code :

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

1
2
Set rsRecords = conn.Execute("INSERT INTO toppdm.object (ID_USER_CREATE, CREATION_DATE, [TYPE], FILENAME , DESCRIPTION , ID_ENTREPRISE, FILELINKED,ID_OBJECT_CATEGORY, ORIGINAL_FILENAME, ID_COMPANY, LINK_TYPE) " _
                             & "VALUES (1661, to_date('2015-05-29','DD/MM/YY'),2, '" & chemin & "','" & nom_fichier & "',1,0,9,'" & chemin & "',1,3);")