This code sample demonstrates how to query and display information in an Excel worksheet. The following code uses the worksheet that you created in the previous section.
Open Microsoft Visual Studio .NET. The Visual Studio .NET Integrated Design Environment (IDE) is displayed.
On the File menu, point to New, and then click Project.
In the New Project dialog box, under Project Types, click Visual Basic Projects. Under Templates, click ASP.NET Web Application.
In the New Project dialog box, locate the Name and Location text boxes. Notice that the Name box is not available (it appears grayed out or dimmed). The Location text box contains the following text (or similar):
Replace the text in the Location text box with http://localhost/ExcelVBTest, and then click OK. A new project is created, which includes a Web Form named WebForm1.aspx.
In the Visual Studio .NET IDE, locate the Solution Explorer window. If you cannot find it, click Solution Explorer on the View menu.
In Solution Explorer, right-click WebForm1.aspx, and then click View Designer to display the designer for the appearance of the page. The designer allows you to add controls and manipulate the appearance of the page.
Locate the toolbox. Depending on your IDE Option settings, the toolbox can appear as a window or a button (which often appears on the left side of the IDE). If you cannot find the toolbox, click Toolbox on the View menu.
If the toolbox appears as a button, move the pointer over the button so that the contents of the toolbox are displayed.
When the designer view of a Web Form is active, the toolbox is divided into sections, including the Web Forms, Components, HTML, and other sections. Click the Web Forms section.
In the Web Forms section of the toolbox, click DataGrid, and then drag it onto the designer for WebForm1.
Right-click WebForm1.aspx, and then click View Code to display the code-behind page source.
Add the following statements to the top of the code-behind page, above the "Public Class WebForm1" text:
Imports System.DataImports System.Data.OleDb
Highlight the following code, right-click the code, and then click Copy. In WebForm1.aspx.vb, paste the code into the Page_Load event:
' Create variables that are used in code sample.Dim i, j As Integer' Create connection string variable. Modify the "Data Source" parameter as' appropriate for your environment.Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _ & "Data Source=" & Server.MapPath("../ExcelData.xls") _ & ";" & "Extended Properties=Excel 8.0;"' Create the connection object by using the preceding connection string.Dim objConn As New OleDbConnection(sConnectionString)' Open connection with the database.objConn.Open()' The code to follow uses a SQL SELECT command to display the data from the worksheet.' Create new OleDbCommand to return data from worksheet.Dim objCmdSelect As New OleDbCommand("SELECT * FROM myRange1", objConn)' Create new OleDbDataAdapter that is used to build a DataSet ' based on the preceding SQL SELECT statement.Dim objAdapter1 As New OleDbDataAdapter()' Pass the Select command to the adapter.objAdapter1.SelectCommand = objCmdSelect' Create new DataSet to hold information from the worksheet.Dim objDataset1 As New DataSet()' Fill the DataSet with the information from the worksheet.objAdapter1.Fill(objDataset1, "XLData")' Build a table from the original data.DataGrid1.DataSource = objDataset1.Tables(0).DefaultViewDataGrid1.DataBind()' Clean up objects.objConn.Close()
On the File menu, click Save All to save the project files.
On the Build menu, click Build ExcelVBTest to build the project. This prepares the code in the code-behind page so that it can be executed.
In Solution Explorer, right-click WebForm1.aspx, and then click View in Browser to run the code.
The code sample in this article uses the Microsoft Jet OLE DB Provider to access the Excel worksheet. This code uses the following connection string to connect to the worksheet:
' Create connection string variable. Modify the "Data Source" parameter as' appropriate for your environment.Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _ & "Data Source=" & Server.MapPath("../ExcelData.xls") _ & ";" & "Extended Properties=Excel 8.0;"
As the comments indicate, you must modify the path information for the specific Excel worksheet. In addition, you must set the value of the Extended Properties parameter to properly connect to the file.
Note that the connection string uses the Server.MapPath function. This function takes a path that is relative to Microsoft Internet Information Services (IIS) to a file and returns a hard disk path to that file. For example, in the Create Sample Excel Worksheet section, you create ExcelData.xls in the Web root directory, which is typically located at C:\Inetpub\Wwwroot. This also creates a subfolder named ExcelVBTest within the Wwwroot folder and a file named WebForm1.aspx within the ExcelVBTest folder.
In this example, the hard disk path to the files is as follows:
For additional information about how to access Excel files with ASP.NET, click the following article numbers to view the articles in the Microsoft Knowledge Base:
307021 How To Transfer XML Data to Microsoft Excel 2002 by Using Visual Basic .NET
306022 How To Transfer Data to an Excel Workbook by by Using Visual Basic .NET
For additional information about using ADO.NET, click the following article numbers to view the articles in the Microsoft Knowledge Base:
301075 How To Connect to a Database and Run a Command by Using ADO.NET and Visual Basic .NET
301216 How To Populate a DataSet Object from a Database by Using Visual Basic .NET
301248 How To Update a Database from a DataSet Object by Using Visual Basic .NET
Note The example companies, organizations, products, domain names, e-mail addresses, logos, people, places, and events depicted herein are fictitious. No association with any real company, organization, product, domain name, email address, logo, person, places, or events is intended or should be inferred.
Microsoft ASP.NET (included with the .NET Framework), Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition, Microsoft ADO.NET (included with the .NET Framework), Microsoft Visual Basic .NET 2002 Standard Edition