Help converting VBA to VBscript....Lost

Good day everyone,

I am needing some help converting some VBA i wrote in excel into a VBscript for use in an automation procedure I am putting together. All this code does is take a text file with a list of IDs and splits it into seperate lists of 500IDs each with a counter for naming the files file1>file2>file3>....etc.

I understand that you need to get rid of the As variables and a few other excel specific things, but I have gone through numerous times modifying it and just need some help now. The code i posted is the original VBA code. Thanks in advance for any help, which is also much appreciated.

Is this solved?

If you solve a problem yourself before anyone else has responded, please take a moment to describe your solution, chances are some other member will benefit.