Question

ASP源码怎样修改能在数据库里写入相同的数据？

if Request("wor")="del" then
id=request("id")
idArr=split(id,",")
for i=0 to ubound(idArr)
sql="delete from gzcllb where id="&trim(idArr(i))
conn.execute(sql)
next
end if
%>
<%
action=Request("action")
id=Request("id")
if action="yes" Then
set rs=server.createobject("adodb.recordset")
if id="" then
set rsCheck = conn.execute("select 编号 from gzcllb where 编号='" & trim(Request.Form("编号")) & "'")
if not (rsCheck.bof and rsCheck.eof) then
response.write "<script language='javascript'>alert('编号 " & trim(Request.Form("编号")) & " 已存在，请检查！');history.back(-1);</script>"
response.end
end if
set rsCheck=nothing
sql="select * from gzcllb"
rs.open sql,conn,3,3
rs.addnew
else
sql="select * from gzcllb where id="&id&""
rs.open sql,conn,1,2
end if

如上代码 往数据库里写入相同数据时会提示数据已存在
如何把代码修改一下能在数据库里写入相同的数据？

数据库是ACCESS 的 gzcllb是数据库里的表名
额 已解决了 把这一段删了就好了
if not (rsCheck.bof and rsCheck.eof) then
response.write "<script language='javascript'>alert('编号 " & trim(Request.Form("编号")) & " 已存在，请检查！');history.back(-1);</script>"
response.end
end if

Answer 1

您好，希望以下回答能帮助您
这样的写入法很局限，一旦有特殊字符等等就不可行了

建议你用记录集的方式来写入，最完美，不出问题
如您还有疑问可继续追问。

Answer 2

既然你已经解决了，那我就回答一下让你采纳吧