Discussion :

[dark_geek]

Salut tout le monde,

Je rencontre un problème d'insertion d'un nouveau enregistrement dans une table de ma base de données quand j'essai d'exécuter ce code:

Code :

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

1
2
3
4
5
 
set cmdClient=Server.CreateObject("ADODB.COMMAND")
cmdClient.ActiveConnection = conexion
cmdClient.CommandText = "INSERT INTO T_Client VALUES ('" & Request.Form("passport") & "', '" & Request.Form("nom") & "', '" & Request.Form("prenom") & "', '" & Request.Form("nationnalite")& "', '" & Request.Form("telephone")& "')"
cmdClient.Execute

sachant que tous les champs de ma table T_Client sont du format texte.

On m'affiche comme message: L'opération doit utiliser une requête qui peut être mise à jour.

J'ai essayé aussi ce code mais on m'affiche toujours le même message d'erreur:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
passportSaisie=Request.Form("passport")
nomSaisie=Request.Form("nom")
prenomSaisie=Request.Form("prenom") 
nationnaliteSaisie=Request.Form("nationnalite")
telephoneSaisie=Request.Form("telephone")
 
Set RSClient = Server.CreateObject("ADODB.Recordset") 
sqlClient= "INSERT INTO T_Client (numPassport,nomClient,prenomClient,nationnaliteClient,telClient) VALUES ('" & passportSaisie & "', '" & nomSaisie & "', '" & prenomSaisie & "', '" & nationnaliteSaisie & "', '" & telephoneSaisie & "')"
RSClient.Open sqlClient,con
 
RSClient.addnew
RSClient.update
RSClient.close
Set RSClient = Nothing

Je vous remercie d'avance de m'indiquer où est l'erreur.

Cordialement.

[rossy]

Salut Dark_geek !!!

Perso, j'aurai eu tendance à faire ca :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
passportSaisie = Request.Form("passport")
nomSaisie = Request.Form("nom")
prenomSaisie = Request.Form("prenom") 
nationnaliteSaisie = Request.Form("nationnalite")
telephoneSaisie = Request.Form("telephone")
 
Set RSClient = Server.CreateObject("ADODB.Recordset") 
sqlClient = "SELECT * FROM T_Client"
RSClient.Open sqlClient,con
 
RSClient.addnew
 
RsClient("numPassport") = passportSaisie
RsClient("nomClient") = nomSaisie
RsClient("prenomClient") = prenomSaisie
RsClient("nationnaliteClient") = nationnaliteSaisie
RsClient("telClient") = telephoneSaisie
 
RSClient.update
RSClient.close
Set RSClient = Nothing

Ainsi tu insères chaque variable dans chaque champ dans ta table T_Client, et ca évite de passer par un INSERT INTO qui est parfois long à écrire...

C'est peut être pas la meilleure méthode mais c'est pour moi une des plus pratique !

[pc75]

Bonjour,

Déjà, je commencerais par faire ça :

Code :

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

1
2
 
Response.Write "INSERT INTO T_Client VALUES ('" & Request.Form("passport") & "', '" & Request.Form("nom") & "', '" & Request.Form("prenom") & "', '" & Request.Form("nationnalite")& "', '" & Request.Form("telephone")& "')"