- Erreur
Tutoriaux
Administrateur
Nov 28
|14:33
Mise à jour le Vendredi, 28 Novembre 2008 14:37
Lorsqu'on débute en programmation .NET, un des concepts plus complexe à mettre en oeuvre est certainement l'utilisation des bases de données (Dataset, Datasource, SqlAdapter ...) car il existe plusieurs façons de faire une seule et même chose. Nous allons donc ici éclairé certain d'entre-vous en vous montrant comment récupérer les données d'une base de données SQL et les traités ligne par ligne.
.NET
' Création de la connexion SQL
Dim ConnexionSQL As New SqlClient.SqlConnection()
With ConnexionSQL
.ConnectionString = "Insérer ici votre chaine de connexion à votre base de données SQL"
' Ouverture de la connexion SQL
If .State = ConnectionState.Open Then
ConnexionSQL.Close()
End If
End With
' Création d'une SqlCommand
Dim SCCodePostal As New SqlCommand("SELECT CP.codePostalId, CP.codePostal FROM codePostal", ConnexionSQL)
' Création du SqlDataReader
Dim SDRCodePostal As SqlDataReader
' Récupération des données du SqlCommand vers le SqlDataReader
SDRCodePostal = SCCodePostal.ExecuteReader()
While SDRCodePostal.Read
' Affichage de chaque code postal et de chaque id.
MsgBox("Code postal: " + SDRCodePostal("codePostal").ToString + " id: " + SDRCodePostal("codePostalId").ToString )
End While
Dim ConnexionSQL As New SqlClient.SqlConnection()
With ConnexionSQL
.ConnectionString = "Insérer ici votre chaine de connexion à votre base de données SQL"
' Ouverture de la connexion SQL
If .State = ConnectionState.Open Then
ConnexionSQL.Close()
End If
End With
' Création d'une SqlCommand
Dim SCCodePostal As New SqlCommand("SELECT CP.codePostalId, CP.codePostal FROM codePostal", ConnexionSQL)
' Création du SqlDataReader
Dim SDRCodePostal As SqlDataReader
' Récupération des données du SqlCommand vers le SqlDataReader
SDRCodePostal = SCCodePostal.ExecuteReader()
While SDRCodePostal.Read
' Affichage de chaque code postal et de chaque id.
MsgBox("Code postal: " + SDRCodePostal("codePostal").ToString + " id: " + SDRCodePostal("codePostalId").ToString )
End While
Envoyer par mail
Vu: 1346
Commentaires (0)
Flux RSS pour les commentairesEcrivez un commentaire
Navigation
Réseaux sociaux
