02/06/2005, 09:07
|
 | | | Fecha de Ingreso: agosto-2003 Ubicación: La Paz - Bolivia
Mensajes: 207
Antigüedad: 21 años, 3 meses Puntos: 1 | |
| Dim oleComm As New OleDb.OleDbCommand("",OleDb.OleDbConnection)
For Paso = 0 To NFilas - 2
MessageBox.Show(Me.DataGrid1.Item(Paso, 2).ToString())
Me.OleDbDataAdapter5.SelectCommand.CommandText = "SELECT DISTINCT TDC_GrupoComponente FROM DesgloseConjuntos WHERE TDC_DescripComponente = " & "'" & Me.DataGrid1.Item(Paso, 2).ToString() & "'"
Resultado = oleComm.ExecuteScalar
MessageBox.Show(Resultado)
Next
en el OleDb.OleDbConnection tienes que tener tu conexion a tu BD
__________________
Saludos desde el corazón de América.....BOLIVIA
Da lo mejor de ti, que siempre será recompensado
|