Récupérer une donnée dans SQL Serveur 2005 avec Visual Basic 2003
erti1711
Messages postés75Date d'inscriptionsamedi 2 avril 2005StatutMembreDernière intervention16 juin 2006
-
16 juin 2006 à 18:06
cs_skweeky
Messages postés259Date d'inscriptionmercredi 3 mai 2006StatutMembreDernière intervention11 janvier 2010
-
7 août 2006 à 22:08
Bonjour a tous, j'ai une base de donnée sous SQL Serveur dans laquelle j'ai une table PLAT.
Et j'aimerais récupérer une donnée de cette table en utilisant Visual Basic 2003.
J'ai essayé le code suivant et rien tourne:
Dim MaConnexion As New SqlClient.SqlConnection
MaConnexion.ConnectionString = "Persist Security Info=False;Integrated Security=SSPI;database=Resto;server=HOME-DE05502F3D"
MaConnexion.Open()
Dim cmdNumMax As SqlClient.SqlCommand = MaConnexion.CreateCommand()
Dim DR As SqlClient.SqlDataReader
DR = cmdNumMax.ExecuteReader //Qd je débug ca me met une erreur ici du type:
Une exception non gérée du type 'System.InvalidOperationException' s'est produite dans system.data.dll
Informations supplémentaires : ExecuteReader : la propriété CommandText n'a pas été initialisée
cmdNumMax.CommandText = "SELECT MAX(NumPlat) FROM Plat"
Dim i As Integer = cmdNumMax.ExecuteScalar()
En faite le but ici c'est de récupérer, lu numéro du dernier plat qui se trouve dans la base Plat et de l'affecter à une var..
Si quelqu'un pouvait m'aider SVP...
Merci d'avance
A voir également:
Récupérer une donnée dans SQL Serveur 2005 avec Visual Basic 2003
cs_skweeky
Messages postés259Date d'inscriptionmercredi 3 mai 2006StatutMembreDernière intervention11 janvier 20108 7 août 2006 à 22:08
Il faut passer la requête SQL quelque part et avant le ExecuteReader :
Dim MaConnexion As New SqlClient.SqlConnection
MaConnexion.ConnectionString = "Persist Security Info=False;Integrated Security=SSPI;database=Resto;server=HOME-DE05502F3D"
MaConnexion.Open()
Dim cmdNumMax As SqlClient.SqlCommand = MaConnexion.CreateCommand()
Dim DR As SqlClient.SqlDataReader
cmdNumMax.CommandText = "SELECT MAX(NumPlat) FROM Plat"
DR = cmdNumMax.ExecuteReader
Dim i As Integer = cmdNumMax.ExecuteScalar()
Par contre j'ai du mal à comprendre pourquoi tu fais un ExecuteReader et ExecuteScalar.
Dans cet exemple seul le Scalar est utile.