asp写入数据库错误,帮帮忙吧。

来源:百度知道 编辑:UC知道 时间:2024/06/04 11:18:04
set rs=server.createobject("adodb.connection")
hw_name=srequest(hw_name,0)
sql="select * from hw where hw_name='"&hw_name&"'"
rs.open sql,conn,3,3
if not rs.eof then
response.write "<script language=javascript>alert('数据库已有该产品,请审核!');history.go(-1);</script>"
response.End
end if

这里有什么问题吗,我提交商品总是弹出 数据库已有该产品,请审核。。
我把这段删了提示添加商品成功,但是数据库里没有。我应该这么改啊。
rs.addnew
rs("hw_name")=hw_name
rs("hw_cz")=hw_cz
rs("hw_content")=htmlencode(hw_content)
rs("hw_jj")=hw_jj
rs("hw_cash")=hw_cash
rs("hw_cash")=hw_cash
rs("hw_cash1")=hw_cash1
rs("hw_cash2")=hw_cash2
rs("hw_cash3")=hw_cash3
rs("hw_hostweb")=hw_

dim keyword
keyword=trim(replace(request("keyword"),"'",""))

connstr="dsn=YZYZD.WORLD;uid=aa;pwd=aa"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")

sql = "select * from SSGS_CH where ch = '"&keyword&"'"

rs.open sql,conn,2,2

'如果没有数据记录
if rs.bof then

rs.AddNew()
rs("CH") = keyword
rs("SSGS") = "石油化工北方运输公司"
rs("GSJM") = "SYHGBFYSGS"
rs("GSID") = "1"

rs.update()
rs.close
set rs=nothing
conn.close
set conn=nothing
end if

'如果有数据记录
if not rs.bof then
errmsg=errmsg+"<br>"+"<li>"+keyword+"车号也有记录,请返回!!"
founderr=true
call error()