etime = ftime.split; tuki = etime[1]; hi = etime[2]; nen = etime.last

afile = File.atime(file).strftime("%Y\/%m\/%d")

mfile = File.mtime(file).strftime("%Y\/%m\/%d")

# フォルダフルパス取得　外部変形Rubyスクリプト

  require 'vr/vruby'
  frm=VRLocalScreen.newform
    def frm.construct
      move 250,180,50,50
      dirpath = selectDirectory(title="検索対象フォルダを選択して下さい。(ルートドライブ選択不可)",initialdir=read_profile).to_s
      write_profile dirpath
      print dirpath
    end
    
    def read_profile
      if FileTest::exist?( "jFile.ini" )
        ini = open( "jFile.ini", 'r' )
        begin
          while ini.gets
            chomp!
            if ~ /^Folder=(.*)$/
              folder = $1
            end
          end
        ensure
          ini.close
        end
      end
      folder
    end
    
    def write_profile( dirpath )
      if dirpath != nil
        ini = open( "jFile.ini", 'w' )
        ini.print "[jFile]\n"
        ini.print "Folder=" + dirpath + "\n"
      end
    end
  frm.create.show