# access04.rb.txt: ruby script (encoding: Windows-31J)
  # z_access04.mdb, z_access04.xls を出力
  # レコードの更新(sql命令：updateによる方法)
require "yado"

filename = "z_access04.mdb"  # データベースファイルの名前
if test(?e, filename)  # z_access04.mdbが存在するなら削除
  File.unlink(filename)
end
db = Yado.new(filename)  # データベースを開く
tblname = 'テーブル04'  # これから作成するテーブルの名前

sql = <<EOS1
create table #{tblname}
   (ID counter PRIMARY KEY,
    氏名 varchar(30) NOT NULL,
    身長 float,
    誕生日 date);
EOS1
db.query(sql)

ary = [%w(氏名 身長  誕生日),
       %w(高橋 172.3 1994/10/15),
       %w(鈴木 180.6 1994/1/9),
       %w(佐藤 167.4 1992/3/4),
       %w(若林 165.1 1984/11/13),
       %w(久保 173.7 1979/8/7)]
db.addnew(tblname, ary)

    # 「佐藤」さんを「吉田」さんに変更
sql = <<EOS2
update #{tblname}
  set
    氏名 = '吉田',
    身長 = 169.8,
    誕生日 = #1972/2/5#
  WHERE
    氏名 = '佐藤' and
    身長 = 167.4;
EOS2
db.query(sql)
db.close

    # 上で作ったデータベースの中身をExcelファイルとして書き出す
xls_file = File.basename(filename, ".*") + ".xls"
if test(?e, xls_file)  # xlsファイルが存在するなら削除
  File.unlink(xls_file)
end
db = Yado.new(filename)
db.pav(xls_file)
db.close