易语言打开数据库的命令

.版本 2

子程序 打开数据库
    ' 连接数据库
    数据库连接句柄 ＝ 连接数据库 (“Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=testdb;Integrated Security=SSPI”)
    
    ' 检查是否连接成功
    如果 (数据库连接句柄 ＞ 0) 那么
        输出调试文本 ("数据库连接成功！")
        
        ' 执行SQL查询
        SQL ＝ "SELECT * FROM users"
        结果集句柄 ＝ 执行查询 (数据库连接句柄, SQL)
        
        ' 处理查询结果
        如果 (结果集句柄 ＞ 0) 那么
            输出调试文本 ("查询成功！")
            记录数 ＝ 获取记录数 (结果集句柄)
            输出调试文本 ("记录数: " ＋ 转文本 (记录数))
            
            ' 读取记录
            循环 (记录数)
                记录 ＝ 读取记录 (结果集句柄)
                输出调试文本 ("ID: " ＋ 转文本 (记录 ["ID"]) ＋ ", Name: " ＋ 记录 ["Name"])
            结束循环
        否则
            输出调试文本 ("查询失败！")
        结束如果
        
        ' 关闭结果集
        关闭结果集 (结果集句柄)
    否则
        输出调试文本 ("数据库连接失败！")
    结束如果
    
    ' 关闭数据库连接
    关闭数据库 (数据库连接句柄)
结束子程序