ASP.NET

ASP.NET RSS

split string to table

Please support our ASP.NET advertiser: Intel Parallel Studio Home

•

Join Date: Sep 2007

Posts: 60

Reputation: evios is an unknown quantity at this point

Solved Threads: 0

evios

Offline

Junior Poster in Training

split string to table

May 7th, 2008

Erm, how to split a string using comma separated into a table? Below is my code but the output seems weird:
Lets say the row has 40 elements and 30 rows:

 Help with Code Tags 
 ASP.NET Syntax (Toggle Plain Text) 
For Count = 0 To UBound(MyArray)
            For a = 0 To UBound(MyArray)
                Dim celNew As New TableCell()
                'Dim rowNew As New TableRow()
                'MyArray = Split(strContents, ",")
                celNew.Text = MyArray(a)
                rowNew.Cells.Add(celNew)
                Table1.Rows.Add(rowNew)
            Next
        Next
For Count = 0 To UBound(MyArray)
            For a = 0 To UBound(MyArray)
                Dim celNew As New TableCell()
                'Dim rowNew As New TableRow()
                'MyArray = Split(strContents, ",")
                celNew.Text = MyArray(a)
                rowNew.Cells.Add(celNew)
                Table1.Rows.Add(rowNew)
            Next
        Next

Thanks.....

•

Join Date: Oct 2007

Posts: 1,295

Reputation: majestic0110 has a spectacular aura about

Solved Threads: 67

majestic0110 majestic0110 is offline

Offline

Nearly a Posting Virtuoso

Re: split string to table

May 7th, 2008

Can you post the output you are getting so I can try to help you ?

Computers are man's attempt at designing a cat: It does whatever it wants, whenever it wants, and rarely ever at the right time.

•

Join Date: Sep 2007

Posts: 60

Reputation: evios is an unknown quantity at this point

Solved Threads: 0

evios

Offline

Junior Poster in Training

Re: split string to table

May 7th, 2008

Some how it just separate the string by comma, adding cell by cell and then repeat, look like this:

XXX XXXX XXXXX XXXXX XXXXXX
XXX XXXX XXXXX XXXXX XXXXXX
XXX XXXX XXXXX XXXXX XXXXXX
.
.
.
.
.

•

Join Date: Oct 2007

Posts: 1,295

Reputation: majestic0110 has a spectacular aura about

Solved Threads: 67

majestic0110 majestic0110 is offline

Offline

Nearly a Posting Virtuoso

Re: split string to table

May 8th, 2008

Ok post your code and I will try to help.

Computers are man's attempt at designing a cat: It does whatever it wants, whenever it wants, and rarely ever at the right time.

•

Join Date: Sep 2007

Posts: 60

Reputation: evios is an unknown quantity at this point

Solved Threads: 0

evios

Offline

Junior Poster in Training

Re: split string to table

May 9th, 2008

good...thanks first, lets say i have this randomized text file:
RFG678,1PASS,2FAILED,FGYIJUH,324,5,6,7
RF34S8,1PASS,2FAILED,FGYIJUH,324,1,6,6
.........
and i use the code below:

 Help with Code Tags 
 ASP.NET Syntax (Toggle Plain Text) 
Dim strContents As String
        Dim objReader As StreamReader
        Dim MyArray As String()
        Dim a As Integer
        Dim Count As Integer
        objReader = New StreamReader("C://Index4.txt")
        strContents = objReader.ReadToEnd()
        objReader.Close()
        For Count = 0 To 67
            Dim rowNew As New TableRow()
            MyArray = Split(strContents, ",")
            For a = 0 To UBound(MyArray)
                Dim celNew As New TableCell()
                'Dim rowNew As New TableRow()
                'MyArray = Split(strContents, ",")
                celNew.Text = MyArray(a)
                Label11.Text = celNew.Text
                rowNew.Cells.Add(celNew)
            Next
            Table1.Rows.Add(rowNew)
        Next
Dim strContents As String
        Dim objReader As StreamReader
        Dim MyArray As String()
        Dim a As Integer
        Dim Count As Integer
        objReader = New StreamReader("C://Index4.txt")
        strContents = objReader.ReadToEnd()
        objReader.Close()
        For Count = 0 To 67
            Dim rowNew As New TableRow()
            MyArray = Split(strContents, ",")
            For a = 0 To UBound(MyArray)
                Dim celNew As New TableCell()
                'Dim rowNew As New TableRow()
                'MyArray = Split(strContents, ",")
                celNew.Text = MyArray(a)
                Label11.Text = celNew.Text
                rowNew.Cells.Add(celNew)
            Next
            Table1.Rows.Add(rowNew)
        Next

I just need to convert it into a table-like data, rows and columns separated nicely by line.
However if i using the code above, i just manage to get this:
RFG678 1PASS 2FAILED FGYIJUH 324 5 6 7 RF34S8 1PASS 2FAILED FGYIJUH 324 1 6 6

thanks