 
			
				14/04/2008, 05:17
			
			
			     |  
      |    |    |    Fecha de Ingreso: abril-2008  
						Mensajes: 20
					  Antigüedad: 17 años, 6 meses Puntos: 1     |        |  
  |      Re: buscar en una datagrid        Ya lo he solucionado, gracias por tu apoyo, pongo el codigo por si a alguien le sirve (Vb2005)   
Esto en el textchange del combo(txtnombre)    Dim CadenaConexion As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Database.mdb" 
        Dim conexion As New OleDb.OleDbConnection(CadenaConexion) 
        Dim consulta As String = "SELECT * FROM PRODUCTOS WHERE NombreProducto LIKE '%" & Txtnombre.Text & "%'" 
        Dim comando As New OleDb.OleDbCommand(consulta, conexion) 
        Dim objDataAdapter As New OleDb.OleDbDataAdapter(comando) 
        Dim objDataTable As New Data.DataTable("ProductosConsulta") 
        objDataAdapter.Fill(objDataTable) 
        objDataAdapter.Dispose() 
        objDataAdapter = Nothing 
        comando.Dispose() 
        comando = Nothing   
        Dim objDataRow As DataRow 
        PRODUCTOSDataGridView.DataSource = Nothing 
        PRODUCTOSDataGridView.Rows.Clear() 
        For Each objDataRow In objDataTable.Rows 
                PRODUCTOSDataGridView.Rows.Add(objDataRow.Item("Co  digoProducto"), objDataRow.Item ("NombreProducto"), objDataRow.Item("PrecioVenta"), objDataRow.Item("Unidades"), objDataRow.Item("Tipo"))   
        Next 
        conexion.Close()         
					
						Última edición por tsunamijavip; 14/04/2008 a las 05:46           |