我把access导入sqlserver2000后,使用rs.addnew 无法插入数据,怎么回事啊?
部分代码:
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * From pers"
rs.Open sql,conn,1,3
rs.AddNew
rs("username")=username
rs("realname")=realname
if request("nameprotect")="true" then
rs("nameprotect")=true
else
rs("nameprotect")=false
end if
rs("polity")=polity
rs("marry")=marry
rs("province")=province
rs("city")=city
rs("birthday")=birthday
rs("nation")=nation
rs("interest")=interest
rs("graduation")=graduation
rs("zhuanye")=zhuanye
rs("degree")=degree
rs("engdegree")=engdegree
rs("comdegree")=comdegree
rs("experiences")=experiences
rs("danwei")=danwei
rs("nowjob")=nowjob
rs("skill")=skill
rs("jobprocess")=jobprocess
rs("yuexin")=yuexin
rs("baoxian")=baoxian
rs("zhufang")=zhufang
rs("jobform")=jobform
rs("jobclass")=jobclass
rs("position")=position
rs("moreposition")=moreposition
rs("jobarea")=jobarea
rs("introduces")=introduces
rs("tel")=tel
rs("address")=address
rs("zip")=zip
rs("homepage")=homepage
rs("oicq")=oicq
rs("time")=now()
rs("new")=true
rs("perslevel")=0
rs.update
rs.close
set rs=nothing
部分代码:
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * From pers"
rs.Open sql,conn,1,3
rs.AddNew
rs("username")=username
rs("realname")=realname
if request("nameprotect")="true" then
rs("nameprotect")=true
else
rs("nameprotect")=false
end if
rs("polity")=polity
rs("marry")=marry
rs("province")=province
rs("city")=city
rs("birthday")=birthday
rs("nation")=nation
rs("interest")=interest
rs("graduation")=graduation
rs("zhuanye")=zhuanye
rs("degree")=degree
rs("engdegree")=engdegree
rs("comdegree")=comdegree
rs("experiences")=experiences
rs("danwei")=danwei
rs("nowjob")=nowjob
rs("skill")=skill
rs("jobprocess")=jobprocess
rs("yuexin")=yuexin
rs("baoxian")=baoxian
rs("zhufang")=zhufang
rs("jobform")=jobform
rs("jobclass")=jobclass
rs("position")=position
rs("moreposition")=moreposition
rs("jobarea")=jobarea
rs("introduces")=introduces
rs("tel")=tel
rs("address")=address
rs("zip")=zip
rs("homepage")=homepage
rs("oicq")=oicq
rs("time")=now()
rs("new")=true
rs("perslevel")=0
rs.update
rs.close
set rs=nothing