anadeveloppeur
Messages postés153Date d'inscriptionsamedi 10 septembre 2005StatutMembreDernière intervention21 février 2019
-
1 nov. 2006 à 11:55
anadeveloppeur
Messages postés153Date d'inscriptionsamedi 10 septembre 2005StatutMembreDernière intervention21 février 2019
-
1 nov. 2006 à 20:58
Bonjour, je suis entrains de créer une application par VB Express 2005, liée avec une BD Sous SQL Server 2000.
Je veux insérer des enregistrements dans une table "COMPTE", dont la clé primaire est à incrément, donc je veux à chaque fois que je donne le reste des champs de la table : "Nom", "Prenom" et "Solde", qu'il ajoute une ligne avec ces champs donnée et avec une clé "NumCompte" Automatique.
Mais quand je lance l'exécution, ça passe sans erreure ni rien, sauf que lorque je consulte ma BD je ne trouve rien d'ajouté
Voilà le code, qui a une idée ? Merci
SimO
' Création et instanciation de la connexion
Dim co As SqlConnection
co = New SqlConnection("Data Source=localhost; Integrated Security=SSPI;" + "Initial Catalog=banque")
' Ouverture de la connexion
co.Open()
MsgBox("La base de données " + co.Database + " est ouverte")
' création d'une nouvelle commande
Dim commande As New SqlCommand
' on rattache la nouvelle commande à la connexion en cours
commande.Connection = co
' type de commande : ici une requête SQL
commande.CommandType = CommandType.Text
' texte de la requête SQL
commande.CommandText = "INSERT INTO COMPTE (Nom, Prenom, Solde) VALUES ('Lécu', 'Régis', 10000)"
MsgBox("Insertion effectuée")
co.Close()
PS : C'est où le bouton pour ajouté le code ? Merci
Boudchiche
Messages postés59Date d'inscriptionvendredi 8 octobre 2004StatutMembreDernière intervention25 novembre 2006 1 nov. 2006 à 15:09
Salam
Il faut juste ajouter : commande.ExecuteNonQuey()
' Création et instanciation de la connexion
Dim co As SqlConnection
co = New SqlConnection("Data Source=localhost; Integrated Security=SSPI;" + "Initial Catalog=banque")
' Ouverture de la connexion
co.Open()
MsgBox("La base de données " + co.Database + " est ouverte")
' création d'une nouvelle commande
Dim commande As New SqlCommand
' on rattache la nouvelle commande à la connexion en cours
commande.Connection = co
' type de commande : ici une requête SQL
commande.CommandType = CommandType.Text
' texte de la requête SQL
commande.CommandText = "INSERT INTO COMPTE (Nom, Prenom, Solde) VALUES ('Lécu', 'Régis', 10000)"
commande.ExecuteNonQuey()
anadeveloppeur
Messages postés153Date d'inscriptionsamedi 10 septembre 2005StatutMembreDernière intervention21 février 2019 1 nov. 2006 à 20:58
C'était bien ça l'erreure, j'ai oublié d'ajouter la méhode ExecuteNonQuey, qui exécute la commande, et qui renvoie le nombre de ligne affectés ;-) je viens de découvrire cette erreure ce soir pendant la correction dans l'école. La formation en Ado.Net avance ;-)
Merci Boudchiche