C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト


(過去ログ 35 を表示中)
■17489 / )  改行コードの置換
□投稿者/ たか (4回)-(2008/04/25(Fri) 16:56:33)

分類:[VB.NET/VB2005] 

改行コードの置換で困っています。
WindowsイベントログをCSV形式で出力し、加工しやすいように
次の手順で1イベント一行に使用としております。

 (1)200 → !200 に置換
 (2)改行 → 半角スペースに置換
 (3)200! → 改行 + 200に置換

上記を手順を以下のようにコーディングしました。
前提としてIO.StreamReaderを使用してShift-JISで元のCSVを読み込んでいます。

Do Until EventLogReader.EndOfStream
  StrEventLogRecord = EventLogReader.ReadLine()
StrEventLogRecord = Regex.Replace(StrEventLogRecord, "200", "!200", RegexOptions.IgnoreCase)
StrEventLogRecord = Regex.Replace(StrEventLogRecord, vbNewLine, " ", RegexOptions.IgnoreCase)
StrEventLogRecord = Regex.Replace(StrEventLogRecord, "!200", vbCrLf & "200", RegexOptions.IgnoreCase)
EventLogReplaceWriter.WriteLine(StrEventLogRecord)
Loop

結果、改行コードが半角スペースに変換されません。
改行コードの置換方法を教えてください。
よろしくお願いします。


返信 編集キー/


管理者用

- Child Tree -