زر استعراض

http://www.tipsntracks.com/100/read-and-display-data-from-an-excel-file-xsl-or-xlsx-in-aspnet.html

http://www.ezzylearning.com/tutorial.aspx?tid=1553779

/index.php?showtopic=197031

+

Dim ds1 As DataSet
        Dim sheet As String = "Sheet Name"
        Dim ExcelFilePath As String = "c:\\test.xls"
        Dim mycn As OleDb.OleDbConnection
        Dim myad As OleDb.OleDbDataAdapter
        mycn = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0")
        Dim query = "select * from [" + sheet + "$]"
        myad = New System.Data.OleDb.OleDbDataAdapter(query, mycn)
        ds1 = New System.Data.DataSet
        myad.Fill(ds1)

الكود من هنا

KV2010 كتب:

/index.php?showtopic=197031

+

Dim ds1 As DataSet
        Dim sheet As String = "Sheet Name"
        Dim ExcelFilePath As String = "c:\\test.xls"
        Dim mycn As OleDb.OleDbConnection
        Dim myad As OleDb.OleDbDataAdapter
        mycn = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0")
        Dim query = "select * from [" + sheet + "$]"
        myad = New System.Data.OleDb.OleDbDataAdapter(query, mycn)
        ds1 = New System.Data.DataSet
        myad.Fill(ds1)

الكود من هنا

شكرا اخواني وبارك الله فيكم