Text file containing 8 characters needs to changed to text file containing 4 characters

The easiest way to do this is by using a program called 'notepad++' and recording a marco, you can find your example textfile split in lines of 4 chars attached.
test.txt

if they all have 8, use substring method.  I guess you could place in a hashmap as a key/value pair so you can then print them out.  you could also just place in a stringbuilder in the order that they were separated.



Here is the substring method:

myString.Substring(0, 4)
myString.Substring(4, 8)

            StreamReader rdr = new StreamReader(@"C:\test.txt");
 
            List<string> data = new List<string>();
            string line;
            while (!rdr.EndOfStream)
            {
                line = rdr.ReadLine();
 
                data.Add(line.Substring(0, 4));
            }
 
            rdr.Close();
 
            StreamWriter wrtr = new StreamWriter(@"C:\test2.txt");
 
            foreach (string s in data)
            {
                wrtr.WriteLine(s);
            }
 
            wrtr.Flush();
            wrtr.Close();

Select allOpen in new window

Imports System
Imports System.IO
Imports System.Collections
                  
Dim arrText As New ArrayList()
Dim separatedText As New ArrayList()
Sub Load()
Dim objReader As New StreamReader("c:\test.txt")  'place your own address in
                              
Dim sLine As String = ""
       ' to store input from files                        

Do
    sLine = objReader.ReadLine()
    If Not sLine Is Nothing Then
        arrText.Add(sLine)
    End If
Loop Until sLine Is Nothing
objReader.Close()
End Sub

Sub splitInput()

    For each string x in ArrText
        Dim Temp As String = (String)x
        Dim firstFour As String = Temp.SubString(0,4)
        Dim secondFour As String = Temp.SubString(4, 4)
       
       arrText.Add(firstFour)
       arrText.Add(secondFour)
   Next
End Sub

then write back to file

                              

mara, he's a VB guy

oopss
marga, he's a vb guy...excuse typo

yeah.. i know..

got few prob with my IDE

here's the VB version

		Dim rdr as System.IO.StreamReader = new System.IO.StreamReader("C:\test.txt")
 		Dim data as List(Of string) = new List(Of string)
 
        Dim line As String
        
        Do 
        	    line = rdr.ReadLine()
 
                data.Add(line.Substring(0, 4))
        Loop While (Not rdr.EndOfStream) 
 
        rdr.Close()
        
 		Dim wrtr As System.IO.StreamWriter = New System.IO.StreamWriter("C:\test2.txt")
 		
 		dim s as String
 		For Each s In data
 			wrtr.WriteLine(s)	
 		Next
 		
 		
 
        wrtr.Flush()
        wrtr.Close()

Select allOpen in new window

Perfect! Thanks margajet24.

Exactlay what I wanted. Thanks!