易语言mysql写入文件

.版本 2

子程序 MySQL写入文件
    ' 连接MySQL数据库
    MySQL连接句柄 ＝ MySQL连接("localhost", "用户名", "密码", "数据库名")
    如果 (MySQL连接句柄 ＝ 0) 则
        输出调试文本("连接数据库失败！")
        返回
    否则
        输出调试文本("连接数据库成功！")
    结束如果

    ' 执行SQL查询
    SQL查询句柄 ＝ MySQL执行查询(MySQL连接句柄, "SELECT * FROM 表名")
    如果 (SQL查询句柄 ＝ 0) 则
        输出调试文本("查询失败！")
        返回
    否则
        输出调试文本("查询成功！")
    结束如果

    ' 打开文件
    文件句柄 ＝ 文件打开("输出路径\文件名.txt", 文件模式写入)
    如果 (文件句柄 ＝ 0) 则
        输出调试文本("打开文件失败！")
        返回
    否则
        输出调试文本("打开文件成功！")
    结束如果

    ' 读取查询结果并写入文件
    循环 (MySQL读取记录(SQL查询句柄))
        文件写入(文件句柄, 字符串(字段1) ＋ " " ＋ 字符串(字段2) ＋ "n")
    结束循环

    ' 关闭文件和数据库连接
    文件关闭(文件句柄)
    MySQL关闭查询(SQL查询句柄)
    MySQL断开连接(MySQL连接句柄)

    输出调试文本("数据写入文件成功！")
结束子程序