前提:
1 运行asp的服务器上有相关驱动(装excle即可)
2 d.xls文件事先准备好作为模板,
<%
connstr="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & server.MapPath("d.xls") & ";Extended Properties=""Excel 12.0;HDR=no"";"
set conn=server.CreateObject("adodb.connection")
conn.open connstr'
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [Sheet1$] ",conn,3,3
rs.addnew
rs("F1")="d"
rs.update
rs.close
%>