标题:[求助]数据查询和添加
只看楼主
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



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-60023-1-1.html




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

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