Question

asp 提交数据库问题

Dim k
Set k = Server.CreateObject ("ADODB.Command")
k.ActiveConnection = MM_conn_STRING
k.CommandText = "INSERT INTO kucun (Productname, Units, Quantity) VALUES (?, ?, ?)"
k.Prepared = true
k.Parameters.Append k.CreateParameter("param8", 202, 1, 50, Request.Form("Productname")) ' adVarWChar
k.Parameters.Append k.CreateParameter("param9", 202, 1, 50, Request.Form("Units")) ' adVarWChar
k.Parameters.Append k.CreateParameter("param10", 202, 1, 50, Request.Form("Quantity")) ' adVarWChar
k.Execute
k.ActiveConnection.Close
我的数据库表名叫做“kucun”，字段有商品名，单位，数量
当我提交数据的时候，因为可能存在提交同一类商品（就是商品名相同），所以我想在提交的时候我想进行判断，如果提交得商品名，表里面已经有了，就只在数量上增加，如果没有，就插入这一条数据，谁能教我怎么写吗
对不起呀，因为我语法不是很厉害，您这样的思路我也了解，能不能再详细点，在我上面写的那段程序里，我该怎么写啊，谢谢了

Answer 1

<%
Productname=request.Form("Productname")
Units=request.Form("Units")
Quantity=request.Form("Quantity")
sql="select count(Productname) as num from kucun where Productname='"&Productname&"'" '判断商品是否存在
set k=conn.execute(sql)
if k("num")>0 then '说明商品名称已经存在
sql="select Quantity from kucun where Productname='"&Productname&"'" '检索此商品名称的数量
conn.execute(sql)
quan=k("Quantity") '数据库中原有数量
new_quan=Quantity+quan '最新数量＝新数量+原有数量
sql="update kucun set Quantity='"&new_quan&"' where Productname='"&Productname&"'" '更新
conn.execute(sql)
else '说明商品名称不存在，则添加
sql="insert into kucun(Productname,Units,Quantity) values('"&Productname&"','"&Units&"','"&Quantity&"')"
conn.execute(sql)
end if
%>

Answer 2

<%

name=request("naem") 'name 是从别的页面传递过来的，就是要添加的数据
set rs=server.CreateObject("recordset")
sql="select * from 数据库名 where name="&name
rs.open sql,conn,1,3

if not (rs.eof and rs.bof) then ' 判断数据里是否已经有存在的名称,如果已存在，则 数量上增加 ，不然则将数据插入数据库

rs("count")=rs("count")+1 '数量上增加
else
rs.addnew

rs("name")=name '插入数据

rs.update

end if

rs.close
set rs=nothing

%>

可以试试上面的代码 ，里面的字段名称可能跟你的不一样，所以要改下字段名

希望能够对你有用

Answer 3

获取提交信息（商品名 数量）
读取数据库，
if 提交的商品名=表里的商品名 then
表里商品数量=表里原来商品数量+提交商品数量
else
商品表增加一个类型的商品，同时，将提交的信息写入数据库
end if