关于excel导入数据库的问题
问题是Excel导入数据库的时候,不管数据库的字段是用什么类型,是纯数字的时候就不能写进,前面数字带有字母或字符的时候都可以写进,我要求的是不管是数字还是字符或字母都可以写进,大家帮忙看看!这是导入数据库的代码:
<%
Dim cn,aa,oConn,connstr
'打开XLS.
aa=request.form("bbb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Provider = "Microsoft.Jet.OLEDB.4.0 "
cn.ConnectionString = "Data Source="&aa&";" & _
"Extended Properties=Excel 8.0;"
cn.Open
'打开MDB.
connstr="DBQ="+server.MapPath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set oConn=server.CreateObject("ADODB.CONNECTION")
oConn.open connstr
'读取数据.
set rsRead=server.CreateObject("ADODB.Recordset")
rsRead.Open "select * from [Sheet1$]",cn,1,3
do until rsRead.EOF
'写入数据库.
oConn.Execute("Insert into users(userid,password,sex)Values('"& rsRead.Fields("userid")&"','" &rsRead.Fields("password") & "','"& rsRead.Fields("sex")&"')" )
rsRead.MoveNext
loop
%>