Ainda em relação ao datatable...

[Fernando Neto 0]

Olá amigos, seguinte, eu tenho uma datatable que traz dados pra um datagrid, e tenho um dataview que faz o seguinte:

 

Eu tenho uma coluna check no datatable, e toda vez que algum item está checado eu exibo os dados da linha num outro datatable.(daí a função do dataview)

 

No caso, está servindo pra pegar somente os servicos que o cliente utilizou

 

Mas pra inserir vários servicos utilizados pelo cliente numa só OS, como eu disse, preciso do FOR

 

Então fiz o seguinte...

 

For Each dt.Columns("check") = true In dt

objVOservicospr.fkidcodigo = dt.Columns("idcodigo").Container

Next

 

ou seja, cada vez que na coluna check tiver um campo selecionado, eu insiro o conteudo da coluna código na minha VO.

 

Mas ele barra nesse igual que está em vermeho, se alguem puder ajudar, agradeço

[eriva_br 7]

olá Fernando...

 

tenta assim:

 

com datatable:

Dim dr As DataRow

For Each dr In dt.Rows

If CType(dr("check"), Boolean) = True Then

objVOservicospr.fkidcodigo = dr("idcodigo").Container

End If

Next

 

com dataview:

For i As Integer = 0 To dvRead.Count - 1

If CType(dvRead.Item(i).Row.Item("check"), Boolean) = True Then

objVOservicospr.fkidcodigo = dvRead.Item(i).Row.Item("idcodigo")

End If

Next i

 

ou senão você joga o conteudo do datable num novo dataview filtrando os dados e navega nele:

Dim dvRead As DataView

dvRead = New DataView(dt, "check = 1", "", DataViewRowState.CurrentRows)

For i As Integer = 0 To dvRead.Count - 1

objVOservicospr.fkidcodigo = dvRead.Item(i).Row.Item("idcodigo")

Next i

 

 

falows

t+

 

Olá amigos, seguinte, eu tenho uma datatable que traz dados pra um datagrid, e tenho um dataview que faz o seguinte:

 

Eu tenho uma coluna check no datatable, e toda vez que algum item está checado eu exibo os dados da linha num outro datatable.(daí a função do dataview)

 

No caso, está servindo pra pegar somente os servicos que o cliente utilizou

 

Mas pra inserir vários servicos utilizados pelo cliente numa só OS, como eu disse, preciso do FOR

 

Então fiz o seguinte...

 

For Each dt.Columns("check") = true In dt

                objVOservicospr.fkidcodigo = dt.Columns("idcodigo").Container

Next

 

ou seja, cada vez que na coluna check tiver um campo selecionado, eu insiro o conteudo da coluna código na minha VO.

 

Mas ele barra nesse igual que está em vermeho, se alguem puder ajudar, agradeço

<{POST_SNAPBACK}>