易语言mysql数据库查询

'导入MySQL库
#include "MySQL.h"

'连接数据库
dim conn as MySQL_Conn
conn = MySQL_Conn()
conn.Host = "localhost" '数据库服务器地址
conn.Port = 3306 '数据库端口号
conn.User = "root" '用户名
conn.Password = "password" '密码
conn.Database = "mydb" '数据库名
MySQL_Conn_Connect(conn)

'执行查询语句
dim query as MySQL_Query
query = MySQL_Query(conn)
MySQL_Query_Exec(query, "SELECT * FROM users")

'遍历查询结果
dim result as MySQL_Result
result = MySQL_Query_GetResult(query)
while MySQL_Result_MoveNext(result)
    '获取各字段的值
    dim id as integer = MySQL_Result_GetInt(result, "id")
    dim name as string = MySQL_Result_GetString(result, "name")
    dim age as integer = MySQL_Result_GetInt(result, "age")
    print "ID: " + str(id)
    print "Name: " + name
    print "Age: " + str(age)
    print ""
wend

'释放资源
MySQL_Result_Free(result)
MySQL_Query_Free(query)
MySQL_Conn_Close(conn)
MySQL_Conn_Free(conn)