adbsql - MySQL connectivity for ADB Tcl database implementation
package require Tcl 8
package require mysqltcl
|
This package provides connectivity of an ADB database to a MySQL database. By using adbsql in combination with adb and a MySQL database, your data is always safely stored in a database, even if you did not save it to a file.
This package uses the mysqltcl package that should be installed.
set result [DBSQL::Connect \
-port 3306 \
-host 127.0.0.1 \
-user myuser \
-password topsecret \
-database adbexample \
-new 1]
if { $result == 0 } {
tk_dialog .hi "Error" \
"Cannot open database. Error message: [DBSQL::ErrorMessage]" \
error {} Ok
return
}
|
adb, database, mysql, mysqltcl, sql, tcl
Copyright © Roalt Aalmoes, 2007