怎样用ASP将ECXL导入到数据库access表？

来源：百度知道 编辑：UC知道 时间：2024/05/28 09:56:43
希望能够制作可以自己选择本地的Excel文件上传到远程的access对应表中，
用ASP做的网站
谢谢大家了……
行的话，不胜感激……
再追加50分，请大家帮忙了。谢谢大家……

<%@ language="vbscript"%>
<%response.Expires = 0%>
<!--#include file="conn.asp"-->
<%'sql 连接驱动
time1=timer

If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If

sub closedb()
conn.close
set conn=nothing
end sub

dim aa
aa=request.form("fileurl") '获取传递过来的值

Dim StrConnect,cc
Dim objConn
Dim rs
Dim Sql
cc=0
'Excel连接驱动
aaa="provider=Microsoft.Jet.OLEDB.4.0; Data Source="&aa&";Extended Properties=Excel 8.0"

set StrConnect=CreateObject("ADODB.Connection")
StrConnect.Open aaa

Set objConn=CreateObject("ADODB.Connection")

objConn.Open StrConnect

'注意 表名一定要以下边这种格试 "[表名$]" 书写
Set rs = Server.Crea