홈페이지 : http://www.fastbase.co.nz/fbsql/index.html
이 Tcl 확장은 간단한 Tcl 명령을 사용하여 MySQL 데이터베이스 서버에 대한 액세스를 제공합니다. 이 확장 프로그램을 작성한 이유는 기본 Tcl 애플리케이션(완전 통합 회계 시스템)에 현재 확장 프로그램에서 허용하는 것보다 더 많은 유연성이 필요했고, 성능을 높이고 싶었기 때문입니다(기본 쿼리 수행을 위한 래퍼 프로그램이 너무 많았기 때문입니다).
Here is a sample piece of code using fbsql:
# load the fbsql package and connect to a database
load fbsql.dll
sql connect 192.168.3.8 root ""
sql selectdb test
# retrieve a result set as a list of records, each list is a sub-list of all fields
set data [sql "SELECT BRANCH_ID, NAME FROM BRANCH ORDER BY NAME"]
# process a result set, one record at a time - method #1
foreach row [sql "SELECT BRANCH_ID, NAME FROM BRANCH ORDER BY NAME"] {
set id [lindex $row 0]
set name [lindex $row 1]
puts "id = $id, name = $name"
}
# process a result set, one record at a time - method #1
sql startquery "SELECT BRANCH_ID, NAME FROM BRANCH ORDER BY NAME" -array branch
while {[sql fetchrow] != ""} {
puts "id = $branch(BRANCH_ID), name = $branch(NAME)"
}
sql endquery
'확장 패키지 (Extension Package)' 카테고리의 다른 글
TclBin 1.2 (2) | 2024.09.05 |
---|---|
CWind 1.4 (0) | 2024.09.05 |
f/Calc for Tcl/Tk (0) | 2024.09.05 |
Tablelist 7.3 (0) | 2024.09.05 |
INIparse 1.4 (0) | 2024.09.05 |