ファイルの行数カウントについて

質問

WindowsXP Professional　を使ってます。
ファイルを開かずに行数をカウント(改行の数のカウント）する方法はないでしょうか？
１レコードの長さがまちまちなので、割り算することも出来ません。
ご存知の方がいらっしゃいましたら、是非ご教授願います。

回答No.3

anotherone · ベストアンサー

myFILE = "C:\test\テスト.txt"

Set FSO = CreateObject("Scripting.FileSystemObject")
With FSO.GetFile(myFILE).OpenAsTextStream(8)
myLINE = .Line
.Close
End With
Set FSO = Nothing

Msgbox myLINE

上の文をコピーして　メモ帳に貼り付けて
行数.vbs　という名前で保存してください
これをダブルクリックで開くと　行数が表示されます
myFILE = "C:\test\テスト.txt"
ここがファイルの指定です　調べたいファイルを指定してください

お礼

ご教授ありがとうございました。
お礼が遅くなり、申し訳ありませんでした。

回答No.2

noname#98978

ただのテキストファイルなら、perlとかawk、sedとかいくらでもありますが。

＞１レコードの長さがまちまちなので、割り算することも出来ません。

割り算？　意味不明。

補足

質問が不十分ですみません。
ただのテキストファイルです。
出来るだけWindowsのデフォルトの機能でカウントしたいのですが
perl、awk、sedはデフォルトで付いている機能なのでしょうか？

回答No.1

anotherone

http://www.officetanaka.net/excel/vba/filesystemobject/textstream.htm#Line
http://www.happy2-island.com/vbs/cafe02/capter00604.shtml
ファイルとは何ですか
ファイルの種類はものすごくたくさんあります
どれのことでしょうか
FSOかADOは使えませんか
開きたくないのはナゼでしょうか
1レコードの長さと割り算はどういう関係でしょうか
具体的には何がしたいのでしょうか

補足

質問が不十分でした。
>ファイルとは何ですか
　ファイルはテキストファイルです
>FSOかADOは使えませんか
　すみませんFSO、ADOが分かりません。
>開きたくないのはナゼでしょうか
　ファイルが大きいので（約2GB）
>1レコードの長さと割り算はどういう関係でしょうか
　特に意味はアリマセン。申し訳ないです。

具体的に言いますと
Winodwsのデフォルトの機能だけで、
テキストファイルの行数(＝改行数）をカウントする方法が知りたかったのです。
UNIXで言えば「wc」みたいなコマンドがWinodwにはないのでしょうか？