精易论坛

标题: _启动窗口.记录集1.删除 为什么删除不了 [打印本页]

作者: likun466476613    时间: 2017-4-27 16:10
标题: _启动窗口.记录集1.删除 为什么删除不了
_启动窗口.记录集1.删除(1)  为什么总是删不掉

--------------下面是代码--------------
.版本 2
.支持库 eDB
.支持库 iext
.支持库 spec

连接数据库 (取运行目录 () + “\Database1.mdb”, )
_启动窗口.记录集1.置连接 (_启动窗口.数据库连接1)
_启动窗口.记录集1.打开 (“二级表”, #数据表名, )
.计次循环首 (超级列表框购物车.取表项数 (), 当前循环数1)
    加入成员 (位置数组, 超级列表框购物车.取标题 (当前循环数1 - 1, 0))
.计次循环尾 ()
.计次循环首 (取数组成员数 (位置数组), 当前循环数2)
    .如果真 (位置数组 [当前循环数2] ≠ “”)
        _启动窗口.记录集1.移到 (到整数 (位置数组 [取数组成员数 (位置数组) - 当前循环数2 + 1]))
        调试输出 (位置数组 [取数组成员数 (位置数组) - 当前循环数2 + 1])
        调试输出 (_启动窗口.记录集1.当前位置)
        _启动窗口.记录集1.删除 (1)
    .如果真结束

.计次循环尾 ()







欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4