关于超级列表框导入MYSQL 或是EXCEL导入mysql

wangjinlu

.版本 2
.支持库 iext
.支持库 mysql
.支持库 spec
.子程序 _按钮_导入_被单击
.局部变量 行数, 整数型
.局部变量 列数, 整数型
.局部变量 列标题, 文本型
.局部变量 临时变量, 文本型
.局部变量 表名, 文本型
表名 ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
.计次循环首 (超级列表框2.取表项数 (), 行数)
    .计次循环首 (超级列表框2.取列数 (), 列数)
        .如果 (列数 ＝ 1)
            列标题 ＝ 超级列表框2.取列标题 (列数 － 1)
            临时变量 ＝ “'” ＋ 超级列表框2.取标题 (行数 － 1, 列数 － 1) ＋ “'”
        .否则
            列标题 ＝ 列标题 ＋ “,`” ＋ 超级列表框2.取列标题 (列数 － 1) ＋ “`”
            临时变量 ＝ 临时变量 ＋ “,`” ＋ 超级列表框2.取标题 (行数 － 1, 列数 － 1) ＋ “`”
        .如果结束
    .计次循环尾 ()
    .如果 (执行SQL语句 (mysql句柄, “INSERT INTO” ＋ 表名 ＋ “(” ＋ 列标题 ＋ “）VALUES（” ＋ 临时变量 ＋ “）”) ＝ 假)
        信息框 (“数据上传失败”, 0, , )
    .否则
    .如果结束

    调试输出 (“列标题:” ＋ 列标题)
    调试输出 (“临时变量:” ＋ 临时变量)
    调试输出 (“表名:” ＋ 表名)
.计次循环尾 ()



或是给个EXCEL 直接入MYSQL

qingying

去易求助，https://bbs.125.la/forum.php?mod=forumdisplay&fid=81&filter=typeid&typeid=15，积分求助没人管的