Foros del Web » Programación para mayores de 30 ;) » .NET »

combobox a un datagridview

Estas en el tema de combobox a un datagridview en el foro de .NET en Foros del Web. ola alguien sabe como traspasar de un combobox a un datagridview, la idea es seleccionar un nombre de una empresa (q es el codigo nombre_empresa ...
  #1 (permalink)  
Antiguo 08/08/2008, 21:34
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 7 meses
Puntos: 0
De acuerdo combobox a un datagridview

ola
alguien sabe como traspasar de un combobox a un datagridview,

la idea es seleccionar un nombre de una empresa (q es el codigo nombre_empresa de la tabla EMPRESA)y que se cargue automaticamente el datagridview con los datos de varios pc que estan en un campo llamado "descripcion_pc" de otra tabla llamada DESCRIPCION...

por fis,,si pueden manden codigo por q con palabras cualquiera lo dice.....por fis
lo disficicl es crear este codigo
:apla uso:
  #2 (permalink)  
Antiguo 10/08/2008, 22:45
Avatar de mazingerz  
Fecha de Ingreso: febrero-2003
Ubicación: Sarasota FL
Mensajes: 147
Antigüedad: 22 años, 1 mes
Puntos: 0
Respuesta: combobox a un datagridview

Estimado Rsilva:

Creo que lo mejor en ese caso es colocar un combobox dentro del Datagridview
En las tareas del datagrid edita las columnas, ahi cambias el default del columtype a DataGridViewComboBoxColumn. Le das un nombre acorde y luego un codigo donde Col2Cb.Items.Add(xy) es del tipo Ccombobox.


Private Sub DataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
Dim nindice As Integer = Col1Cb.DataGridView.CurrentRow.Index
Dim nvalor As Integer = Col1Cb.DataGridView.Rows(nindice).Cells(0).Value.T oString
comm.CommandText = "Select Stock, Precio From Producto Where IdProducto = '" & nvalor.ToString.Trim & "'"
DR = comm.ExecuteReader
DR.Read()
Dim nStock As Integer = DR.GetString(0)
Dim nPRecio As Integer = DR.GetString(1)
Me.DataGridView1.Item(2, nindice).Value = nPRecio
For xy As Integer = 1 To nStock
Col2Cb.Items.Add(xy)
Next
TotalVenta()
DR.Close()

End Sub

Espero te sirva.
Saludos.
  #3 (permalink)  
Antiguo 14/08/2008, 09:48
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 7 meses
Puntos: 0
Respuesta: esta corriendo

'listo
'utilice mysql 5 y .net 2005
'para el MySQLDriverCS bajarlo desde la pagina del guille

Option Explicit On
'Option Strict On
Option Compare Text
Imports MySQLDriverCS
Public Class Form1
Inherits System.Windows.Forms.Form

Dim var1 As Char
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim bConexionExitosa As Boolean = True
Dim DBCon As MySQLConnection
DBCon = New MySQLConnection(New MySQLConnectionString("127.0.0.1", "activos_informatica", "root", "oracle", 3306).AsString)
'Dim mida As New MySQLDataAdapter("select * from departamentos where nombre= '" & ComboBox1.SelectedItem & "'", DBCon)
Dim mida As New MySQLDataAdapter("select nombre, tipo_equipo from departamentos d, tipo_equipo t * from departamentos where nombre= '" & ComboBox1.SelectedItem & "'", DBCon)
Dim mid As New DataSet
Try
DBCon.Open()
Catch ex As MySQLException
MsgBox(ex.Message.ToString)
bConexionExitosa = False
End Try
If bConexionExitosa Then
Dim sql As MySQLCommand = New MySQLCommand
sql.Connection = DBCon
mida.Fill(mid, "departamentos")
DataGridView1.DataSource = mid
DataGridView1.DataMember = "departamentos"
sql.CommandType = CommandType.Text
DBCon.Close()
End If
End Sub
End Class
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 06:27.