人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

VBSの質問です
a.html
**************
a<tr>b<tr>c<tr>
**************
というファイルがあるのですがこれを置換して
b.html
**************
<tr>a
<tr>b
<tr>c
**************
にしたいのですが、下記のVBSを走らせると
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("a.html")
oldText = objFile.ReadAll
repText = "<tr>\r\n"
Set objRep = New RegExp
objRep.Multiline = True
objRep.Pattern = "<tr>"
objRep.Global = True
newText = objRep.replace(oldText, repText)
objFile.Close
Set objFile = objFSO.CreateTextFile("8-1.html")
objFile.WriteLine (newText)
objFile.Close

**************
a<tr>\r\nb<tr>\r\nc<tr>\r\n
**************
となりうまく改行してくれません
どうすればうまくいきますでしょうか?


●質問者: takanii
●カテゴリ:ウェブ制作
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● きゃづみぃ
●300ポイント ベストアンサー
repText = "<tr>\r\n" を
repText = "<tr>" & vbCrLf
に変更してみたらいかがでしょうか?

takaniiさんのコメント
おおお いけました!ありがとうございました!
関連質問

●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ