Sv Community El Salvador
Soporte y Tecnología => Programación => VB => Mensaje iniciado por: ernestoelunico en octubre 03, 2008, 02:33:22 am
-
Hola otra vez de pregunton solo asi aprendo algo :angel:
Yo quiero hacer una consulta de una tabla es decir visualizar una tabla en un formulario de visual basic 6 sp6 yo se que lo puedo hacer con este objeto y en combinacion con el adodc
pero si yo tengo un combobox con el nombre de tres tablas diferentes y yo quiciera llamar una tabla seleccionandola del combobox como hago para definir esto ya que en el objeto adodc solo puedo seleccionar una tabla usando microsoft jet 4
como le digo que cambie de tabla segun lo que elija el usuario :big_boss:
-
Pues cerras las conexión que tenes y la volves a abrir con otra tabla....
Supongamos que rs es el recordset y adodb1 es el conector, ademas que "Ernestos" es la tabla 1 y "Unicos" la tabla 2:
El usuario selecciona "Ernestos" en el combobox:
rs.Close
rs.Open "Ernestos", adodb1
-El usuario selecciona "Unicos" en el combobox:
rs.Close
rs.Open "Unicos", adodb1
Otra forma mas apropiada seria usando el Recordsource, haciendo un "SELECT * FROM tabla_que_queres"
-
Hey no es por nada pero creo que no hay necesidad de hacer un Thread por cada duda, un mismo thread basta.... has colocado ufff muchos thread por cada dudita q tengas porq mejor no haces un solo tema..???
http://www.svcommunity.org/forum/index.php?topic=63486.0;topicseen (http://www.svcommunity.org/forum/index.php?topic=63486.0;topicseen)
http://www.svcommunity.org/forum/index.php?topic=64246.0;topicseen (http://www.svcommunity.org/forum/index.php?topic=64246.0;topicseen)
-
Hey no es por nada pero creo que no hay necesidad de hacer un Thread por cada duda, un mismo thread basta.... has colocado ufff muchos thread por cada dudita q tengas porq mejor no haces un solo tema..???
http://www.svcommunity.org/forum/index.php?topic=63486.0;topicseen (http://www.svcommunity.org/forum/index.php?topic=63486.0;topicseen)
http://www.svcommunity.org/forum/index.php?topic=64246.0;topicseen (http://www.svcommunity.org/forum/index.php?topic=64246.0;topicseen)
Ya se intento antes, pero se tuvieron que volver a separar porque se hace un solo relajo :S
-
bueno provando algo difernte porque no habia leido su respuesta lo hice de esta forma y me funciono la coloco por si alguien algun dia la utiliza
Private Sub Combo1_Click()
DataGrid1.Caption = Combo1.text
If Combo1.text = "Compras" Then
Adodc1.RecordSource = Compra
frmconsultacompra.Caption = "Consulta de Compras"
End If
If Combo1.text = "Devoluciones y Rebajas sobre compra" Then
Adodc1.RecordSource = Devoluciones_rebajas_compras
frmconsultacompra.Caption = "Consulta Devoluciones y rebajas sobre compras"
End If
End Sub
Private Sub Command1_Click()
Unload frmconsultacompra
FrmConsulta.Show
End Sub
Private Sub Form_Load()
DataGrid1.ClearFields
End Sub
el formulario solo contiene un boton comando un datagrid un adodc1 y un combo box
con el adodc se establece la coneccion atravez de las propiedades y en el datagrid se visualiza la tabla que esta en access 2003
se usa el microsoft jet 4 sp8 y dao3.6 object library