VB 查询到的结果另存为一个表 可否实现

jainkai 2010-07-06 06:25:26
表1查询到的结果为

字段1 字段2 字段3 字段4 字段5 字段6
1 a b c b e
2 e w q r u
3 ll ff ee kk jj

现在请问

如何把这个查到的结果另外添加到另一张表

而且我只需要字段1 字段3 和字段6的数据

就是把下面的内容添加到表2 表2里就三个字段
字段1 字段3 字段6
1 b e
2 w u
3 ff jj


请问是否可以实现
...全文
107 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
ChinaITOldMan 2010-07-20
  • 打赏
  • 举报
回复
insert into 表2(字段1,字段3,字段6) select 字段1,字段3,字段6 from 表1
xuggzu 2010-07-06
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 leftie 的回复:]

insert into 表2(字段1,字段3,字段6) select 字段1,字段3,字段6 from 表1
[/Quote]

同上
贝隆 2010-07-06
  • 打赏
  • 举报
回复
[Quote=引用 1 楼 leftie 的回复:]
insert into 表2(字段1,字段3,字段6) select 字段1,字段3,字段6 from 表1
[/Quote]

+1
jainkai 2010-07-06
  • 打赏
  • 举报
回复
aa 啊啊 求助 啊 求助 求助大家
jainkai 2010-07-06
  • 打赏
  • 举报
回复
Private Sub Command2_Click()
SQL = "insert into biao2(字段1,字段3,字段6) select字段1,字段3,字段6 from biao1"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " + App.Path + "/db1.mdb;Persist Security Info=False"

Adodc1.RecordSource = SQL
End Sub


好像不行唉 忘再赐教
luofenghen 2010-07-06
  • 打赏
  • 举报
回复
insert into 表2(字段1,字段3,字段6) values (select 字段1,字段3,字段6 from 表1)
饮水需思源 2010-07-06
  • 打赏
  • 举报
回复
insert into 表2(字段1,字段3,字段6) select 字段1,字段3,字段6 from 表1

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧