| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 432 人关注过本帖
标题:[求助]数据查询和添加
只看楼主 加入收藏
tbsharp
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-4-23
收藏
 问题点数:0 回复次数:2 
[求助]数据查询和添加
请问怎样把查询一个表中的数据然后添加到另外一个表啊?
那条查询语句怎么样啊?我的数据库是Access!
搜索更多相关主题的帖子: 数据 查询 
2006-04-25 14:32
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
利用rs赋值也可以实现
如果两个表的字段类型和结构完全一样
可以一个读取一个写入

Dim rsR
Dim rsW
Dim i
Set rsR=Server.CreateObject("ADODB.RecordSet")
Set rsW=Server.CreateObject("ADODB.RecordSet")
rsR.Open "select * From Table1",con,1,3
rsW.Open "select * From Table2",con,1,3
Do Until rsR.EOF
rsW.addNew
For i=0 To rsR.Fields.Count-1
rsW.Fields(i).Value=rsR.Fields(i).Value
Next
rsR.MoveNext
Loop
rsW.Update()
rsR.Close
rsW.Close
Set rsR=Nothing
Set rsW=Nothing
2006-04-25 15:27
tbsharp
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2006-4-23
收藏
得分:0 
错误类型:
ADODB.Recordset (0x800A0BB9)
参数类型不正确,或不在可以接受的范围之内,或与其他参数冲突。

我说清楚点吧!
数据库名称:course
我想查找表course中字段courseNo然后把查找出来的数据添加到
表result中的字段courseNo。

2006-04-25 16:31
快速回复:[求助]数据查询和添加
数据加载中...
 
   



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

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