Mercurial > hgrepos > hgweb.cgi > skipweb
diff etsuran.rb @ 2290:bd675bc7adcf
データ消す用見る用プログラム added
author | FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp> |
---|---|
date | Wed, 23 Jul 2014 16:01:44 +0900 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/etsuran.rb Wed Jul 23 16:01:44 2014 +0900 @@ -0,0 +1,41 @@ +#!/usr/bin/env ruby +#coding:utf-8 + +require'cgi' +require'sqlite3' + +db = SQLite3::Database.new("../sql/stamp.sq3") + +c = CGI.new(:accept_charaset => "UTF-8") + +flag = 0 +text = "<p>脂画筝荀с茵腓冴障</p>\n" +begin + result = db.execute("select * from main;") +rescue + flag = 1 + text = "<p>若帥障</p>\n" +end + +printf("Content-type: text/html; charset=UTF-8\n\n") + +printf'<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/h +tml4/strict.dtd"> +<html> +<head> +<title>Delete table</title> +<link rel="stylesheet" type="text/css" href="design.css"> +</head> +</body> +<h1>若翠画Η若</h1>' +puts text +if flag == 1 +else + print"<table border = 1>\n" + result.each do |line| + 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]) + end + print"</table>" +end + +print'</body></html>'