Asp classic 在经典asp中导入/导出

Asp classic 在经典asp中导入/导出,asp-classic,Asp Classic,我想在经典asp中从MS EXCEL导入/导出数据。我已经完成了那部分。但我的问题是,当我们从MS EXCEL导入和导出数据时,我们需要在服务器上安装MS-OFFICE。但是我的客户端不想在服务器上安装MS-OFFICE。因此,在服务器上不安装MS-OFFICE的情况下,是否可以从Excel导入/导出数据 提前谢谢 谢谢和问候 果冻我自己没做过,但我不明白为什么不做 您可以使用MS Jet数据库引擎,它可能已经在您的服务器上 或者,您可以使用此组件: 并通过COM互操作使其工作(这样您就可以

我想在经典asp中从MS EXCEL导入/导出数据。我已经完成了那部分。但我的问题是,当我们从MS EXCEL导入和导出数据时,我们需要在服务器上安装MS-OFFICE。但是我的客户端不想在服务器上安装MS-OFFICE。因此,在服务器上不安装MS-OFFICE的情况下,是否可以从Excel导入/导出数据

提前谢谢

谢谢和问候
果冻

我自己没做过,但我不明白为什么不做

您可以使用MS Jet数据库引擎,它可能已经在您的服务器上

或者,您可以使用此组件:

并通过COM互操作使其工作(这样您就可以在经典ASP中使用它),如下所示:


HTH

我在过去做过很多次;-)不幸的是,代码找不到这么快。我发现要导入的示例如下:

<%
Set ExcelConn = Server.CreateObject("ADODB.Connection")
Set ExcelRS = Server.CreateObject("ADODB.Recordset")
ExcelConn.Provider = "Microsoft.Jet.OLEDB.4.0"
ExcelConn.Properties("Extended Properties").Value = "Excel 8.0"
ExcelConn.Open "C:\Sample\Sample.xls"

'get data from sheet
sSQL = "SELECT * FROM Sample$"
set ExcelRS = ExcelConn.Execute(sSQL)

'loop through each record in Excel and write it to access
'might be slow, but will work

Do until ExcelRS.EOF 
myConn.Execute("INSERT INTO Sample_tbl(lname,fname,mi) VALUES ('" & ExcelRS("0") & "', '" & ExcelRS("1") & "','" & ExcelRS("2") & "')")

ExcelRS.MoveNext
Loop

ExcelRS.Close
set ExcelRS = NOTHING
objExcelConn.Close
set ExcelConn = NOTHING
objConnAccess.close
set objConnAccess = NOTHING
%>

这里是.net。我在classic asp中找到了解决方案。@jellysaini--是的,您需要调整代码以使用classic asp。使用OLEDB解决方案,使用经典ADO连接到excel文件。我相信如果你用谷歌搜索的话,还有很多其他的例子。使用excel数据读取器,您需要按照链接#3中的说明将其改编为COM。
<%@ Language=VBScript %>
<%  Option Explicit

Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=sample.xls"
%>
<table>
    <tr>
        <td>Sample</td>
    </tr>
</table>