易语言创建mysql库

.版本 2

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

子程序 创建表
    ' 假设已经连接到数据库
    执行SQL (本地连接句柄, “CREATE TABLE IF NOT EXISTS users (id INT AUTO_INCREMENT PRIMARY KEY, name VARCHAR(255), email VARCHAR(255))”)
返回

子程序 插入数据
    ' 假设已经连接到数据库
    执行SQL (本地连接句柄, “INSERT INTO users (name, email) VALUES ('张三', 'zhangsan@example.com')”)
返回

子程序 查询数据
    ' 假设已经连接到数据库
    本地结果集 ＝ 查询SQL (本地连接句柄, “SELECT * FROM users”)
    循环首 (本地结果集)
        输出调试文本 (“ID: ” + 转文本(读取记录 (本地结果集, “id”)))
        输出调试文本 (“Name: ” + 转文本(读取记录 (本地结果集, “name”)))
        输出调试文本 (“Email: ” + 转文本(读取记录 (本地结果集, “email”)))
    循环尾 ()
返回

子程序 关闭数据库连接
    ' 假设已经连接到数据库
    关闭连接 (本地连接句柄)
返回