INSERT INTORésolu

Question

Salut,
Je suis sur un projet d'étude et je voulais la syntaxe d'insertion de données dans une table comportant une clé étrangère.
ps: voici mon code d'insertion mais ça ne marche pas et je ne comprend pas
Rs2.Open "INSERT INTO SERVICE VALUES('" & Code_Serv & "','" & Nom_Serv & "','" & Code_Direc & "','" & test1 & "','" & test2 & "','" & test3 & "')"
Message d'erreur: "cette opération n'est pas autorisée si l'objet est ouvert"

Merci pour vos réponses

junior

marthyly · Accepted Answer

merci pour l'aide, mais ça resolu mon problème à moitié.
le programme génère un second message:
[impossible d'inserer la valeur null dans la colonne dans la colonne 'code_direc', la table service' . cette colonne n'accepte pas de valeur null.]
Le hic est que j'ai testé mes variables et elles contiennent bien des données.

junior

jrivet · Answer

Salut,

Et bien RS2 est déjà ouvert

Rs2.Close
Rs2.Open "INSERT INTO SERVICE VALUES('" & Code_Serv & "','" & Nom_Serv & "','" & Code_Direc & "','" & test1 & "','" & test2 & "','" & test3 & "')"
, ----
[../code.aspx?ID=41455 By Renfield]

@+: Ju£i€n
Pensez: Réponse acceptée

nhervagault · Answer

Salut Il y a bien 6 colonnes a ta table les bonnes pratiques veulent que ces dernieres sont nommées dans la clause SQL et des requetes parametrées et tu auras moins de probleme ;-) sql = "INSERT INTO service (col1,col2,col3,..)values(@Code_Serv,@Nom_Serv,@Code_Direc,@test1, ...) "

Set cmd =New ADODB.Command
cmd.CommandType=

adCmdText cmd

.CommandText=sql
Set cmd.ActiveConnection= cnn   'cnnestunobjetAdodb.Connection
cmd.Parameters.Item("@

Code_Serv

").Value=1000
cmd.Parameters.Item("@

Nom_Serv

").Value="...."
cmd.Parameters.Item("@...").Value="...."

INSERT INTO

3 réponses

Votre réponse

Discussions similaires