connexion = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Database1.mdf;Integrated Security=True;User Instance=True"
Imports System.Data Imports System.Data.SqlClient Public Class chargement Private CMX As System.Data.SqlClient.SqlConnection Private CMD As System.Data.SqlClient.SqlCommand Private DS As System.Data.DataSet Private DA As System.Data.SqlClient.SqlDataAdapter Private requete, connexion As String Sub New() connexion = "Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Database1.mdf;Integrated Security=True;User Instance=True" CMX = New System.Data.SqlClient.SqlConnection(Me.connexion) Me.CMD = New System.Data.SqlClient.SqlCommand(Me.requete, Me.CMX) Me.DA = New System.Data.SqlClient.SqlDataAdapter(Me.CMD) Me.DS = New Data.DataSet End Sub Public Function chargement(ByVal requete As String, ByVal donnees As String) Me.DS.Clear() Me.requete = requete Me.CMD.CommandText = Me.requete Me.DA.Fill(Me.DS, donnees) Return Me.DS End Function
Me.Objdonnees = New chargement() Requete = "la requête" Me.DS = Me.Objdonnees.chargement(Requete, "TABLE")
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question