重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら>

【GOLF me!】初月無料お試し

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

A 回答 (3件)

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"
ここがファイルの指定です 調べたいファイルを指定してください
    • good
    • 0
この回答へのお礼

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

お礼日時:2007/12/06 17:37

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



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

割り算? 意味不明。

この回答への補足

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

補足日時:2007/11/20 11:54
    • good
    • 0

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

この回答への補足

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

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

補足日時:2007/11/20 11:40
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!