package require java java::import -package java.sql DriverManager java::call Class forName "sun.jdbc.odbc.JdbcOdbcDriver" set conn [java::call DriverManager getConnection "jdbc:odbc:Driver={Microsoft Access Driver (*.mdb)};DBQ=.\hello.mdb" "" ""] set stmt [$conn createStatement] set rs [$stmt executeQuery "SELECT 'Hello, JDBC Type1 World!' AS Message"] while { [$rs next] } { puts [$rs {getString int} 1] } $rs close $stmt close $conn close