如何实现数据库查询后定义成数组

[复制链接]
查看11 | 回复1 | 2009-2-10 17:30:30 | 显示全部楼层 |阅读模式
select * from chacha where id=2
得到有N条内容,分别是:
1 wa1=2,wa2=3,wa5=6,wa8=10
2 wa1=4,wa3=9,wa11=5,wa22=30,wa23=3
现在想得到这样的数组:
var lie="111122222"
var zhi="2,3,6,10"
var shu="1,2,5,8,1,3,11,22,23"
拜托啦~~~
select * from chacha where id=2
得到有N条内容,分别是:
1 wa1=2,wa2=3,wa3=0,wa4=0,wa5=6,wa6=0,wa7=0,wa8=10
2 wa1=4,wa2=0,wa3=9,wa4=15,wa5=0,wa6=0,wa7=9,wa8=22
现在想得到这样的数组:
var lie="1,1,1,1,2,2,2,2,2" '即:第1条数据中有4个不为0,第2条数据中有5条不为0...
var zhi="2,3,6,10,4,9,15,9,22" '即:第1条数据中不为0的4个值依次为2,3,6,10,第2条数据中不为0的5个值依次为4,9,15,9,22...
var shu="1,2,5,8,1,3,4,7,8"'即:第1条数据中是1,2,5,8这几个数不为0,第2条数据中是1,3,4,7,8不为0...
拜托啦~~~

回复

使用道具 举报

千问 | 2009-2-10 17:30:30 | 显示全部楼层
我这代码是用vbs写的 set db = CreateObject("ADODB.Connection") db.Open("...") sql = "select * from chacha where id=2" set rs = db.Execute(sql) row = 1 lie = "" zhi = "" shu = "" do until rs.EOF for x = 1 to rs.fields.count ' 或者直接写 to 8 waValue = rs("wa" & x) if waValue != 0 then ' 如果数据类型是字符串,就把0改为"0" lie = l...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行