VBScriptにて、あるファイル内を1行ずつ順番に取り出しながら、
途中の数行を別のファイルに書き出したいのですが、方法が分からず
悩んでいます。
--------------------------------------------------------------
set objFS = CreateObject("Scripting.FileSystemObject")
set objReadText = objFS.OpenTextFile("C:\read.log")
set objWriteText = objFS.CreateTextFile("C:\write.log")
count = 1
Do Until objReadText.AtEndOfStream
If count >3 And count < 8 Then
strLine = objReadText.ReadLIne
objWriteText.WriteLine(strLine)
ElseIf count = 8 Then
Exit Do
End If
count = count + 1
Loop
objReadText.Close
objWriteText.Close
--------------------------------------------------------------
上記にて、例えばread.logの4行目から7行目だけをwrite.logに書き出したいのですが、
想定した途中の行だけを別ファイルに書き出す事が出来ません。
どなたかアドバイスを頂けないでしょうか。
No.1ベストアンサー
- 回答日時:
set objFS = CreateObject("Scripting.FileSystemObject")
set objReadText = objFS.OpenTextFile("C:\read.log")
set objWriteText = objFS.CreateTextFile("C:\write.log")
count = 0
Do Until objReadText.AtEndOfStream
strLine = objReadText.ReadLIne
count = count + 1
If count >3 And count < 8 Then
objWriteText.WriteLine(strLine)
End If
If count = 8 Then
Exit Do
End If
Loop
objReadText.Close
objWriteText.Close
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- UNIX・Linux 次の要件を満たすにはどのように修正したらよろしいでしょうか 1 2022/11/24 20:57
- Visual Basic(VBA) Sheet3から2つの条件でオートフィルターで抽出した個数をSheet2へ入力するマクロで、一つ目の 4 2023/01/12 23:40
- PHP PHPでCookieを使った訪問回数について 1 2023/05/28 14:10
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 1つの入力フォルダの値を読み込み、3分割をして新しい変数に代入する方法を教えていただきたいです。 読 4 2022/10/17 20:52
- C言語・C++・C# プログラミング c言語 4 2023/03/07 01:05
- Visual Basic(VBA) エクセル マクロ(A1:A10)までの中で一番多く出た数字をB10に表示 6 2023/04/25 17:01
- Visual Basic(VBA) A列B列C列 3 2023/04/26 18:11
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
vbsでテキストファイル内の文字列検索
Visual Basic(VBA)
-
[VBS] テキストファイルから任意の値を抽出する
Visual Basic(VBA)
-
テキストファイルから特定の文字列が入った行を取得したいです。 例えば下記のような文が記載されたテキス
Visual Basic(VBA)
-
-
4
ReadLineでの読み出し行を指定する
Visual Basic(VBA)
-
5
VBScript(vbs)での行の取得について
その他(プログラミング・Web制作)
-
6
VBSで特定の文字列が含まれる場合の処理方法
その他(プログラミング・Web制作)
-
7
VBSで指定行に挿入
その他(プログラミング・Web制作)
-
8
vbsで最後の行を削除する
その他(プログラミング・Web制作)
-
9
VBScriptにて、csvファイルから特定のレコードを取得したい
Visual Basic(VBA)
-
10
VBScriptでfindを使うには??
Visual Basic(VBA)
-
11
0バイトのテキストファイル
Visual Basic(VBA)
-
12
VBScriptでCSVファイルを読み出したい
その他(プログラミング・Web制作)
-
13
バッチでテキストファイルから任意の行のみ取得したい
その他(プログラミング・Web制作)
-
14
テキストファイルの最終行を削除したいのですが
その他(プログラミング・Web制作)
-
15
VBS実行時エラー オブジェクトがありません 回避方法について
Visual Basic(VBA)
-
16
VBSでExcelシートのコピー
Visual Basic(VBA)
-
17
VBSでエクセル内の行数を取得する方法
その他(プログラミング・Web制作)
-
18
VBスクリプトでテキストファイルの行数カウント
その他(プログラミング・Web制作)
-
19
VBScriptでcsvファイルの編集は出来ますか
Visual Basic(VBA)
-
20
txtファイルから特定の文字列が書かれた行だけを取得や削除するソフト
フリーソフト
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELファイルに誰がアクセスし...
-
《エクセルVBA》「他の人が該当...
-
VBScriptで、ファイルから任意...
-
VBAでサーバーにアクセスするに...
-
SFTPなどは使わないホームペー...
-
CGIって何ですか?簡潔に教えて...
-
URLに~/cgi-bin/~を隠す方法
-
htmlにアクセスと同時に、あるC...
-
cgiファイルを直接は見れなくす...
-
インクルードファイルのエラー
-
ローカルマシンでCGIソースが出...
-
ApacheでのCGIについての質問
-
特定URLから
-
ファイルダウンロード後に、デ...
-
CGIの外部呼出しについて
-
cgi アクセス制限 エラー
-
通貨表示で3桁毎にカンマ(?)を...
-
サイト内のファイルの更新日を...
-
掲示板のスレッドが消えた!?
-
CGIでコードがむきだしの状態で...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELファイルに誰がアクセスし...
-
《エクセルVBA》「他の人が該当...
-
VBAでサーバーにアクセスするに...
-
JAVAで別サーバーのファイルの...
-
VBScriptで、ファイルから任意...
-
サーバー上のフォルダ削除が出...
-
Webでのファイルアップロードに...
-
vbでFTPサーバーに対して、サー...
-
C# ファイル削除のエラーコード
-
WEB上で文書のアイコンを配置す...
-
HTMLソースファイルからタグを...
-
contenttypeについて
-
Dreamweaver(ドリームウィーバ...
-
個人的なアップローダーの設置
-
ローカルファイルをサーバーか...
-
自前のアップローダの作り方
-
30分ごとに更新
-
Perl 別ドメインのファイル存在...
-
PHPが動いてCGIが動かない?
-
空のファイル
おすすめ情報