.DLL命令 sqlite3_close, 整数型, "dllsqlite.dll", "sqlite3_close"
    .参数 Handle, 整数型

.DLL命令 sqlite3_exec, 整数型, "dllsqlite.dll", "sqlite3_exec"
    .参数 Handle, 整数型
    .参数 SQL, 文本型
    .参数 CallBack, 整数型
    .参数 other, 整数型
    .参数 错误代码, 整数型, 传址

.DLL命令 GetProcAddress, 整数型, "dllsqlite.dll", "MyGetProcAddress", '这是我在封装Sqlite加进去得一个函数。。。原因 VB不支持指针。
    .参数 函数, 子程序指针

.DLL命令 sqlite3_last_insert_rowid, 长整数型, "dllsqlite.dll", "sqlite3_last_insert_rowid"
    .参数 Handle, 整数型

.DLL命令 sqlite3_get_table, 整数型, "dllsqlite.dll", "sqlite3_get_table"
    .参数 sqlite3, 整数型
    .参数 SQL, 文本型
    .参数 resultp, 整数型, 传址
    .参数 row, 整数型, 传址, '记录数
    .参数 col, 整数型, 传址, '列数
    .参数 错误代码, 整数型, 传址, '出错才用。

.DLL命令 sqlite3_free_table, 整数型, "dllsqlite.dll", "sqlite3_free_table"
    .参数 Handle, 整数型

.DLL命令 MyGetData, 文本型, "dllsqlite.dll", "MyGetDataA", '这是我编写得一个dll功能是读取表中得数据,原因，VB不支持指针。
    .参数 指针, 整数型
    .参数 记录, 整数型
    .参数 列, 整数型
    .参数 列总数, 整数型

.DLL命令 GetVersion, 整数型, "dllsqlite.dll", "MyGetVersion" ‘自己编写得。

///////////////////////////////////以上API都已经经过严格测试，
另外还封装了：－－－没有测试。
const void *sqlite3_column_blob(sqlite3_stmt*, int iCol);
int sqlite3_column_bytes(sqlite3_stmt*, int iCol);
int sqlite3_column_bytes16(sqlite3_stmt*, int iCol);
double sqlite3_column_double(sqlite3_stmt*, int iCol);
int sqlite3_column_int(sqlite3_stmt*, int iCol);
long long int sqlite3_column_int64(sqlite3_stmt*, int iCol);
const unsigned char *sqlite3_column_text(sqlite3_stmt*, int iCol);
const void *sqlite3_column_text16(sqlite3_stmt*, int iCol);
int sqlite3_column_type(sqlite3_stmt*, int iCol);

sqlite_vb.rar (142737bytes)