CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
不看会后悔的Windows XP之经验谈 简单快捷DIY实用家庭影院
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  VB >  数据库(包含打印,安装,报表)

查询问题,我急死啦

楼主VichyV(薇姿)2005-11-04 19:19:15 在 VB / 数据库(包含打印,安装,报表) 提问

现有一个表A,我要从其中提取符合条件的记录插入表B中去.意思就是先打开表A,  
  如果当前这条记录的TTT这个段值为20,则将这条记录插入表B中去,用VB应该如何  
  实现呢,请各位前辈指教,  
   
   
  问题点数:20、回复次数:6Top

1 楼clear_zero(clear_zero)回复于 2005-11-04 19:37:15 得分 0

1.连接数据库   (默认你会)  
  2.打开表,插入  
  sql="insert   into   B   select   *   from   A   where   ttt=20"  
  conn.excute   sql  
  Top

2 楼northwolves(狼行天下)回复于 2005-11-04 19:39:47 得分 0

sql="INSERT   INTO   表B   SELECT   *   FROM   表A   where   TTT=20"  
   
  Top

3 楼VichyV(薇姿)回复于 2005-11-04 19:44:59 得分 0

但是我不是要把所有TTT=20的记录都插入B表,只把当前查到的这条插进去啊也就是这样的  
   
   
  Top

4 楼faysky2(出来混,迟早是要还嘀)回复于 2005-11-04 21:38:49 得分 0

sql="INSERT   INTO   表B   SELECT   top   1   *   FROM   表A   where   TTT=20"  
  Top

5 楼VichyV(薇姿)回复于 2005-11-05 12:55:06 得分 0

不行吧,可能是我没说清楚,我要达到目的是这样的:  
              在A表中是所有的记录,想做一个循环遍历记录的查询  
  for   i=0   to   rs.RecordCount  
            if   rs.fields("ttt")   =20   then  
                     
                  '将这条记录插入表B的代码我不知道要怎么写  
   
            else    
                    '将这条记录插入另一张表C的代码我不知道要怎么写  
   
            end   if  
   
  rs.movenext  
  next  
   
   
  Top

6 楼drinkcrow(自在寒鸦)回复于 2005-11-05 13:20:24 得分 20

sql="insert   into   B   values("   +   rs.fields("ttt")   +   ","   +   rs.field("XX")   ...   +")"  
  conn.excute   sql  
  注意数据类型Top

相关问题

  • 我现在想在ACCESS中按日期查询,怎么做呀,急死我了!!!
  • 为何我的ADO查询没有返回结果呀?急死了。
  • 急死我也!
  • 急死我了!!!!!!!!!!!!!!
  • 急死我了!!!!!!!
  • 我急死了!!!
  • 文件数据存贮与查询的问题,肯定给高分,急死我 了!
  • 我快急死了,居然有这样的怪毛病,ado+sql server两次相同查询的结果不同
  • 救命阿!!!!!!!!!!急死我了!!!!!!!!!!!
  • httpd & Samba:急死我了!

关键词

  • ttt
  • 记录
  • 插入
  • rs
  • insert
  • field
  • where
  • select

得分解答快速导航

  • 帖主:VichyV
  • drinkcrow

相关链接

  • Visual Basic类图书
  • Visual Basic类源码下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
北京创新乐知广告有限公司 版权所有, 京 ICP 证 070598 号
世纪乐知(北京)网络技术有限公司 提供技术支持
Copyright © 2000-2008, CSDN.NET, All Rights Reserved
GongshangLogo