1 2 3 4 5 6 7 8 9 10 11 12 13 14
|
Dim str_Connection As String = "Data
Dim oDataSet As DataSet = New DataSet("Intervention")
Dim requete As String = "SELECT Num_intervention, date_demande, date_fin, demandeur, etat, description, durée FROM Intervention WHERE etat = 'terminé'"
Source=.\SQLEXPRESS;AttachDbFilename='C:\Documents and Settings\asi\Mes documents\Visual Studio 2005\Projects\gestion intervention\gestion intervention\gestion inter.mdf';Integrated Security=True;Connect Timeout=30;User Instance=True"
oConnection = New SqlConnection()
oConnection.ConnectionString = str_Connection
Dim oDataAdapter As SqlDataAdapter = New SqlDataAdapter(requete, oConnection)
oDataAdapter.Fill(oDataSet, "Intervention")
DataGridView1.DataSource = oDataAdapter |