大家好：请教大家 如何将下面两段代码合成一段

strsql= "select * from CardInfo where CardSn=" & CardSna & ""
set rs5 = Server.CreateObject("ADODB.Recordset")
rs5.Open strsql, conn, 1, 3
rs5("CardSn")=request.form("CardSn")
rs5.update
rs5.close
set rs5=nothing
strsql= "select * from CardProduct where CardSn=" & CardSna & ""
set rs5 = Server.CreateObject("ADODB.Recordset")
rs5.Open strsql, conn, 1, 3
rs5("CardSn")=request.form("CardSn")
rs5.update
rs5.close
set rs5=nothing

还有更新的时候 CardProduct 表里面有多条一样的 CardSn记录 怎么只能更新一条呢，谢谢大家

[此贴子已经被作者于2007-6-26 17:09:26编辑过]

晕4
你想实现什么？

同时更新两个表里的数据，上面的代码可以更新，我想精简一下，但有个问题就是 表里的cardsn字段里面有相同的很多内容，比如 1234  我将1234更新为2345后，只有第一个1234被更新成2345，其它的没有更新，麻烦楼上及各位帮忙整一下，谢谢

你要一下过没有更新数据库的全部吗??
if 1 to rs.recordcount
if rs.eof then exit for
rs5("CardSn")=request.form("CardSn")
rs5.update

rs.movenext
next
不知道是不是这个意思！！

strsql= "select * from CardInfo where CardSn=" & CardSna & ";select * from CardProduct where CardSn=" & CardSna & ""
set rs5 = Server.CreateObject("ADODB.Recordset")
rs5.Open strsql, conn, 1, 3
rs5("CardSn")=request.form("CardSn")
rs5.update
rs5.close
set rs5=nothing

之前我有看过高手写过这么一段SQL语句，不过我是没用过，不晓得能用不？试下吧

哇
把2句sql合在一起啦！！

不知道能用不，那人一句SQL里面写了4个查询语句，当时我都看晕了，第一次见过这么写SQL的

楼上的代码我试过了，好像不行，

4楼的代码我也试过了：
if 1 to rs.recordcount
if rs.eof then exit for
rs5("CardSn")=request.form("CardSn")
rs5.update
rs5.movenext
next
好像有点问题哦，谢谢各位，还需要大家的帮忙

你那是属于批量更新，好久没写程序了，不怎么记得怎么写批量更新程序了

还望楼上 和大家帮忙研究一下，我也正在慢慢试，我也不怎么懂就是乱试，有时候运气好就有可能对了，但需要大家给个思路，谢谢！