VBSの質問です

元ネタはこちらのページとなりますhttp://q.hatena.ne.jp/1362497323
cx20さんが最後に書いてくれたコードの一部が以下なのですが
*******************
Set file = fso.OpenTextFile( strInputFileName )
strOldText = file.ReadAll
strFind = "<img src = """
strReplace = "<img src = """ & strTargetName & "/"
Set re = New RegExp
re.Multiline = True
re.Pattern = strFind
re.Global = True
strNewText = re.Replace(strOldText, strReplace)
file.Close
Set file2 = fso.CreateTextFile( strOutputFileName )
file2.WriteLine (strNewText)
file2.Close
***************
こちらに
"<td align=""center"" valign=""top"">" を "<td>" & strTargetName & "</td><td>" に置換する条件を追加したいのですがどのように書けばよろしいでしょうか?
教えてください

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2013/03/10 03:30:39
  • 終了:2013/03/10 04:12:50

ベストアンサー

id:windofjuly No.1

うぃんど回答回数2625ベストアンサー獲得回数11492013/03/10 03:35:50

ポイント500pt

先ほど同様の質問がありまして・・・、そちらで答えさせていただきましたので参照の上、不明点があれば返信ください。

http://q.hatena.ne.jp/1362838683#a1193082

他3件のコメントを見る
id:windofjuly

お手数かけました。

2013/03/10 03:58:38 にコメントさせていただいたとおりプログラムは既に訂正済みで、全てに適用される問題は解決するはずです。

あちらの質問者さんのほうが先なので、あちらにて修正版を確認してください。
http://q.hatena.ne.jp/1362838683#a1193082

2013/03/10 04:10:40
id:takanii

ありがとうございました!!

2013/03/10 04:13:26

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません