Vb.net et connexion avec sql server
Fermé
richf20
Messages postés
6
Date d'inscription
dimanche 5 octobre 2008
Statut
Membre
Dernière intervention
13 janvier 2013
-
21 avril 2009 à 18:56
halima15 Messages postés 167 Date d'inscription dimanche 15 novembre 2009 Statut Membre Dernière intervention 21 avril 2010 - 10 déc. 2009 à 22:41
halima15 Messages postés 167 Date d'inscription dimanche 15 novembre 2009 Statut Membre Dernière intervention 21 avril 2010 - 10 déc. 2009 à 22:41
A voir également:
- Vb.net et connexion avec sql server
- Gmail connexion - Guide
- Hotmail connexion - Guide
- Facebook connexion - Guide
- Ps3 media server - Télécharger - Divers Réseau & Wi-Fi
- Filezilla server - Télécharger - Téléchargement & Transfert
2 réponses
halima15
Messages postés
167
Date d'inscription
dimanche 15 novembre 2009
Statut
Membre
Dernière intervention
21 avril 2010
10
10 déc. 2009 à 22:38
10 déc. 2009 à 22:38
bonsoir tu travaille en mode connecté donc voilà le code d'ajouter:
cmd.CommandText = "insert into lnomtable values(les champs à ajouter )
cmd.ExecuteNonQuery()
sans oublianty de déclarer
dim cmd as dbcommande,l'insertion est simple c'est comme la commande de sql server
et voilà supprimer:
Dim rep = MessageBox.Show("voulez vous vraiment supprimer ", "Suppression", MessageBoxButtons.YesNo)
If rep = Windows.Forms.DialogResult.Yes Then
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is TextBox Then
ctrl.resettext()
End If
Next
cmd.CommandText = "delete from nomtable "
cmd.ExecuteNonQuery()
MsgBox("suppresion efectuée")
ElseIf rep = Windows.Forms.DialogResult.No Then
MsgBox("suppression annulée")
End If
et modification:
cmd.CommandText = "update livre set les champs= " & nouveau champs
cmd.ExecuteNonQuery()
bonne chance,j'éspere que mon code sera facile pour toi
cmd.CommandText = "insert into lnomtable values(les champs à ajouter )
cmd.ExecuteNonQuery()
sans oublianty de déclarer
dim cmd as dbcommande,l'insertion est simple c'est comme la commande de sql server
et voilà supprimer:
Dim rep = MessageBox.Show("voulez vous vraiment supprimer ", "Suppression", MessageBoxButtons.YesNo)
If rep = Windows.Forms.DialogResult.Yes Then
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is TextBox Then
ctrl.resettext()
End If
Next
cmd.CommandText = "delete from nomtable "
cmd.ExecuteNonQuery()
MsgBox("suppresion efectuée")
ElseIf rep = Windows.Forms.DialogResult.No Then
MsgBox("suppression annulée")
End If
et modification:
cmd.CommandText = "update livre set les champs= " & nouveau champs
cmd.ExecuteNonQuery()
bonne chance,j'éspere que mon code sera facile pour toi
halima15
Messages postés
167
Date d'inscription
dimanche 15 novembre 2009
Statut
Membre
Dernière intervention
21 avril 2010
10
10 déc. 2009 à 22:41
10 déc. 2009 à 22:41
Bonsoir tu travaille en mode connecté donc voilà le code d'ajouter:
cmd.CommandText = "insert into lnomtable values(les champs à ajouter )
cmd.ExecuteNonQuery()
sans oublianty de déclarer
dim cmd as dbcommande,l'insertion est simple c'est comme la commande de sql server
et voilà supprimer:
Dim rep = MessageBox.Show("voulez vous vraiment supprimer ", "Suppression", MessageBoxButtons.YesNo)
If rep = Windows.Forms.DialogResult.Yes Then
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is TextBox Then
ctrl.resettext()
End If
Next
cmd.CommandText = "delete from nomtable "
cmd.ExecuteNonQuery()
MsgBox("suppresion efectuée")
ElseIf rep = Windows.Forms.DialogResult.No Then
MsgBox("suppression annulée")
End If
et modification:
cmd.CommandText = "update livre set les champs= " & nouveau champs
cmd.ExecuteNonQuery()
bonne chance,j'éspere que mon code sera facile pour toi
cmd.CommandText = "insert into lnomtable values(les champs à ajouter )
cmd.ExecuteNonQuery()
sans oublianty de déclarer
dim cmd as dbcommande,l'insertion est simple c'est comme la commande de sql server
et voilà supprimer:
Dim rep = MessageBox.Show("voulez vous vraiment supprimer ", "Suppression", MessageBoxButtons.YesNo)
If rep = Windows.Forms.DialogResult.Yes Then
Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is TextBox Then
ctrl.resettext()
End If
Next
cmd.CommandText = "delete from nomtable "
cmd.ExecuteNonQuery()
MsgBox("suppresion efectuée")
ElseIf rep = Windows.Forms.DialogResult.No Then
MsgBox("suppression annulée")
End If
et modification:
cmd.CommandText = "update livre set les champs= " & nouveau champs
cmd.ExecuteNonQuery()
bonne chance,j'éspere que mon code sera facile pour toi