ようこそ ゲスト さん、新規登録（無料）して気になる疑問を解決しませんか？
はじめての方へ｜ヘルプ｜FAQ
スポンサーサイト（詳細）

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

＜ファイルの中身＞

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

＜出力例＞
001E7AC31A6A,Houjineigyou,ON
001E7A25517D,Houjineigyou,ON
001E7AC31C63,Shisankanri1,ON
質問投稿日時：08/05/02 12:30
質問番号：3992016
最新から表示｜回答順に表示

回答

 
回答者：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>
種類：回答
どんな人：経験者
自信：自信あり
回答日時：08/05/08 07:38
回答番号：No.2
この回答への補足この回答に補足をつける(質問者のみ)
この回答へのお礼この回答にお礼をつける(質問者のみ)

回答

 
回答者：nda23 VBSでファイル入出力することはできますか？
できるなら悩むことも無いとおもいますが…
種類：補足要求
どんな人：専門家
自信：参考意見
回答日時：08/05/02 16:29
回答番号：No.1
この回答への補足この回答に補足をつける(質問者のみ)
この回答へのお礼この回答にお礼をつける(質問者のみ)
 
最新から表示｜回答順に表示
スポンサーサイト（詳細）
このページのトップへ