超级列表框写入mysql失败

sefthil1990

.版本 2
.支持库 iext

.子程序 _按钮23_被单击
.局部变量 mysql, MYSQL数据库操作
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 记录值, 文本型
.局部变量 返回记录数量, 整数型
.局部变量 添加失败, 整数型
.局部变量 状态, 逻辑型
.局部变量 已存在, 整数型
.局部变量 添加成功, 整数型

.如果 (超级列表框21.取表项数 () ＝ 0)
    信息框 (“请填入数据源”, 0, , )
.否则
    mysql.连接sql服务器 (“127.0.0.1”, “root”, “root12345”, “xxx”, 3306)
    .计次循环首 (超级列表框21.取表项数 (), x)
        记录值 ＝ “”
        .计次循环首 (超级列表框21.取列数 (), y)
            记录值 ＝ 记录值 ＋ “'” ＋ 超级列表框21.取标题 (x － 1, y － 1) ＋ “'”
            .如果真 (超级列表框21.取列数 () ≠ y)
                记录值 ＝ 记录值 ＋ “,”
            .如果真结束

        .计次循环尾 ()
        mysql.cha询记录 (“qf”, “where 3='” ＋ 超级列表框21.取标题 (x － 1, 3) ＋ “' and 1='” ＋ 超级列表框21.取标题 (x － 1, 0) ＋ “'”, , 返回记录数量, )
        .如果 (返回记录数量 ＝ 0)
            状态 ＝ mysql.添加记录 (“qf”, “1,2,3,4,5,备注”, 记录值)
            .如果 (状态 ＝ 真)
                添加成功 ＝ 添加成功 ＋ 1
            .否则
                添加失败 ＝ 添加失败 ＋ 1
            .如果结束

        .否则
            已存在 ＝ 已存在 ＋ 1
        .如果结束

    .计次循环尾 ()
    mysql.连接断开 ()

疯牛狂颠

你取  命令 在SQL 执行一遍看看可以执行不？     ，有可能你构建命令有问题比如你可以调试输出这局 看看 (“qf”, “where 3='” ＋ 超级列表框21.取标题 (x － 1, 3) ＋ “' and 1='” ＋ 超级列表框21.取标题 (x － 1, 0) ＋ “'”, , 返回记录数量, )

疯牛狂颠

mysql.连接sql服务器 (“127.0.0.1”, “root”, “root12345”, “xxx”, 3306)   ，最好还是添加判断吧  ，好比你知道是否连接成功，万一服务器关闭了呢，或你忘记开启服务器呢！

apjy

mysql.连接sql服务器 (“127.0.0.1”, “root”, “root12345”, “xxx”, 3306)   ，最好还是添加判断吧  ，好比你知道是否连接成功，万一服务器关闭了呢，或你忘记开启服务器呢！

sefthil1990

apjy 发表于 2024-4-11 09:24
mysql.连接sql服务器 (“127.0.0.1”, “root”, “root12345”, “xxx”, 3306)   ，最好还是添加判断吧  ...

正常的。链接成功了

sefthil1990

666666666666666666666666666666666666666666666