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
merci encore
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
Partager