修正点
記事が月に1つしかない場合に型がstringではなくcharになってしまってエラー
になることがあるため、変数宣言を入れた
インポート時の注意として、画像ファイルはリンクがエンピツのままなので、
インポートした画像ファイルへのリンクは手作業で行うことになる。
# 実行中のパス取得/移動 $path = Split-Path -Parent $MyInvocation.MyCommand.Path Set-Location $path # ファイル読み込み $folderName = $path + "\Enpitsu_data\" $tempData2 = gci $folderName #ループAスタート # #for ( $i2 = 0; $i2 -lt $tempData2.Length ; $i2++ ){ # for ( $i2 = 0; $i2 -lt $tempData2.Length ; $i2++ ){ if($tempData2.name.GetType().Fullname -eq "System.String"){ $fileName = $path + "\Enpitsu_data\" + $tempData2.Name $tempData2 = 1 } else { $fileName = $path + "\Enpitsu_data\" + $tempData2.Name[$i2] } $Export_Data = gc $fileName $Export_Data_FileName = $path + "\Enpitsu_Export.txt" #記事開始個所 $start = @(sls "\+\+\+" $fileName | ForEach-Object { $($_ -split":")[2]}) #記事終了箇所 $end = @(sls "----" $fileName| ForEach-Object { $($_ -split":")[2]}) #ループB開始 for ( $i = 0; $i -lt $start.Length ; $i++ ){ $Change_Data = "TITLE:" + ($Export_Data)[([string]$start[$i]-2)] + "`r`n" $Change_Data += "STATUS: Draft" + "`r`n" + "CONVERT BREAKS: 1" + "`r`n" + "PRIMARY CATEGORY: 日記(非公開)" + "`r`n" $Year = ($Export_Data)[[string]$start[$i]-3].Substring(0,4) $Month = ($Export_Data)[[string]$start[$i]-3].Substring(4,2) $Day = ($Export_Data)[[string]$start[$i]-3].Substring(6,2) $Change_Data += "DATE: " + $Month + "/" + $Day + "/" + $Year + " 00:00:00 PM" + "`r`n" $Change_Data += "-----" + "`r`n" + "BODY:" + "`r`n" $tempData = ($Export_Data)[$start[$i]..($end[$i]-2)] $tempData = $tempData -join "<br>" $Change_Data += $tempData $Change_Data += "`r`n" + "--------" Write-Output $Change_Data | Out-File -FilePath $Export_Data_FileName -Encoding Default -append } #ループB終了 } #ループA終了 # 終了 Write-Host("終了")
2018/12/29追記
久しぶりにログの一括ダウンロードができない件でメールで問い合わせようと思ってメールを書いたところ
maildir over quota でメールが帰ってきてしまった。すでにまともな運営はされてなさそうだ、、、
2019/03/17
上記の件、今日やってみたが同じ。
ホームページにある住所も現存してるか怪しいな…