仕事上必要な工夫など、備忘録として残します。
[Ruby][iCal] iCal_to_CSVのEXE版なのですが・・・
ical_to_csv xxxx.ics とするだけです。 xxxx.ics はiCalファイル名です。 xxxx.CSV に変換されます。
[Ruby][iCal]iCalファイルをCSV形式に変換するコード
iCal(エンコードShift-JIS)をCSVに変換するRubyコードを作成
#! ruby -Ks
# coding:windows-31j
#! /usr/bin/env ruby
require 'rubygems'
require 'csv'
require 'nkf'
require 'ri_cal'
require 'kconv'
require 'vr/vrdialog'
#OCRA でコンパイルする時に内容チェックさせない。
unless (defined?(Ocra))
#入力ファイル名を引数で受け取る。引数がなければ中止。
inf=ARGV[0]
if inf.nil? then
SWin::Application.messageBox("処理対象のファイルをドラッグして起動するか、
バッチファイルで
ical_csv 対象ファイル名
で起動してください。
終了します。" ,"エラー",0)
exit
else
SWin::Application.messageBox("iCSファイルをCSVに変換します。" ,"処理開始",0)
end
f = open(inf, "r")
str = f.read
f.close
#入力ファイルがShift-JISではないかもしれないので強制変換して.tmpに出力
ott=File.dirname(inf)+"/"+File.basename(inf,".*")+".tmp"
ot= open(ott,"w")
str_sjis=NKF.nkf('-s -Lw',str)
ot.print str_sjis
ot.close
#.tmpから入力して.csvに出力すると宣言
inf=File.dirname(inf)+"/"+File.basename(inf,".*")+".tmp"
otf=File.dirname(inf)+"/"+File.basename(inf,".*")+".csv"
ics = open(inf)
cal = RiCal.parse(ics)
# calendarという文字列があればカレンダーと判断 <<<< 必要に応じて修正
calortask=cal.first.prodid.downcase.index(" calendar")
CSV.open(otf, 'w') do |writer|
unless calortask.nil? then
#カレンダーと判断した時のヘッダ
writer << ["Subject","Start Date","Start Time","End Date","End Time"," Meeting Organizer"," Description", "Location","Categories","Attendee","Status","Duration"]
else
#タスクと判断した時のヘッダ
writer << ["Subject","Start Date","Due Date","Status","Date Completed","% Complete","Categories","Notes","Priority"]
end
end
unless calortask.nil? then
cal.first.events.each do |event|
p1= event.summary
x=event.dtstart
unless x.nil? then
p2= x.strftime("%Y/%m/%d")
p3= x.strftime("%H:%M")
else
p2= ""
p3=""
end
x=event.dtend
unless x.nil? then
p4= x.strftime("%Y/%m/%d")
p5= x.strftime("%H:%M")
else
p4= ""
p5=""
end
x=event.organizer
unless x.nil? then
p6= x
else
p6= ""
end
x= event.description
unless x.nil? then
p7= x.gsub(/(
|
|
)/, '
')
else
p7= ""
end
x=event.location
unless x.nil? then
p8= x
else
p8= ""
end
x=event.categories
unless x.nil? then
p9= x
else
p9= ""
end
x=event.attendee
unless x.nil? then
p10= x
else
p10= ""
end
x=event.status
unless x.nil? then
p11= x
else
p11= ""
end
x=event.duration
unless x.nil? then
p12= x
else
p12= ""
end
CSV.open(otf, 'a') do |csv|
unless p1.nil? then
row = [p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12]
csv << row
end
end
end
# cal.first.events.each do に対応
else
#calortask=nil なのでtodoと判断した時の処理
cal.first.todos.each do |todos|
x=todos.summary
unless x.nil? then
p1= x
else
p1= ""
end
x=todos.dtstart
unless x.nil? then
p2= x.strftime("%Y/%m/%d %H:%M")
else
p2= ""
end
x=todos.due
unless x.nil? then
p3= x.strftime("%Y/%m/%d %H:%M")
else
p3= ""
end
x=todos.status
unless x.nil? then
p4= x
else
p4= "Not Started"
end
x=todos.completed
unless x.nil? then
p5= x.strftime("%Y/%m/%d %H:%M")
else
p5= ""
end
x=todos.percent_complete
unless x.nil? then
p6= x
else
p6= ""
end
x=todos.categories
unless x.nil? then
p7= x
else
p7= ""
end
x= todos.description
unless x.nil? then
p8= x.gsub(/(
|
|
)/, '
')
else
p8= ""
end
x=todos.priority
unless x.nil? then
p9= x
else
p9= "Normal"
end
CSV.open(otf, 'a') do |csv|
unless p1.nil? then
row = [p1,p2,p3,p4,p5,p6,p7,p8,p9]
csv << row
end
end
end # cal.first.todos.each do に対応
end #calortask=nil なのでtodoと判断した時の処理を閉じる
SWin::Application.messageBox(otf+"に出力しました" ,"完了",0)
ics.close
a=File.delete(*inf)
end
Remember The Milk の iCal の PRODID PRODID:-//Remember The Milk//rtm.Service.iCalendar.Export 3.0//EN Google Calendar の iCal の PRODID PRODID:-//Google Inc//Google Calendar 70.9054//ENPRODIDでカレンダーかタスクかの分岐設定をしていますので、ご自分の使いたいiCalのPRODIDに合わせてください。私の場合RTMとGoogleの区別だけつけば良く、Googleカレンダーでは、「 Calendar」となっているので、スペース+Calendarを含んでいればGoogleカレンダーとしています。
iCal_to_CSV.rb xxxxx.ics のように引数でインプットファイルを指定します。 これにより xxxxx.CSV が作成されます。 ただし、RUBY.EXE に PATH が通っていなければエラーになります。
[Gcal2Excel]ファイルを[Googleカレンダー]Outlook形式CSVに変換する[Ruby]コード
| Title | Start | End | Duration | Description | Where |
| 社内試験監督官 | 2012/12/17 15:00 | 2012/12/17 17:00 | 02:00 |
管理職 一部専門職 |
1405,会議ルーム |
#! ruby -Ks
# coding:windows-31j
#! /usr/bin/env ruby
# GCalExcel.rb
# Coded in Ruby 1.9.3
require 'rubygems'
require 'vr/vrdialog'
require 'spreadsheet'
require 'nkf'
#引数チェック(この if then ブロック使わないなら vr/vrdialog Gem はrequire不要)
inf=ARGV[0]
if inf.nil? then
SWin::Application.messageBox("処理対象のファイルをドラッグして起動するか、
バッチファイルで
GCalExcel.rb 対象ファイル名
で起動してください。
終了します。" ,"エラー",0)
exit
else
SWin::Application.messageBox("GCalExcelファイルをGoogleカレンダー対応CSVに変換します。" ,"処理開始",0)
end
#引数で渡されたファイルから入力して.csvに出力すると宣言
book = Spreadsheet.open(inf,"rb")
otf=File.dirname(inf)+"/"+File.basename(inf,".*")+".csv"
o=File.open(otf,"w")
#引数で渡されたファイルから入力して.csvに出力すると宣言
book.worksheets.each do |ws|
#ヘッダチェック:Location(GCal2EccelのWhere)格納列はどこか?
for i in 0..10
if ws[0,i]=="Where" then
LocationCol=i
end
end
#ヘッダ出力
record = []
record << ["Subject","Start Date","Start Time","End Day","End Time","Description","Location","All Day Event"]
o.puts NKF.nkf('-w80 -Lu',record.join(","))
#一行ずつ処理
ws.each do |row|
record = []
allDayEvent=TRUE
unless row[3][0,5]=="24:00" then
allDayEvent=FALSE
end
unless row[0]=="Title" && row[1]=="Start" then
unless row[0].nil? then row[0]=row[0].gsub(",","") end
unless row[4].nil? then row[4]=row[4].gsub(",","") end
unless row[LocationCol].nil? then row[LocationCol]=row[LocationCol].gsub(",","") end
record << [row[0],row[1][0,10],row[1][11,5],row[2][0,10],row[2][11,5],row[4],row[LocationCol],allDayEvent]
#日付時刻のデータの正当性チェックをしていないので必要ならチェック手順を追加して下さい
o.puts NKF.nkf('-w80 -Lu',record.join(",").gsub(/
/,":|:"))
end
end
end
#使用ファイルのクローズ処理
o.close
book.io.close
#--------------------------------------------------
#---- Additional Setting for Spreadsheet Gem ----#
#--------------------------------------------------
module Spreadsheet
class Workbook
attr_accessor :io
end
end
#! ruby -Ksは、これで良いのか?にわかRubyUserである私は悩んでしまいます。
GCalExcel.rb xxxxx.xls のように引数でインプットファイルを指定します。 これにより xxxxx.CSV が作成されます。 ただし、RUBY.EXE に PATH が通っていなければエラーになります。
| Subject | Start Date | Start Time | End Day | End Time | Description | Location | All Day Event |
| 社内試験監督官 | 2012/12/17 | 15:00 | 2012/12/17 | 17:00 | 管理職:|:一部専門職 | 1405会議ルーム | FALSE |
[Google Tasks] をCSVなどに落とす(Google Tasks Backup)
プロフィール
カレンダー
ブログ内検索
カテゴリー
最新記事
忍者カウンター
P R