VBScriptでファイルの中身のある行を抽出したい。

質問

ファイル内のあるキーワードからあるキーワードまでにある行だけを出力するプログラムを作りたいのですが、何かいい方法はないでしょうか？自動化したいのでbatファイルもしくはVBScriptでご教授いただければと思います。すみませんが、どなたか知恵をお貸し頂ければと思います。。。

＜ファイルの中身＞

"------------------"　←キーワード
001E7AC31A6A,Houjineigyou,ON
001E7A25517D,Houjineigyou,ON
001E7AC31C63,Shisankanri1,ON
対象は、　　　　　 　 ←キーワード

＜出力例＞
001E7AC31A6A,Houjineigyou,ON
001E7A25517D,Houjineigyou,ON
001E7AC31C63,Shisankanri1,ON

回答No.2

iriyak

VBScript と JScript でのプログラミング例です。

■Launch.bat
cscript.exe //nologo Extract.wsf input.txt & pause

■Extract.wsf
<package>
<job>
<script language='JavaScript'>
function Extract(filepath) {
　　var FileSystemObject = new ActiveXObject('Scripting.FileSystemObject');
　　var readStream = FileSystemObject.openTextFile(filepath);
　　var datap = false;
　　while (!readStream.atEndOfStream) {
　　　　var s = readStream.readLine();
　　　　if (/^"(\-)+"/.test(s)) {
　　　　　　datap = true;
　　　　　　continue;
　　　　}
　　　　if (/^対象は、/.test(s)) {
　　　　　　datap = false;
　　　　　　continue;
　　　　}
　　　　if (datap)
　　　　　　WScript.echo(s);
　　}
}
</script>
<script language='VBScript'>
Extract(WScript.Arguments.Item(0))
</script>
</job>
</package>

回答No.1

nda23

VBSでファイル入出力することはできますか？
できるなら悩むことも無いとおもいますが…