VBScriptを用いた改行コードを含む置換方法について
お世話になります。
VBScript初心者です。
下記の通り、VBスクリプトを用いてファイルの文末の「カンマカンマ改行」を
「改行」に置換したいと思っていますが、上手くできません。
VBScriptで正規表現を用い、改行コードを含んだ置換方法を教えていただきたく思います。
【置換前】
AA00001,プリン,AA00001,AA00000xxxx.xxx.xx.xx,,,○,,
【変更後】
AA00001,プリン,AA00001,AA00000xxxx.xxx.xx.xx,,,○
現在のスクリプトは、
myStr1 = "AA00001,プリン,AA00001,AA00000xxxx.xxx.xx.xx,,,○,,"
'(1)RegExp オブジェクトを作成する
Set objRE = New RegExp
'(2)検索パターンを設定
objRE.Pattern = ",+\n"
'(3)大文字/小文字を区別しない
objRE.IgnoreCase = True
'(4)全体を検索
objRE.Global = True
'(5)置換を実行
myStr2 = objRE.Replace(myStr1,"\n")
'(6)一行書込み
objFile.WriteLine(myStr2)
となっています。(部分的に抜粋しましたが各変数の定義はできています)
(2)の検索パターンに",+\n"、(5)の置換を実行に"\n"を定義しましたが置換できませんでした。
他のパターンとして
(2)の列に",+\x0A"、(5)の列に"\x0A"
(2)の列に",+\x0d"、(5)の列に"\x0d"
も行ってみましたが置換できませんでした。
なお、置換対象のファイルはtxtファイルまたはCSVファイルを考えています。
どなたかご教示いただきたく、よろしくお願い致します。
お礼
こんなものがあったとは… 「検索する文字列」の方の特殊文字一覧しかじっくり見たことがなかったので、全くもって気がつきませんでした。 でも考えてみれば普通ありますよね。 本当にありがとうございました。