asp中如何保存数据到sql2000里

来源:百度知道 编辑:UC知道 时间:2024/07/06 21:51:14
页面中有一组(多个,分页显示)产品,每个产品后都有一个单选框,我想达到的目的是,选中多个单选框(单选框的id相同)后点保存,在数据表里按顺序一条一条保存进去,现在单选框的id是可以一条条保存了,但产品的分类id号却不能跟随一起保存进去,请指教。想要的效果如下:
ID t1 t2 t3 pid
1 分类1 分类2 分类3 产品id
2 分类1 分类2 分类3 产品id
3 分类1 分类2 分类3 产品id
4 分类1 分类2 分类3 产品id
5 分类1 分类2 分类3 产品id
6 分类1 分类2 分类3 产品id
分类的信息是调用数据库里3个表中的,用3级联动方式出现在页面里,现在的问题是,如何在保存产品id的同时将3个分类的id都一起保存进表中去。
表结构为:t1,t2,t3分别表示3个分类,tid3为产品的id
保存信息的代码如下:
Dim Rs11,Sql2,aryChecks,i
selectshopxpptid=Replace(Request("selectshopxpptid")," ","")
aryChecks = split(selectshopxpptid,",")
Sql2="Select * From tb3"
Set Rs11=Server.CreateObject("ADODB.RecordSet")
Rs11.Open Sql2,Conn,1,3
for i=0 to uBound(aryChecks)
Rs11.AddNew
rs11("t1")=int(req

<%

Dim Rs11,sql2,aryChecks,i
shopxpbe_id1=trim(request("shopxpbe_id1"))
shopxpse_id1=trim(request("shopxpse_id1"))
tixi3id=trim(request("tixi3id"))
selectshopxpptid=Replace(Request("selectshopxpptid")," ","")
aryChecks = split(selectshopxpptid,",")
Sql2="Select * From tb3"
Set Rs11=Server.CreateObject("ADODB.RecordSet")
Rs11.Open Sql2,Conn,1,3

for i=0 to uBound(aryChecks)
Rs11.AddNew
rs11("t1")=int(request("shopxpbe_id1"))
rs11("t2")=int(request("shopxpse_id1"))
rs11("t3")=int(request("tixi3id"))
Rs11("tid3")=aryChecks(i)
Rs11("upTime")= Now
Rs11.Update
next
Rs11.Close
Set Rs11=Nothing
response.Write "<script language=javascript>