ASP.NET:访问EXCEL 电子表格
你当前的位置:烁空 --> 技术文档全集
C# CODE
---------------------------------------------
<%@ PAGE LANGUAGE="C#" %>
<%@ IMPORT NAMESPACE="SYSTEM.DATA" %>
<%@ IMPORT NAMESPACE="SYSTEM.DATA.ADO" %>

<SCRIPT LANGUAGE="C#" RUNAT="SERVER">
PROTECTED VOID PAGE_LOAD(OBJECT SRC, EVENTARGS E)
{
STRING STRCONN;
STRCONN = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;" +
"DATA SOURCE=C:\EXCELTEST.XLS;" +
"EXTENDED PROPERTIES=EXCEL 8.0;";
'YOU MUST USE THE $ AFTER THE OBJECT YOU REFERENCE IN THE SPREADSHEET
ADODATASETCOMMAND MYCOMMAND = NEW ADODATASETCOMMAND("SELECT * FROM [SHEET1$]", STRCONN);

DATASET MYDATASET = NEW DATASET();
MYCOMMAND.FILLDATASET(MYDATASET, "EXCELINFO");
DATAGRID1.DATASOURCE = MYDATASET.TABLES["EXCELINFO"].DEFAULTVIEW;
DATAGRID1.DATABIND();
}
</SCRIPT>
<P><ASP:LABEL ID=LABEL1 RUNAT="SERVER">SPREADSHEET CONTENTS:</ASP:LABEL></P>
<ASP:DATAGRID ID=DATAGRID1 RUNAT="SERVER"/>


VB.NET CODE
----------------------------------------------
<%@ PAGE LANGUAGE="VB" %>
<%@ IMPORT NAMESPACE="SYSTEM.DATA" %>
<%@ IMPORT NAMESPACE="SYSTEM.DATA.ADO" %>

<SCRIPT LANGUAGE="VB" RUNAT="SERVER">
SUB PAGE_LOAD(SENDER AS OBJECT, E AS EVENTARGS)
DIM MYDATASET AS NEW DATASET()

'YOU CAN ALSO USE THE EXCEL ODBC DRIVER I BELIEVE - DIDN'T TRY THOUGH
DIM STRCONN AS STRING = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;" & _
"DATA SOURCE=C:EXCELTEST.XLS;" & _
"EXTENDED PROPERTIES=""EXCEL 8.0;"""

'YOU MUST USE THE $ AFTER THE OBJECT YOU REFERENCE IN THE SPREADSHEET
DIM MYADODATASETCOMMAND AS NEW ADODATASETCOMMAND("SELECT * FROM [SHEET1$]", STRCONN)
MYADODATASETCOMMAND.TABLEMAPPINGS.ADD("TABLE", "EXCELTEST")
MYADODATASETCOMMAND.FILLDATASET(MYDATASET)

DATAGRID1.DATASOURCE = MYDATASET.TABLES(0).DEFAULTVIEW
DATAGRID1.DATABIND()
END SUB
</SCRIPT>
<P><ASP:LABEL ID=LABEL1 RUNAT="SERVER">SPREADSHEET CONTENTS:</ASP:LABEL></P>
<ASP:DATAGRID ID=DATAGRID1 RUNAT="SERVER"/>