Recorrer un Dataset en NET como se hacia con el Data en vb6 - VB-MUNDO

phb · #1 (**permalink**) 03-03-2006, 08:00:33

Para quien le interese :smt004
He descubierto algo que para mi era nuevo en cuanto a recorrer un Dataset en NET
Sin usar un DataGrid solo con los Textbox y un botón para avanzar y otro para retroceder e incluso mostrar cuantos y en que registro estamos actualmente.

Adjunto el archivo (Recorrer un dataset.zip) porque tiene algunas imagenes

Saludos para todos.... :smt006

crow78 · #2 (**permalink**) 11-04-2006, 17:24:00

Se agradece esto es lo que andaba buscando solo un pregunta mas
Y si deseo buscar un registro "x" como seria

Gracias

crow78 · #3 (**permalink**) 12-04-2006, 04:46:32

Ok a demas
si deseo agregar un boton que diga nuevo registro y grabar dato
como lo haria
de antemano muchas gracias

phb · #4 (**permalink**) 14-04-2006, 17:05:43

crow78:
Te anexo el codigo fuente completo del ejemplo de la conexion con los botones
Agregar, Eliminar, Actualizar sobre la base de datos....
Cuando hagas la conexion tene en cuenta que la misma debe tener seteada en sus propiedades la de Lectura y escritura
"READWRITE" en el .Doc se explica mejor....

Saludos

crow78 · #5 (**permalink**) 14-04-2006, 17:59:16

Gracias me sirvio mucho...
Se agradece....
Otro favor yo le agrege este codigo para realizar una busqueda, podrias comentarme si esta bien o algun cambio que sugieras:

'COdigo para realizar un busqueda
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As Integer
Dim clave As Integer
Dim encon As Boolean

'REM OleDbDataAdapter1.Fill(DataSet11)
If TextBox1.Text = "" Then
MsgBox("escriba clave a buscar")
Else

clave = TextBox1.Text()
For x = 1 To BindingContext(DataSet11, "dat").Count
If clave = TextBox3.Text Then
encon = True
Else
encon = False
BindingContext(DataSet11, "dat").Position += 1
End If
Next
If encon = True Then
MsgBox("Encontrado", MsgBoxStyle.Exclamation, "Administrador")
'REM MessageBox.Show("Encontrado", "Administrador")
Else
MessageBox.Show("no encontrado")

End If
End If
Yo capturo en un text la clave a buscar y la comparo con otro text que esta enlazado a la B.D. para buscarlo y localizarlo...

De antemano gracias...

phb · #6 (**permalink**) 21-04-2006, 10:09:10

crow78:
No esta mal lo que haces, pero mira lo que le agregué al código que te pase antes
Lo nuevo es la Región Búsqueda

crow78 · #7 (**permalink**) 25-04-2006, 21:00:36

Gracias por las respuestas y ejemplos me han sido muy utiles...
una pregunta mas
como obtengo o genero los reportes....
es decir tengo un menu reportes y este asu vez con un submenu(general,mujeres,niños)
si selecciono niños que me muestre todos lod niños en los reportes...
De antemano muchas gracias

phb · #8 (**permalink**) 28-04-2006, 07:46:48

crow78:

Proba este codigo y despues contame, tiene los reportes....
Saludos

phb · #9 (**permalink**) 04-05-2006, 15:35:49

crow78:
El nuevo zip trea los reportes clasificados por Hombre, Mujer y niños....
Saludos

J.M.Movilla · #10 (**permalink**) 04-05-2006, 15:53:53

No sigo en profundidad este post, porque no manejo .NET (mea culpa... por el miedo que me da mi DNI...) Pero simplemente con ver cómo te estás portando con el usuario crow78, creo que te mereces, amigo Pablo H. Baudraco, un caluroso aplauso y el agradecido reconocimiento del foro. Muchas gracias.