2290
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
1 #!/usr/bin/env ruby
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
2 #coding:utf-8
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
3
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
4 require'cgi'
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
5 require'sqlite3'
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
6
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
7 db = SQLite3::Database.new("../sql/stamp.sq3")
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
8
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
9 c = CGI.new(:accept_charaset => "UTF-8")
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
10
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
11 flag = 0
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
12 text = "<p>脂画筝荀с茵腓冴障</p>\n"
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
13 begin
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
14 result = db.execute("select * from main;")
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
15 rescue
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
16 flag = 1
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
17 text = "<p>若帥障</p>\n"
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
18 end
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
19
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
20 printf("Content-type: text/html; charset=UTF-8\n\n")
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
21
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
22 printf'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/h
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
23 tml4/strict.dtd">
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
24 <html>
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
25 <head>
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
26 <title>Delete table</title>
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
27 <link rel="stylesheet" type="text/css" href="design.css">
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
28 </head>
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
29 </body>
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
30 <h1>若翠画Η若</h1>'
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
31 puts text
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
32 if flag == 1
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
33 else
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
34 print"<table border = 1>\n"
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
35 result.each do |line|
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
36 printf("<tr><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td><td>%s</td></tr>\n",line[0],line[1],line[2],line[3],line[4],line[8],line[9])
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
37 end
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
38 print"</table>"
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
39 end
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
40
|
FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp>
parents:
diff
changeset
|
41 print'</body></html>'
|