Requête sql l'update et le delete

Profil bloqué - 12 avril 2011 à 20:36
 Utilisateur anonyme - 12 avril 2011 à 21:00
Salut a tout les connaisseurs du VB.net
J'ai réussi a exécuter 2 type de requête sql (select et insert) mais j'ai pas réussi a faire l'update et le delete .
Voici mon code pour la connexion , insert et le select:
+++++++++++++++++++++++++++++++++++++SELECT++++++++++++++++++++++++++++++++++++++++
Dim MyConnexion As SqlConnection = New SqlConnection("Data Source=.\sqlexpress;" & _
"Integrated Security=SSPI;Initial Catalog=autoecole")
Dim Mycommand As SqlCommand = MyConnexion.CreateCommand()
Mycommand.CommandText = "SELECT * FROM charge"
MyConnexion.Open()
Dim myReader As SqlDataReader = Mycommand.ExecuteReader()

Do While myReader.Read()
ComboBox1.Items.Add(myReader.GetValue(0))
Loop

myReader.Close()
MyConnexion.Close()
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
++++++++++++++++++++++++++++insert+++++++++++++++++++++++++++++++++++++++++++++++++
Dim MyConnexion As SqlConnection = New SqlConnection("Data Source=.\sqlexpress;" & _
"Integrated Security=SSPI;Initial Catalog=autoecole")
Dim Mycommand As SqlCommand = MyConnexion.CreateCommand()
Mycommand.CommandText = "insert into charge (typ_cha,mont_cha,dat_ch) values(@t1,@t2,@c3)"

With Mycommand.Parameters
.Add(New SqlParameter("@t1", SqlDbType.VarChar, 50))
.Add(New SqlParameter("@t2", SqlDbType.VarChar, 50))
.Add(New SqlParameter("@c3", SqlDbType.DateTime))
End With

With Mycommand
.Parameters("@t1").Value = Type.Text
.Parameters("@t2").Value = Montant.Text
.Parameters("@c3").Value = Dat.Text

End With

MyConnexion.Open()
Mycommand.ExecuteNonQuery()
MyConnexion.Close()
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Merci pour votre aide :)

1 réponse

Utilisateur anonyme
12 avril 2011 à 21:00
Quand tu dis que tu n'as pas réussis, est-ce que tu peux nous donner des précisions stp ?


-- Pylouq : jongleur de clavier AZERTY et de clavier QWERTZ --
0