[VBA] INSERT INTO statement

Fermé
fredo91170 Messages postés 7 Date d'inscription vendredi 6 octobre 2006 Statut Membre Dernière intervention 31 juillet 2007 - 12 oct. 2006 à 17:21
 amigo - 21 avril 2008 à 00:07
bonjour a toues et à tous

Voila j ai un petit soucis de syntaxe avec ma commande INSERT INTO.
il semblemrait que cela soit sur la dernière ligne OracleCampaign
si quelqun peut m'aider

Merci d'avance

dB.Execute "INSERT INTO FINAL (MONTH, YEAR, OPE, [DATE OPE], LP, [CODE PRODUIT], VOLUME, " _
& "VARIATION, RAISON, [QTY ORDERED], [UNIT PRICE TTC], PRIME, PLAN, [FR CAMPAIGN]) values ('" _
& Right(Rs![Année-mois comptable], 2) & "', '" _
& Left(Rs![Année-mois comptable], 4) & "', '" _
& Right(Rs![Opé], 3) & "', '" _
& Rs![Date opé] & "', " _
& "'" & Rs![LP] & "', '" _
& Left(Rs![Titre], 4) & "', '" _
& Mid(Rs![Titre], 5, 2) & "', '" _
& Mid(Rs![Titre], 7, 1) & "', '" _
& rais(Rs![raison]) & "', '" _
& Rs![Qte] & "','" _
& Rs![Mt] & "', " _
& " '" & Rs![Prime] & "', '" _
& Rs![Plan] & "', '" _
& OracleCampaign(Rs!Plan, "CampagneOracle") & "'"

7 réponses

bonsoir,

D'après ce que j'ai pu comprendre, PV_PLS.ASOFDATE est une date
or tu ecrit:
dat = Date
a = Year(dat)
a1 = Month(dat)
dd = CStr(a & 0 & a1 & dy)

si dat=#20/04/2008#
a=2008
a1=4
il manque dy (dy=Day(date) )
alors
dd="20080420" (chaine de caractère et non une date)

donc assure toi que dd est bien une date avec le format adéquat, ce qui expliquerait " incompatibilité de type"
Est ce que ce ne serait pas plutot #20/04/2008# ou encore #4/20/2008# (format anglais)

D'autre part, en VB, la fonction Format est tres pratique pour formater les dates:
dd=Format(Date,"yyyy/mm/dd") donnerait dd="2008/04/20"
dd=Format(Date,"dd/mm/yyyy") donnerait dd="20/04/2008"
et d'autres format sont encore possibles.

Salut.
1
blux Messages postés 26013 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 26 avril 2024 3 289
13 oct. 2006 à 09:00
Salut,

oui, CampagneOracle est entre guillemets, et comme c'est le séparateur de ta chaine, ça ne va pas aller...

Il faut construire ta requête en passant par une variable string puis l'envoyer au db.execute...
0
j'ai toujours un message d 'erreur

dat = Date
a = Year(dat)
a1 = Month(dat)
dd = CStr(a & 0 & a1 & dy)

ChSQL = "INSERT INTO PV(TRADEID,ASOFDATE,CURVEID,LOCATION,[SYSTEM_LOCATION],APPLICATION,CCY,ASSETID,VALUE,ACCRUAL,CASHFLOW)" & _
" SELECT TRADEID,ASOFDATE,CURVEID,LOCATION,SYSTEM_LOCATION,APPLICATION,CCY,ASSETID,VALUE,ACCRUAL,CASHFLOW " _
& " FROM PV_PLS " & _
" WHERE PV_PLS.ASOFDATE = dd;"

Set qdf = oDb.CreateQueryDef("fill", ChSQL)


'erreur de syntaxe dans insert into
'j'ai verifié les noms de champs,la ponctuation mais rien à faire
'pouvez vous me dire si il y aurait une raison apparente que je ne connaitrai pas


End Sub
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
16 avril 2008 à 17:31
salut,

1 - ni bonjour, ni autre explication qu'un bout de code ...
2 - ajouter un post sur un sujet vieux de presque 2 ans ...
3 - ça donne pas envie de répondre ...
0
blux Messages postés 26013 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 26 avril 2024 3 289
16 avril 2008 à 22:22
Et pourtant, l'erreur est évidente... il suffit d'afficher ChSQL pour s'en rendre compte...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
dslé de pas aavoir mis plus que ça comme message
mais gt en plein projet so pas trop le temps
je ne vois toujours pas ou se situe l erreur
je comprends vite mais faut m expliquer longtemps
pouvez vous m'eclairer svp
0
bonjour,

je pense que l'erreur est là
" WHERE PV_PLS.ASOFDATE = dd;"

ce serait plutot
" WHERE PV_PLS.ASOFDATE =" & dd & ";"

A+.
0
salut

effectivement, il y avait une erreur au niveau :WHERE PV_PLS.ASOFDATE = dd;"
j'ai donc remplacé par
" WHERE PV_PLS.ASOFDATE =" & dd & ";" mais j'ai néanmoins une erreur " incompatibilité de type"
je ne vois pas ou peut se situer l'erreur . j'ai pensé que ça pouvait venir de
,[SYSTEM_LOCATION],APPLICATION,CCY,ASSETID,VALUE,ACCRU­AL,CASHFLOW)" & _
à cause de VALUE qui pourrait etre un mot réservé, j'ai ainsi changé le nom de mon champ mais apparemment l'erreur se situe ailleurs.

pouvez vs m'aider

merci
0