| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2490 人关注过本帖
标题:急!!!请教高手:如何同时从表单提交多条记录写入数据库?等待ing...
只看楼主 加入收藏
happyhu
Rank: 1
等 级:新手上路
帖 子:292
专家分:0
注 册:2005-7-12
收藏
 问题点数:0 回复次数:8 
急!!!请教高手:如何同时从表单提交多条记录写入数据库?等待ing...
我想实现这样一个功能:
在一个商品列表中,每条后面是一个文本框,用来填写价格。填完后点提交按钮,把所填的价格更新到数据表中对应的记录中(同时更新多条)
请问个位高手该怎么实现???????
有没有代码让小弟参考一下
小弟感激不尽
谢谢!!!!!!!!!
搜索更多相关主题的帖子: 数据库 表单 ing 记录 
2005-12-01 13:28
龙舟
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2005-11-5
收藏
得分:0 
循环
dim i=1
rs.addnew
rs("字段")=文本框&i
i=i+1
rs.update
if i>10 '假设你要添加的记录数是10条
跳出循环
end if
loop

基本思路就是这样了
2005-12-01 13:42
happyhu
Rank: 1
等 级:新手上路
帖 子:292
专家分:0
注 册:2005-7-12
收藏
得分:0 
我的情况是:提交时,从数据库里找到对应的记录,然后把价格更新进去(同时更新多条记录,而且数目不一定)
请各位高手指教!!!!!!
谢谢!!!!!

2005-12-01 13:48
happyhu
Rank: 1
等 级:新手上路
帖 子:292
专家分:0
注 册:2005-7-12
收藏
得分:0 

没有知道的吗?不可能吧!请高手指点一下啊,谢谢!!!


2005-12-01 15:29
小鼓锤
Rank: 1
等 级:新手上路
帖 子:175
专家分:0
注 册:2005-11-29
收藏
得分:0 
rs.open sql,conn,1,1
该为:
rs.open sql,conn,
3,3
因为在调用数据库时,应该为可读可写的啊!
1代表的是可读,不能写啊!

若说错了,敬请见谅!!!!
2005-12-01 19:21
happyhu
Rank: 1
等 级:新手上路
帖 子:292
专家分:0
注 册:2005-7-12
收藏
得分:0 
5楼的朋友,真不好意思,我下午出去了一下,没关电脑,现在刚刚回来,才看到你的留言,请见谅!!!
谢谢各位的指教,我先试一下,又不懂的地方再向大家请教。谢谢!!!

2005-12-01 22:14
happyhu
Rank: 1
等 级:新手上路
帖 子:292
专家分:0
注 册:2005-7-12
收藏
得分:0 
我参照5楼朋友的方法改了一下,加了一个隐藏的对象来传递id号实现了此功能,谢谢大家的帮忙。
但是提交表单时要验证每条记录的文本框是否填了值时不起作用,麻烦大家再帮我看一下,谢谢!!!
<%sub saveform()%>
<%if request("zbdw")="" then%>
<script language=javascript>
alert( "错误:请选择制表单位!" );
location.href = "javascript:history.back()"
</script>
<%elseif Request.form("jsfsh")="" then%>
<script language=javascript>
alert( "错误:请选择结算方式!" );
location.href = "javascript:history.back()"
</script>
<%elseif Request.form("thj")="" then%>
<script language=javascript>
alert( "错误:请输入提货价!" );
location.href = "javascript:history.back()"
</script>
<%else%>
<%
if request.form("jsfsh").count<>0 then
for i=1 to request.form("jsfsh").count
sql0="delete from jiage where shx='1'"
conn.execute(sql0)
id=request("id"&i)
qsrq=trim(Request.Form("qsyear"))&"-"&trim(Request.Form("qsmonth"))&"-"&trim(Request.Form("qsday"))
jsrq=trim(Request.Form("jsyear"))&"-"&trim(Request.Form("jsmonth"))&"-"&trim(Request.Form("jsday"))
set rs=server.CreateObject("adodb.recordset")
sql = "select * from jiage where kc_id="+id
rs.Open sql,conn,1,3
rs("chd") = Request.form("jsfsh")(i)
rs("jhj") = Request.form("thj")(i)
rs("qrj") = Request.form("thj")(i)
rs("zbdw") = request("zbdw")
rs("bzh") = request("bzh")(i)
rs("qsrq") = qsrq
rs("jsrq") = jsrq
rs("addtime") = now()
rs("shx") ="1"
rs.Update
rs.Close
set rs=nothing
next
end if
response.write "<p>"
response.write "<div align=center><br><br><br><font color=red>信息添加成功</font><p><a href=kucun.asp>返回</a></div>"
%>
<%end if%>

2005-12-01 23:48
快速回复:急!!!请教高手:如何同时从表单提交多条记录写入数据库?等待ing.. ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.027088 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved