Hola tengo un formulario (1) que muestra los datos mediante una consulta, que llama a otro (2) para modificar el estado, y lo que quiero hacer es que desde el 2 actualice los datos del 1.
Es decir que si al modificar (2), no hay ningun dato que se cumpla en el (1), me vuelva a repintar los datos.
He intentado a hacerlo de la siguiente manera
En 1, llamada al 2.
Código:
Dim oCambioEstado As New frmCambioEstado
oCambioEstado.ShowDialog()
En el 2 para modificar los datos
Código:
Dim oPrincipal as new frmPrincipal
oPrincipal.oConexion = New MySqlConnection
oPrincipal.oConexion.ConnectionString = cadena_conexion
'crear adaptador
oPrincipal.oDataAdapter = New MySqlDataAdapter("Select * from tabla1 where estado='AF' order by apellido1,apellido2,nombre desc", oConexion)
'Crear dataset
oPrincipal.oDataSet = New DataSet
oPrincipal.Open()
'llenar con el adaptador el dataset
oPrincipal.oDataAdapter.Fill(oPrincipal.oDataSet, "tabla1")
oPrincipal.oConexion.Close()
'establecer el indicador del registro
'a mostrar de la tabla
oPrincipal.iPosicionActual = 0
oPrincipal.CargarDatos()
oPrincipal.Update()
Me.Close()