使用clojure訪问SQL Server数据库

(require '[korma.core :as kc])
(require '[korma.db :as kd])
(Class/forName "com.microsoft.jdbc.sqlserver.SQLServerDriver")
(kc/defentity sysobjects)
(kd/defdb db (kd/mssql {:user "sa", :password "eemm", :db "master", :host "133.109.24.252", :port "1433" :make-pool? false}))
(kc/select sysobjects)