file = new ActiveXObject("Scripting.FileSystemObject");

// Sets the variable "f" to equal the new open file contents

f = file.OpenTextFile("c:\wantlist.txt", 1);
s = f.ReadLine()

While(s != EOF)
{
    //. Do some thing
    s = f.ReadLine()
}

f.AtEndOfStream