VBスクリプトを使ってファイルを置換したいと考えています。
以下のVBSファイルとコマンドを使って、置換することはできました。
が、置換対象が「改行」と「"」の場合、エラーとなって置換できません。
どうすればいいのでしょうか。
よろしくおねがいします。
********コマンド********
(1)cscript replace.vbs "C:\test.txt" "Jim" "Jane"
(2)cscript replace.vbs "C:\test.txt" ""_\n" "a_test"
********VBSファイル(replace.vbs)********
Const ForReading = 1
Const ForWriting = 2
strFileName = Wscript.Arguments(0)
strOldText = Wscript.Arguments(1)
strNewText = Wscript.Arguments(2)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
strText = objFile.ReadAll
objFile.Close
strNewText = Replace(strText, strOldText, strNewText)
Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.WriteLine strNewText
objFile.Close
(1)のコマンドを実行すると、
「Jim」は「Jane」に置換されますが、
(2)のコマンドを実行すると、エラーになり置換されません。
エラーメッセージ:
「Microsoft VBScript 実行時エラー: インデックスが有効範囲にありません。」
よろしくおねがいします。
No.2ベストアンサー
- 回答日時:
cscript replace.vbs "C:\test.txt" ""_\n" "a_test"
というコマンドラインだと、
Argument(1) は "_\n空白a_test" になり、Argument(2) は存在しません。従って、Argument(2)のところで「インデックスが有効範囲にありません」というエラーになります。
・二重引用符" をコマンドライン引数としてVBScriptに与えることは出来ません
(例えば一重引用符'で代用する)
・\n という文字列を「改行」と見なす処理は自分で書かないといけません
(例えば、"\n" を vbCRLF にReplaceする)
strOldText = Replace(Replace(Wscript.Arguments(1),"\n",vbCRLF),"'","""")
等として、
cscript replace.vbs "C:\test.txt" "'_\n" "a_test"
この回答への補足
すいません。
以下のように変更したらできました。
>strNewText = Replace(Replace(Wscript.Arguments(2),"\n",vbCRLF),"'","""")
ありがとうございました。
回答ありがとうございます。
>strOldText = Replace(Replace(Wscript.Arguments(1),"\n",vbCRLF),"'","""")
>等として、
>cscript replace.vbs "C:\test.txt" "'_\n" "a_test"
おしえていただいたように修正したらできました。
ありがとうございます。
以下のコマンドプロンプトのように、
置換後にReplace関数を使おうと思うと、
置換されずそのまま「'_\n」となってしまいます。
cscript replace.vbs "C:\test.txt" "A_B" "'_\n"
Aは「"」、Bは「改行」に置換することはできるのでしょうか。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Microsoft ASP C#からvbsを実行したい 5 2022/11/24 17:31
- Access(アクセス) アクセス テーブルの空白を変数に置換するボタンが作りたい 4 2022/07/08 11:19
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- Visual Basic(VBA) VBAでの共有パスにつきまして 1 2023/03/04 17:24
- その他(プログラミング・Web制作) VBSでExcelファイル起動時、重複しても開くのを止めたい 1 2022/10/01 23:20
- Windows 10 renameコマンドでファイル名からアンダースコアを消す方法 5 2023/04/24 13:33
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Windows 10 ネットワークプリンターにファイルを直接送る方法・コマンドないですか?(´・ω・`) 3 2023/03/13 23:15
- Visual Basic(VBA) FileSearch2007に変わる構文について 1 2022/12/16 16:57
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
vbsで最後の行を削除する
その他(プログラミング・Web制作)
-
VBSで指定行に挿入
その他(プログラミング・Web制作)
-
VBScriptでCSVファイルを読み出したい
その他(プログラミング・Web制作)
-
-
4
VBSにて改行コードの検出・置換
Visual Basic(VBA)
-
5
複数行の入力を受け取る方法
Visual Basic(VBA)
-
6
VBScript(vbs)での行の取得について
その他(プログラミング・Web制作)
-
7
VBS フォルダ内にあるすべてのファイルを検索→ファイルが特定のファイルなら開く
その他(プログラミング・Web制作)
-
8
テキストファイルから特定の文字列が入った行を取得したいです。 例えば下記のような文が記載されたテキス
Visual Basic(VBA)
-
9
VBscriptが起動しない?
Microsoft ASP
-
10
VBSでエクセル内の行数を取得する方法
その他(プログラミング・Web制作)
-
11
VBSでをエスケープする文字は?"
その他(プログラミング・Web制作)
-
12
vbsでテキストファイル内の文字列検索
Visual Basic(VBA)
-
13
CSVファイルからダブルクォーテーションを削除したい。VBS使用で。
Word(ワード)
-
14
VBScriptで、ファイルから任意の行のみ取り出す方法について
その他(プログラミング・Web制作)
-
15
VBスクリプトでテキストファイルの行数カウント
その他(プログラミング・Web制作)
-
16
VBScriptでcsvファイルの編集は出来ますか
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 置換文字がみつからない時
-
【Excel VBA】文字列の置換作業...
-
EXCEL VBA でCTRL+Fのダイア...
-
PowerShellでテキストの空白行...
-
ハングルを日本語に置換
-
python 大文字小文字を区別しな...
-
csvデータ ダブルクォーテ...
-
○文字目に文字挿入
-
Excel VBA 教えてください。 VB...
-
C言語の質問です、プログラミン...
-
モードレスダイアログを閉じた...
-
テキストファイル中の文字列の置換
-
住所編集のマクロを組んでいて...
-
pythonで特殊文字を含むファイ...
-
ExcelVBA バッチファイル編集
-
バッチファイルの処理が実際の...
-
スペースで区切られた氏名から...
-
テキストボックスの文字列を置...
-
サクラエディタ 数字だけを置...
-
文字列置換C言語 置換前<置換後...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
各項目がダブルクォーテーショ...
-
VBA 置換文字がみつからない時
-
正規表現で、特定の文字列を含...
-
スペースで区切られた氏名から...
-
csvデータのダブルクォーテーシ...
-
csvデータ ダブルクォーテ...
-
GoogleAppsScript文字列置換の...
-
C言語でテキストファイルの内容...
-
正規表現 特定の文字列を含む行...
-
テキストボックスの文字列を置...
-
EXCEL警告「置換対象のデータが...
-
TeraPadエディターの操作方法に...
-
python 大文字小文字を区別しな...
-
xmlファイル内の文字列置換
-
C#で空白行を削除する方法
-
Excel VBA 教えてください。 VB...
-
テキストファイル中の文字列の置換
-
ハングルを日本語に置換
-
EXCEL VBA でCTRL+Fのダイア...
-
PowerShellでテキストの空白行...
おすすめ情報