comparar filas

28/07/2005 - 18:43 por Miko_tnt | Informe spam
hola foro... tengo la siguiente duda, cargo un dataset (ds) con unos
sqlDataAdapters el caso es que quiero llenar una nueva tabla dependiendo de
una comparacion en las filas de las tablas que ya estan en el dataset este es
el codigo que hago pero es algo ordinario y nome funciona pero tampoko me
marca error ,pero no c komo mas hacerlo y la verdad no kreo ke sea dificil
pero no c komo...

dim tabla as datatable
dim filaAUsar as datarow

'me tok crear una tabla (datatable) que sea de la misma estructura de
ds.tables(2)

For Each fila In ds.Tables(2).Rows
tabla.clear()
For Each fila1 In ds.Tables(3).Rows
If ds.Tables(2).Columns("usuarioID") Is
ds.Tables(3).Columns("usuarioID") Then
'agraga la fila de ds.Tables(2) a tabla
tabla.Rows.Add(fila)
End If
Next
hashtable1.add(ds.tables(2).columns.tostring,tabla)
Next

el caso es que asi sean iguales los elementos de las columnas no toma
ninguno, nunca entra a la parte que esta adentro del if... el restosupongo
que si entrara esta bien para ver si entra tengo un msgbox poara probar si
esta entrando pero no me funciona...

Gracias cualquier ayuda
 

Leer las respuestas

#1 Miko_tnt
28/07/2005 - 22:04 | Informe spam
Si a alguien le interesa ya encontre la solucion despues de mucho joder ahi
esta:
(toka kambiarle unas bobadas pero aka esta lo basiko:

tabla = ds.Tables(3)

For Each fila In ds.Tables(2).Rows
tabla.Clear()
'MsgBox(ds.Tables(2).TableName & ": " &
ds.Tables(2).Columns(0).ColumnName & ": " & fila.Item(0))
For Each fila1 In ds.Tables(3).Rows
'MsgBox(ds.Tables(3).TableName & ": " &
ds.Tables(3).Columns(0).ColumnName & ": " & fila.Item(0))
If fila.Item(0) = fila1.Item(0) Then
MsgBox("Entro")
tabla.Rows.Add(fila)
'tok agragar la fila de ds.Tables(2) a tabla
End If
Next
Next



"Miko_tnt" escribió:

hola foro... tengo la siguiente duda, cargo un dataset (ds) con unos
sqlDataAdapters el caso es que quiero llenar una nueva tabla dependiendo de
una comparacion en las filas de las tablas que ya estan en el dataset este es
el codigo que hago pero es algo ordinario y nome funciona pero tampoko me
marca error ,pero no c komo mas hacerlo y la verdad no kreo ke sea dificil
pero no c komo...

dim tabla as datatable
dim filaAUsar as datarow

'me tok crear una tabla (datatable) que sea de la misma estructura de
ds.tables(2)

For Each fila In ds.Tables(2).Rows
tabla.clear()
For Each fila1 In ds.Tables(3).Rows
If ds.Tables(2).Columns("usuarioID") Is
ds.Tables(3).Columns("usuarioID") Then
'agraga la fila de ds.Tables(2) a tabla
tabla.Rows.Add(fila)
End If
Next
hashtable1.add(ds.tables(2).columns.tostring,tabla)
Next

el caso es que asi sean iguales los elementos de las columnas no toma
ninguno, nunca entra a la parte que esta adentro del if... el restosupongo
que si entrara esta bien para ver si entra tengo un msgbox poara probar si
esta entrando pero no me funciona...

Gracias cualquier ayuda

Preguntas similares