| 网站首页 | 业界新闻 | 群组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 编程论坛
共有 424 人关注过本帖
标题:循环的一个问题
只看楼主 加入收藏
ykk1106
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2018-1-19
结帖率:66.67%
  已结贴   问题点数:20  回复次数:4   
循环的一个问题
怎么把循环中msgbox每次得到的一组数据共(共i*j组),放入到sql的语句中写入数据库。
现在执行只能取到循环完成后的最后一组数据,执行了一次sql语句,怎么执行(i*j)次,循环插入数据库中??
附件: 您没有浏览附件的权限,请 登录注册
2018-02-05 19:48
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:216
帖 子:4233
专家分:25903
注 册:2008-10-15
  得分:5 
每次生成 SQL 命令后,调用执行过程 执行一下 。



授人于鱼,不如授人于渔
早已停用QQ了
2018-02-05 20:33
wds1
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:22
帖 子:240
专家分:1332
注 册:2016-3-10
  得分:5 
你的sql循环赋值后,没有执行查询程序。
你把查询放到循环体内,否则只能执行最后赋值的sql查询。
2018-02-06 08:17
ZHRXJR
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:65
帖 子:694
专家分:3735
注 册:2016-5-10
  得分:10 
回复 楼主 ykk1106
我认为你的这个有问题,1、s是动态数组,使用 split(Text1.Text,vbCrLf) 分割应该没有问题。
2、你的sql语句应该有问题,没有添加数据的字段名,数据不知道应该添加在那里?
3、在二层循环中使用Msgbox语句想得到全部循环内容,是不可能的,因为在循环中每次均更新Msgbox的值,直至退出循环时的值,因此,显示的是最后一条。
        解决办法:
        你可以在循环外声明一个字符变量(例如:XHzfc As String),在循环体中
        XHzfc = XHzfc & "每次循环的值" & vbCrLf
        最后循环结束后,在循环体外 Msgbox = XHzfc 将可以了。
4、现在你仅仅是sql语句,没有对数据表进行更新,因此数据表不会添加记录的!

QQ    2653043392
2018-02-06 09:22
ykk1106
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2018-1-19
  得分:0 
谢谢大家的指点
我把rs.Open Trim(sql), mycon, adOpenKeyset, adLockOptimistic 这条语句拿到循环内放在sql的后面 ,
数据就可以全部取到了
2018-02-07 13:35







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

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