Loop no vb.net

[Tiago_BB]

Ola pessoal estou com umk problema e não to conseguindo resolver!!!

em um determinado momento do meu código faço um FOR/NEXT percorrendo um datatable e verificando se uma determinada imagem existe em uma pasta no C:.

For cont = 0 To DT.Rows.Count - 1
  
       If ExisteFoto(Convert.ToString(DT.Rows(cont).Item(2)).Trim) = True Then
             
next

Até ai beleza... mais o que acontece? Dentro desse FOR faço chamada a uma função, e nessa funcao eu crio um novo datatable e insiro uma nova coluna e uma nova linha. Ex:

For cont = 0 To DT.Rows.Count - 1
  
       If ExisteFoto(Convert.ToString(DT.Rows(cont).Item(2)).Trim) = True Then

             ImageTable(C:/"Imagens/" DT.Rows(cont).Item(2) & ".jpg"))
             
next

-------------------------------------------------------------------------

Public Shared Function ImageTable(ByVal path As String) As DataTable

         Dim data As New DataTable
         Dim row As DataRow
         data.TableName = "Imagem"
         data.Columns.Add("IMAGE", System.Type.GetType("System.Byte[]"))

            Dim fs As New FileStream(ImageFile, FileMode.Open)
            Dim br As New BinaryReader(fs)
            row = data.NewRow()
            row(0) = br.ReadBytes(br.BaseStream.Length)
            data.Rows.Add(row)

            br = Nothing
            fs.Close()
            fs = Nothing

            Return data

end function

-------------------------------------------------------------------------------------------

Caso o meu Datatable( não o da função ) tenha apenas um registro, beleza, ele exibe, caso contrario, vai devolver sempre a ultima imagem... tenho que fazer um for dentro da funcao pra ir inserindo linhas toda vez que passar por la.

Entenderam... fui mais ou menos claro?? rs

Espero que possam me ajudar!!!

Atenciosamente,

Tiago

Editado Março 5, 2009 por quintelab
Adicionado BBCode Code

[quintelab]

A cada registro do for você precisa inserir uma nova linha no seu DataTable. É isso?

Abraços...

[Tiago_BB]

isso.. tentei fazer o seguinte: passei como parametro para a funcao o contador do meu datatabel

Public Shared Function ImageTable(ByVal path As String, [b]byval cont as integer[/b]) As DataTable

         Dim data As New DataTable
         Dim row As DataRow
         data.TableName = "Imagem"
         data.Columns.Add("IMAGE", System.Type.GetType("System.Byte[]"))

            Dim fs As New FileStream(ImageFile, FileMode.Open)
            Dim br As New BinaryReader(fs)
            row = data.NewRow()
            row([b]cont[/b]) = br.ReadBytes(br.BaseStream.Length)
            data.Rows.Add(row)

            br = Nothing
            fs.Close()
            fs = Nothing

            Return data

end function

Porém da erro... pois o row do tipo datarow espera como oarametro uma coluna e não linha... e ae.. o que faço?

quero inserir linha!!!

obrigado!!!

Editado Março 6, 2009 por quintelab
Adicionado BBCode Code

[quintelab]

Mas a row já uma linha pra que você quer passar uma linha dentro dela??

Você deve passar o nome da coluna e seu respectivo valor. Ae nesta linha: data.Rows.Add(row) ele irá adiconar a linha ao DataTable.

Abraços...

[Tiago_BB]

entaum...

Eu tenho que adicionar n linhas nessa coluna...

se eu der "data.Rows.Add(row)" ele sempre vai adicionar a ultim linha a ser inserida... ou seja.... se meu datatable tem 2 imagens... vai adicionar sempre a segunda imagem...

Estou correto?

Obrigado pelo interesse!!!

[Graymalkin]

Você deveria criar a sua segunda DataTable fora da função (pra que seja sempre utilizada a mesma) e passá-la para esta função (como segundo parâmetro). E daí sim fazer o que o quintelab recomendou (usar o método Add).

Abraçcos,

Graymalkin