文本里的数据录入能正常显示,可为什么不能录入数据库
数据库是ACCESS的,在一个数据库里我录入其他的数据都了录入,但是就这一个表(position)不行,字段如下:
position_id 自动编号
position_name 文本 100
我在录入这样的文本文件里的数据:
===高级管理===
首席执行官CEO
总裁
总经理
代码如下:
<%
set rs = server.createobject("adodb.recordset")
sql = "select * from position"
rs.open sql,conn,1,3
whichfile=server.mappath("sousuo.txt")
set fso=server.CreateObject("scripting.FileSystemObject")
set txt=fso.OpenTextFile(whichfile,1)
while not txt.AtEndOfStream
a_line=txt.ReadLine
if left(a_line,1)<>"=" then
result=replace(replace(replace(replace(a_line," ",""),"/","/"),"(","("),")",")")
rs.AddNew
rs("position_name")=a_line
rs.Update
response.Write(a_line) ’ 能正常的显示 但是数据就是入不了数据库
response.Write("<br>")
end if
wend
txt.close
set txt=nothing
set fso=nothing
%>
请问是什么原因?