用VB如何比较ACCESS数据表中两列数据的大小并将结果写入另一个数据表中 20
1个回答
展开全部
假设你用ADO连接数据库,ADO对象为conn
记录指针对象为Rs
设表1的结构为
列1 列2 列3 列4
张三 5 6 4
李四 3 1 5
王五 5 7 9
赵六 2 3 4
表2结构为
列1
现在要将列2和列3中同一行的较大的数写入表2中
do while not rs.eof
sqlcmd="select 列2,列3 from 表1"
set rs=conn.execute(sqlcmd)
if rs(0)>rs(1) then
conn.execute("insert into 表2 value(" & rs(0) & ")" )
else
conn.execute("insert into 表2 value(" & rs(1) & ")" )
endif
rs.movenext
loop
如还有问题请百度HI联系
记录指针对象为Rs
设表1的结构为
列1 列2 列3 列4
张三 5 6 4
李四 3 1 5
王五 5 7 9
赵六 2 3 4
表2结构为
列1
现在要将列2和列3中同一行的较大的数写入表2中
do while not rs.eof
sqlcmd="select 列2,列3 from 表1"
set rs=conn.execute(sqlcmd)
if rs(0)>rs(1) then
conn.execute("insert into 表2 value(" & rs(0) & ")" )
else
conn.execute("insert into 表2 value(" & rs(1) & ")" )
endif
rs.movenext
loop
如还有问题请百度HI联系
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询