extract every 5th row on text file

[lovettj]

I need to create a script that extracts every 5th row in a text file using vbscript. If anyone could please help me it will be very appreciative.

Thanks in advance.

 

[PHV]

What have you tried so far and where in your code are you stuck ?
Have a look here:

http://msdn2.microsoft.com/en-us/library/z9ty6h50.aspx

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[lovettj]

I know how to open a file a write a file using the filesystem object. I need to know how to write every 5th row of the text file.

 

[PHV]

Have a look at the Mod operator.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[Swi]

As PHV states:

Counter = 0
Do
Counter = Counter + 1
InputData = InStream.ReadLine
If Counter Mod 5 = 0 Then OutStream.WriteLine InputData
Loop Until InStream.AtEndOfStream

Swi

 

[dm4ever]

You don't even need a counter...

Look at the Line property:

http://msdn2.microsoft.com/en-us/library/chsfhd43.aspx

InStream.Line

--------------------------------------------------------------------------------
dm4ever
My philosophy: K.I.S.S - Keep It Simple Stupid

 

[Swi]

You are correct. I get in the habit of using a counter because I normally display the progress of the program when running.

Swi