ActiveServerPage（VBS）でAtEndOfLineを使ってファイルを1行づつ読み込む処理をしています。

Do Until objTS.AtEndOfLine
strLine = objTS.ReadLine
Loop
というような形でファイルを読み込んでいるのですが、ファイルの先頭に改行があった場合や、ファイルの途中に改行が２つ以上続いた場合、ファイル終端と判定されてしまいます。（この場合ループを抜けてしまいます）
改行のみの行の場合、その行を飛ばして読み込む等の処理をしたいのですが、この改行のみの行の判定はどのようにすればいいのでしょうか。