易语言API操作Access数据库源码 [db:版本]

易语言API操作Access数据库源码

系统结构:连接数据库,断开数据库连接,执行Sql语句,加入文本,取代码框文本,ZeroMemory,SQLExecDirect,SQLEndTran,SQLFetchScroll,SQLDisconnect,SQLDescribeCol,SQLFreeHandle,SQLGetDiagRec,SQLNumResultCols,SQLRowCount,SQLSetConnectAttr,SQLSetEnvAttr,SQLSetStmtAttr,SQLDriverConnect,SQLAllocHandle,SQLBindCol,SQLCloseCursor,GlobalAlloc,

======数据库
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 连接数据库
| |
| |------ 断开数据库连接
| |
| |------ 执行Sql语句
| |
| |
======main
| |
| |------ __启动窗口_创建完毕
| |
| |------ 加入文本
| |
| |------ 取代码框文本
| |
| |------ _按钮_连接_被单击
| |
| |------ _按钮_断开_被单击
| |
| |------ _按钮_执行_被单击
| |
| |------ ZeroMemory
| |
| |------ __启动窗口_可否被关闭
| |
| |------ _代码编辑框_Sql语句_按下某键
| |
| |
======调用的Dll
| |
| |---[dll]------ SQLExecDirect
| |
| |---[dll]------ SQLEndTran
| |
| |---[dll]------ SQLFetchScroll
| |
| |---[dll]------ SQLDisconnect
| |
| |---[dll]------ SQLDescribeCol
| |
| |---[dll]------ SQLFreeHandle
| |
| |---[dll]------ SQLGetDiagRec
| |
| |---[dll]------ SQLNumResultCols
| |
| |---[dll]------ SQLRowCount
| |
| |---[dll]------ SQLSetConnectAttr
| |
| |---[dll]------ SQLSetEnvAttr
| |
| |---[dll]------ SQLSetStmtAttr
| |
| |---[dll]------ SQLDriverConnect
| |
| |---[dll]------ SQLAllocHandle
| |
| |---[dll]------ SQLBindCol
| |
| |---[dll]------ SQLCloseCursor
| |
| |---[dll]------ GlobalAlloc

调用的DLL命令:

.DLL命令 SQLExecDirect, 短整数型, "odbc32.dll", "SQLExecDirectA"
.参数 a
.参数 b, 文本型
.参数 c

.DLL命令 SQLEndTran, 整数型, "odbc32.dll", "SQLEndTran"
.参数 a
.参数 b
.参数 c

.DLL命令 SQLFetchScroll, 整数型, "odbc32.dll", "SQLFetchScroll"
.参数 a
.参数 b
.参数 c

.DLL命令 SQLDisconnect, 整数型, "odbc32.dll", "SQLDisconnect"
.参数 a

.DLL命令 SQLDescribeCol, 整数型, "odbc32.dll", "SQLDescribeColA"
.参数 a
.参数 b
.参数 c, 文本型
.参数 d
.参数 e, , 传址
.参数 f, , 传址
.参数 g, , 传址
.参数 h, , 传址
.参数 i, , 传址

.DLL命令 SQLFreeHandle, 整数型, "odbc32.dll", "SQLFreeHandle"
.参数 a
.参数 b

.DLL命令 SQLGetDiagRec, 整数型, "odbc32.dll", "SQLGetDiagRecA"
.参数 a
.参数 b
.参数 c
.参数 d, 字节型, 数组
.参数 e, , 传址
.参数 f, 文本型, 传址
.参数 g
.参数 h, , 传址

.DLL命令 SQLNumResultCols, 整数型, "odbc32.dll", "SQLNumResultCols"
.参数 a
.参数 b, , 传址

.DLL命令 SQLRowCount, 整数型, "odbc32.dll", "SQLRowCount"
.参数 a
.参数 b, , 传址

.DLL命令 SQLSetConnectAttr, 整数型, "odbc32.dll", "SQLSetConnectAttrA"
.参数 a
.参数 b
.参数 c
.参数 d

.DLL命令 SQLSetEnvAttr, 短整数型, "odbc32.dll", "SQLSetEnvAttr"
.参数 a
.参数 b
.参数 c
.参数 d

.DLL命令 SQLSetStmtAttr, 整数型, "odbc32.dll", "SQLSetStmtAttrA"
.参数 a
.参数 b
.参数 c
.参数 d

.DLL命令 SQLDriverConnect, 整数型, "odbc32.dll", "SQLDriverConnectA"
.参数 a
.参数 b
.参数 c, 文本型
.参数 d
.参数 e, 文本型
.参数 f
.参数 g, , 传址
.参数 h

.DLL命令 SQLAllocHandle, 短整数型, "odbc32.dll", "SQLAllocHandle"
.参数 a, 整数型
.参数 b, 整数型
.参数 c, 整数型, 传址

.DLL命令 SQLBindCol, 整数型, "odbc32.dll", "SQLBindCol"
.参数 a
.参数 b
.参数 c
.参数 d, 整数型
.参数 e
.参数 f, , 传址

.DLL命令 SQLCloseCursor, 整数型, "odbc32.dll", "SQLCloseCursor"
.参数 a

.DLL命令 GlobalAlloc, 整数型, , "GlobalAlloc"
.参数 a
.参数 b