Closes a connection to a database. When a program establishes multiple simultaneous active connections, separate OdbcDisconnect function calls must be performed for each active connection.
ODBC.bdh
OdbcDisconnect( in hConnection : number ) : boolean;
true if successful
false otherwise
Parameter | Description |
---|---|
hConnection | Handle to a database connection. |
var hEnv, hDbc : number; cCursor : cursor; dcltrans transaction TMain begin OdbcAlloc(SQL_HANDLE_ENV, hEnv); OdbcAlloc(SQL_HANDLE_DBC, hDbc, hEnv); OdbcConnect(hDbc, "DSN=database;UID=user;PWD=pass;"); OdbcOpen(cCursor, hDbc); OdbcPrepare(cCursor, sqlInsert); OdbcBind(cCursor, ":1", SQL_C_CHAR, 32); OdbcBind(cCursor, ":2", SQL_C_LONG); OdbcSetString(cCursor, ":1", "Bob", 1); OdbcSetInt(cCursor, ":2", 25, 1); OdbcSetString(cCursor, ":1", "Marcy", 2); OdbcSetInt(cCursor, ":2", 33, 2); OdbcExecute(cCursor); OdbcClose(cCursor, SQL_DROP); OdbcCommit(hDbc); OdbcDisconnect(hDbc); OdbcFree(hDbc); OdbcFree(hEnv); end TMain; dclsql sqlInsert: INSERT INTO persons (name, age) VALUES (?, ?);