写关联表的问题 谢谢

Question

三个表A(B,C),B(b,x),C(c,m)...........
rs.Open "select * from A,B,C where A.B=B.b and A.C=C.c", conn, 1, 3
...........rs.AddNew
rs("B")=Trim(txtB.Text)
rs("C")=Trim(txtC.Text)
rs.Update
..........
我想在写A表的B的同时也把数据写到B表的b项里 请问这样对吗？

Answer 1

rs.open "select a.b as ab,b.b as bb where a.b=b.b and a.c=c.c",conn,1,3
rs.AddNew
rs("ab")=Trim(txtB.Text)
rs("bb")=Trim(txtC.Text)
rs.Update

Answer 2

这种方式不好
建议你还是用SQL语句更新比较保险

Answer 3

xing0091() 的方法肯定行不通的，rs是一个数据视图，往其中添加数据是没有意义也是不可能的，解决办法还是用SQL语句更新，或者写成存储过程

Answer 4

我不完全同意楼上的说法
虽然我也是用sql语句解决相应的问题，但是如果是用rs打开一个表的话，还是可以更新的，因为我没有试过打开多表的（都是用的sql语句），所以如果有错误还请原谅