关于数据集读取代码编写的问题

hzancheng

据说易语言是VB来的，asp里读取记录集的时候可以这样写：

  

rs.open sql,conn,1,1
while not rs.eof
for i = 0 to rs.fieldcount
输出  rs (i)
next
rs.movenext
wend
rs.close

rs.open sql,conn,1,1<br /> while not rs.eof<br />     for i = 0 to rs.fieldcount<br />         输出  rs(i)<br />     next<br />     rs.movenext<br /> wend<br /> rs.close

很简单的几句代码就遍历完了，而易语言则必须按如下方式来写吗？

  

记录集1.打开 (sql, #SQL语句, )
计次循环首（记录集1.记录数量，y)
记录集1.读文本（“字段1”,字段2)
记录集1.读文本（“字段2”,字段2)
................. 以下还有98个字段
' 输出语句略
记录集1.到下一条（）
计次循环尾
记录集1.关闭 ()

记录集1.打开 (sql, #SQL语句, )<br /> 计次循环首（记录集1.记录数量，y)<br />       记录集1.读文本（“字段1”,字段2)<br />       记录集1.读文本（“字段2”,字段2)<br />       ................. 以下还有98个字段<br />       '输出语句略<br />      记录集1.到下一条（）<br /> 计次循环尾 <br /> 记录集1.关闭 ()

感觉好不程序员的样子，求大神，有类似VB的写法或者更简洁的代码吗？拜谢了！

亮蓝色的风

调用格式： 〈逻辑型〉 对象．读文本 （通用型 序号或字段名，文本型变量 文本变量） - 数据库操作支持库->记录集
    英文名称：ReadString
    通过序号或字段名读取文本数据到变量中。返回一个逻辑型值，如果读成功返回真，否则返回假。本命令为初级对象成员命令。
    参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。本参数提供字段的序号或者字段名，只能为数值或文本型，序号值从 0 开始。
    参数<2>的名称为“文本变量”，类型为“文本型（text）”，提供参数数据时只能提供变量。本参数提供要读取到的文本变量。

    操作系统需求： Windows

直接用序号读取呗

  

记录集1.打开 (sql, #SQL语句, )
计次循环首 (记录集1.记录数量, y)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (字段数量, i)
记录集1.读文本 (i － 1, 字段 [i])
超级列表框1.置标题 (索引, i － 1, 字段 [i])
计次循环尾 ()
记录集1.到下一条 ()
计次循环尾 ()
记录集1.关闭 ()

i支持库列表	支持库注释
eDB	数据库操作支持库
iext	扩展界面支持库一

.版本 2<br /> .支持库 eDB<br /> .支持库 iext<br /> <br /> 记录集1.打开 (sql, #SQL语句, )<br /> .计次循环首 (记录集1.记录数量, y)<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (字段数量, i)<br />         记录集1.读文本 (i － 1, 字段 <i>)<br />         超级列表框1.置标题 (索引, i － 1, 字段 <i>)<br />     .计次循环尾 ()<br />     记录集1.到下一条 ()<br /> .计次循环尾 ()<br /> 记录集1.关闭 ()

鹏书

自己封装啊，封装好了就一样了啊

影知

mysql 有取所有字段中的命令 ，取出来后循环就像了

走一回

易语言的读取与VB的几乎是一样的呀，有什么问题吗？其他语言也应该差不多的代码。