clojure mysql_Clojure学习——使用clojure jdbc操作mysql

CREATE DATABASE test;

CREATE TABLE `users` (

`id` int(11) NOT NULL AUTO_INCREMENT,

`name` varchar(20) DEFAULT NULL,

`email` varchar(100) DEFAULT NULL,

PRIMARY KEY (`id`)

);

二、新建lein项目(lein new examples)。

三、编辑examples项目的project.clj文件，添加需要的jdbc依赖包。

(defproject examples "0.1.0-SNAPSHOT"

:description "FIXME: write description"

:url "http://example.com/FIXME"

:license {:name "Eclipse Public License"

:url "http://www.eclipse.org/legal/epl-v10.html"}

:dependencies [[org.clojure/clojure "1.4.0"]

[org.clojure/java.jdbc "0.2.3"]

[mysql/mysql-connector-java "5.1.21"]])

四、下载依赖(lein deps)。(PS:由于我用的IDE是IntelliJ IDEA，且现在的IDE对于lein2支持不是太好。我就只好再打个命令：lein pom 生成pom文件，然后再用IntelliJ IDEA打开pom文件来导入工程了。)

五、编写代码。src/examples/jdbc.clj代码如下：

(ns examples.jdbc

(:require [clojure.java.jdbc :as sql]))

(def mysql-db {:subprotocol "mysql"

:subname "//127.0.0.1:3306/test"

:user "root"

:password "123456"})

;;;在users表中插入三条记录

(sql/with-connection mysql-db

(sql/insert-records :users

{:name "bill" :email "bill@hello.com" }

{:name "ken" :email "ken@hello.com"}

{:name "lili" :email "lili"}))

;;查询并打印第一条记录的name字段

;;可以在命令行：lein run -m examples.jdbc 查看运行结果

(defn -main []

(let [name (sql/with-connection mysql-db

(sql/with-query-results rows

["SELECT * FROM users "]

(:name (first rows))))]

(prn name)))

我知道的运行上面代码的几种方法：

1、直接使用lein run -m examples.jdbc运行。

2、lein repl命令启动后，拷贝进去跑就是了。

3、通过IntelliJ IDEA来运行。

最后，附上本例子工程的到附件中。

参考资料：https://github.com/technomancy/leiningen/blob/master/doc/TUTORIAL.md

https://github.com/clojure/java.jdbc

下载次数: 17

0

顶

3

踩

分享到：

2012-12-05 11:12

浏览 3920

评论