Update base de donnes sql

slyderkiller Messages postés 145 Date d'inscription lundi 28 avril 2003 Statut Membre Dernière intervention 16 février 2012 - 24 mars 2007 à 19:00
jesusonline Messages postés 6814 Date d'inscription dimanche 15 décembre 2002 Statut Membre Dernière intervention 13 octobre 2010 - 25 mars 2007 à 22:43
slt a tt
J'ai un petit probleme pour un update dans une table sql, j'ai le même code pour un insert et sa marche bien.
si vous avez la sollution merci. et si vous savez faire la même chose en trasaction ca serais encore mieu lol

Dim

conn
As SqlClient.SqlConnection =
New SqlClient.SqlConnection(ACT.cn.ConnectionString)

Dim cmd
As SqlClient.SqlCommand =
New SqlClient.SqlCommand(
"UPDATE annuaires_TBL SET " & _

"Societe='@Societe', Interllocuteur='@Contact', Email='@Email', Tel='@Tel', Fax='@Fax', Port='@Port', Adresse='@Adresse', CP_Ville='@CP_Ville', Divers='@Divers' " & _

"WHERE ID_Annuaires = @ID_Table", conn)cmd.Parameters.Clear()

cmd.Parameters.Add(

"@ID_Table", SqlDbType.Int).Value = id_Modifcmd.Parameters.Add(

"@Societe", SqlDbType.VarChar, 50).Value = UCase(tbmSociete.Text)cmd.Parameters.Add(

"@Contact", SqlDbType.VarChar, 50).Value = tbmContact.Textcmd.Parameters.Add(

"@Email", SqlDbType.VarChar, 50).Value = tbmEmail.Textcmd.Parameters.Add(

"@Tel", SqlDbType.VarChar, 50).Value = tbmTel.Textcmd.Parameters.Add(

"@Fax", SqlDbType.VarChar, 50).Value = tbmFax.Textcmd.Parameters.Add(

"@Port", SqlDbType.VarChar, 50).Value = tbmPort.Textcmd.Parameters.Add(

"@Adresse", SqlDbType.VarChar, 100).Value = tbmAdresse.Textcmd.Parameters.Add(

"@CP_Ville", SqlDbType.VarChar, 100).Value = UCase(tbmCP_Ville.Text)cmd.Parameters.Add(

"@Divers", SqlDbType.VarChar, 50).Value = tbmDivers.Text 

 

Tryconn.Open()

cmd.ExecuteNonQuery()

Catch en
As SqlClient.SqlExceptionlblModifier.Text =

"Erreur d'enregistrement"

' Handle exception.

FinallylblModifier.Text = UCase(tbmSociete.Text) &

" Enregistr‚"conn.Close()

End
Try

1 réponse

jesusonline Messages postés 6814 Date d'inscription dimanche 15 décembre 2002 Statut Membre Dernière intervention 13 octobre 2010 29
25 mars 2007 à 22:43
Bonsoir,

cmd.Parameters.Add("@Divers", SqlDbType.VarChar, 50).Value = tbmDivers.Text

s'écrit plutot

cmd.Parameters.Add("@Divers", SqlDbType.VarChar, 50)
cmd.Parameters["@Divers"] = tbmDivers.Text

sinon pour les transaction :

            SqlConnection conn = new SqlConnection();
            SqlTransaction transaction = conn.BeginTransaction();
            SqlCommand command = new SqlCommand("", conn, transaction);

tu peux alors utiliser ton sqlcommand classiquement.

<hr />Cyril - MSP - MCTS ASP.net & SQL
0
Rejoignez-nous