[senior]

من واقع الحياه العمليه خصوصا فى شغل الشركات والمصانع يوجد الكثير من الإدارات بتعتمد فى علمها على الإكسيل وعند عمل نظم لتلك الإدارات نحتاج إلى الإتصال فى بعد الأحيان بالإكسيل لجلب البيانات والتعامل معها

PHP كود :

Public Function ReadExcelIntoDataset(ByVal file As String, ByVal Dgrview As DataGridView) As Data.DataSet

        If Not IO.File.Exists(file) Then
            MsgBox("The file provided doesn't exist. Please check the name and try again")
        Else
            Try

                Dim sOleDbString As New String("SELECT * FROM [SheetName$]")
                Dim cnExcel As New Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source='" & _
                file & " '; " & "Extended Properties=Excel 8.0;")
                cmdExcel = New System.Data.OleDb.OleDbDataAdapter(sOleDbString, cnExcel)

                Try

                    dsExcel.Clear()
                    cmdExcel.Fill(dsExcel)
                    Dim dv As DataView
                    dv = dsExcel.Tables(0).DefaultView
                    Dgrview.DataSource = dv

                Catch ex As Exception
                    MsgBox(ex.Message)
                    dsExcel = Nothing

                Finally
                    cnExcel.Close()
                End Try

            Catch ex As Exception
                MsgBox(ex.Message)
                dsExcel = Nothing
            End Try
            Return dsExcel
        End If

    End Function 


فقط لإستخدام الفانكشن قم بتمرير مسار ملف الإكسيل الذى تريدج قرأءة البيانات منه
وقم بتمرير جريد فيو لعرض البيانات فيها