The following example assumes that thesql package has been loaded, and that the:odbc database type has been initialized. It connects to two databases,scott andpersonnel, and then prints out the connected databases.
(setf *default-database-type* :odbc) (connect "scott") (connect "personnel" :database-type :odbc) (print *connected-databases*)