Question

我正在开发一个需要与数据库通信的Web服务，所以我正在设计我的基本库，以便我可以访问桌面上的postgres。

Jun 5, 2013 1:27:46 PM com.mchange.v2.resourcepool.BasicResourcePool$AcquireTask run
WARNING: com.mchange.v2.resourcepool.BasicResourcePool$AcquireTask@15c313da -- Acquisition     
Attempt Failed!!! Clearing pending acquires. 
While trying to acquire a needed new resource, we failed to succeed more than the maximum number of allowed acquisition attempts (30). 
Last acquisition attempt exception:
java.sql.SQLException: No suitable driver
at java.sql.DriverManager.getDriver(DriverManager.java:264)

在我的db库中，我有以下

(ns myapp.db
     (:import [com.mchange.v2.c3p0 ComboPooledDataSource]))

(def specification {
    :classname "postgresql"
    :subprotocol "org.postgresql.Driver"
    :subname "//localhost:5432;database=test"
})

(defn pooled-data-source [specification]
    (let [datasource (ComboPooledDataSource.)]
        (.setDriverClass datasource (:classname specification))
        (.setJdbcUrl datasource (str "jdbc:" (:subprotocol specification) ":" (:subname specification)))
        (.setUser datasource (:user specification))
        (.setPassword datasource (:password specification))
        (.setMaxIdleTimeExcessConnections datasource (* 30 60))
        (.setMaxIdleTime datasource (* 3 60 60))
        {:datasource datasource}))

(def connection-pool
    (delay
        (pooled-data-source specification)))

(defn connection [] @connection-pool)

然后在我的单元测试中：

(ns myapp.db-test
    (:use clojure.test)
    (:require [myapp.db]
              [clojure.java.jdbc :as jdbc]))

(let [db (myapp.db/connection)]
    (jdbc/with-connection db)
        (jdbc/with-query-results rs ["select * from foo"]
            (doseq [row rs]
                (println row)))))

然而，这在REPL中有效，所以至少我知道数据库已启动并接受连接：

user=> (require '[clojure.java.jdbc :as sql])
user=> (sql/with-connection "postgresql://localhost:5432/test"  
            (sql/with-query-results results ["select * from foo"] 
                (doseq [result results] (println result))))
{:y 2, :x 1}
nil
user=>

非常感谢帮助！

我的project.clj如下

(defproject myapp "0.1.0"
    :description "myapp"
    :dependencies [
        [org.clojure/clojure "1.5.1"]
        [org.clojure/java.jdbc "0.3.0-alpha4"]
        [postgresql "9.1-901.jdbc4"]
        [c3p0/c3p0 "0.9.1.2"]])

Answer 1

也可能存在其他问题（我非常喜欢clojure新手），但你肯定有：classname和：subprotocol在你的规范中倒置了。：classname应为＆＃34; org.postgresql.Driver＆＃34;。：subprotocol应该是＆＃34; postgresql＆＃34;。

Answer 2

我建议修改你的规范

(def specification {
    :subprotocol "postgresql"
    :classname "org.postgresql.Driver"
    :subname "//localhost:5432/test"})

Clojure JDBC：无法找到Postgres驱动程序

2 个答案: