MichaelChirico

library(devtools)
install_github('Rdatatable/data.table', quiet = TRUE,
               ref = commandArgs(trailingOnly = TRUE))
library(data.table)

f = list.files('.', recursive = TRUE, pattern = '\\.csv$', full.names = TRUE)
ts = replicate(5L, {
  t0 = Sys.time()
  invisible(lapply(f, fread))
  as.double(Sys.time() - t0)

gabceb

$xlFixedFormat = [Microsoft.Office.Interop.Excel.XlFileFormat]::xlOpenXMLWorkbook
write-host $xlFixedFormat
$excel = New-Object -ComObject excel.application
$excel.visible = $true
$folderpath = "C:\Users\gabceb\Documents\testXLS"
$filetype ="*xls"
Get-ChildItem -Path $folderpath -Include $filetype -recurse | 
ForEach-Object `
{
	$path = ($_.fullname).substring(0, ($_.FullName).lastindexOf("."))