Mercurial > hgrepos > hgweb.cgi > skipweb
changeset 2212:7cfbabdd4462
kesuyou tuika
| author | FUJIKAWA Kosuke <c111126@g.koeki-u.ac.jp> |
|---|---|
| date | Tue, 11 Feb 2014 18:06:33 +0900 |
| parents | 3e649609eb22 |
| children | 0b64f20a135a |
| files | nakamachi/delete.html nakamachi/delete.rb |
| diffstat | 2 files changed, 44 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/nakamachi/delete.html Tue Feb 11 18:06:33 2014 +0900 @@ -0,0 +1,25 @@ +<html> +<head> +<title>たいとる</title> +</style> +<link rel="stylesheet" type="text/css" href="ほげ.css"> +</head> + +<body> +<h1>データベース消去用</h1> +<p>OKで実行すると個人情報等が削除されます。</p> +<p>実行の際は注意してください。</p> +<form method="POST" action="./delete.rb"> +<p>本当に消しますか?<br> +はい<input type="radio" name="check" value="OK"> +いいえ<input type="radio" name="check" value="NO"> +</p> + +<input type="submit" value="削除"> +<input type="reset" value="リセット"> +</form> + +<address>c111126@g.koeki-u.ac.jp</address> + +</body> +</html>
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/nakamachi/delete.rb Tue Feb 11 18:06:33 2014 +0900 @@ -0,0 +1,19 @@ +#!/usr/bin/env ruby +#coding: euc-jp + +require 'cgi' +c = CGI.new(:accept_charaset => "EUC-JP") +print("Content-type: text/html; charset=euc-jp\n\n") + +check = c['check'] + +require 'sqlite3' +db = SQLite3::Database.new("sql/nakamachi.sq3") + +if check == "OK" + db.execute("delete from coupon"); + print"<p>データベースの中身を消去しました。</p>" +else + print"<p>データベースは保持されたままです。</p>" +end +
