在不上传EXCEL文件本身的前提下，如何将本地EXCEL文件的内容上传到服务器数据库中？

[liuchi]

在本地上有一ｅｘｃｅｌ文件A.XLS ,
文件有两列　“pn" "sn"
3000 条数据纪录

我希望通过一个ASP页面，在不上传文件本身的前提下，导入到服务器B.MDB　ACCESS数据库文件中去。

我思考了很久也没有答案，希望大家给我一个详细解决的办法。
或者代替方案！

万分感谢！

[Bogard]

关注,学习,帮顶!

[moodboy1982]

这个问题不是单用ASP能完成的。
要用JS，而且不轻松，用（客户端）JS读出XLS的的内容再提交上传到服务器，然后存入数据库。大概思路是这样的。

[terry915]

关注，刚看了点JS的资料，仿佛JS不能读取文件。

[tshuxing]

读出来倒是简单，关键是读出来以后如何提交至数据库我就不懂了
读excel的代码
Set xlApp = Server.CreateObject("Excel.Application")
strSource=FilePath
xlApp.Workbooks.Open(strSource)
Set xlbook = xlApp.ActiveWorkBook
Set xlsheet = xlbook.Worksheets(1)
readcell=xlsheet.cells(1,1).value '设置xlsheet.cells(i,j)里面的i,j可以任意读取表里任意一个单元

[tigerwen01]

那就先读出EXCEL文件的内容，然后把这些内容插入到数据库的相应字段里。
读出内容示例：
strAddr = Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr & "\Templet\Table.xls")
set objExcelBook = objExcelApp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set objExcelSheet = objExcelBook.Sheets(1)

[笨笨兔兔兔兔兔]

你要在客户端这么做??基本不用想了,没权限的

不过可以做个ocx

[tshuxing]

楼上说的是，我都差点忘记了，当时我写一个读取excel的程序，就遇到权限问题，客户端环境比较复杂

[mch2000]

我的方法是用客户端代码把EXCEL中的内容读入，放在网页中，再通过表单提交，不知道你觉得如何？
以下读EXCEL的代码仅供参考。

<script language=vbscript>
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open("c:\a.xls") '打开已经存在的EXCEL工件簿文件
xlApp.Visible = True '设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets("sheet1") '设置活动工作表
x=xlSheet.Cells(1, 1) '给单元格（row,col）赋值
'xlSheet.PrintOut '打印工作表
xlBook.Close (True) '关闭工作簿
xlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
</script>

[mch2000]

在客户端做可以的，只要把IE安全设置里的运行ActiveX控件改为启用（或提示）即可，不过这样安全性降低。

[yun9yun]

可以用frontpage在页面中插入excel组件，用js读出每个单元格的数据，放在一个数组中，再入库。