ASP页面实现Excel数据批量导入MSSQL问题(悬赏50)

Question

本人在做一个管理系统.ASP页面程序已部分实现数据导入功能.但出现如下问题:
要导入的Excel表的数据的其中的一列若既有字符,又有数字,又有字符数字,则只能把字符或数字的导入,而不能导入字符数字的数据,请问为什么呢?
再加20分

Answer 1

在写库的时候会按照你的Excel表中第一行记录的数据类型为准，如果第一行是字符的，后面只会输入字符类型的，你可以试着用server.CreateObject("Excel.Application")来解决
set xlApp = server.CreateObject("Excel.Application")
strsource = server.MapPath(filepath) '文件路径
set xlbook = xlApp.WorkBooks.Open(strsource)
set xlsheet = xlbook.Worksheets(1) '选择使用的是哪个Sheet

i = 2 '设置数据读取的起始行数，一般第一行是字段名，可以根据自己的表修改

while xlsheet.cells(i,1) <> ""

sql="........"
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,1,3

if (rs.eof and rs.bof) then

rs.addnew
rs("**")= xlsheet.Cells(i,1) '1代表的是表中第1个字段也就是A的值
rs("**")= xlsheet.Cells(i,2)
rs("**")= xlsheet.Cells(i,3)
rs.update
end if
rs.close

i = i + 1 'i代表的是行数 i＋1就是向下移动1行

wend

set xlsheet = nothing
set xlbook = nothing
xlApp.quit