bonjour
je vais chercher un fichier excel que je met dans un datagridview pour avec des variables en memoire que je vais utilisé
je souhaite les garder sans faire appel a la connexion a chaque fois car le fichier sera sur une clé usb afin personne ne puissent faire des modifications
je ferais appel a ce fichier que si je dois modifier des valeurs en mode administrateur

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Imports System.Data.SqlClient
Public Class Form1
 
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Me.OpenFileDialog1.FileName = Nothing
            If Me.OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
                Me.TextBox1.Text = Me.OpenFileDialog1.FileName
            End If
            Try
                Dim Myconnection As System.Data.OleDb.OleDbConnection
                Dim dataSet As System.Data.DataSet
                Dim Mycommand As System.Data.OleDb.OleDbDataAdapter
                Dim path As String = OpenFileDialog1.FileName
                Myconnection = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data source=" + path + ";Extended Properties=Excel 12.0")
            Mycommand = New System.Data.OleDb.OleDbDataAdapter("select * from [Feuil1$]", Myconnection)
 
            dataSet = New System.Data.DataSet
                Mycommand.Fill(dataSet)
                DataGridView1.DataSource = dataSet.Tables(0)
 
                Myconnection.Close()
 
            Catch ex As Exception
                MsgBox(ex.Message.ToString)
 
            End Try
        End Sub
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
    End Sub
End Class
merci encore