Sopmac
|
RIO DE JANEIRO RJ - BRASIL
|
|
Postada em 25/08/2005 08:20 hs
Bom dia Turma! Desejo colocar em uma ComboBox os dados de uma tabela do Access para que possam ser selecionados. Como faço isto? Outra coisa: Como faço para carregar relatórios do Acces pelo VB?
Equipe Sopmac
|
|
|
|
|
Postada em 25/08/2005 08:32 hs
você pode fazer assim (evento load do form): Dim rst As Recordset Set rst = vgdb.OpenRecordset("SELECT Produtos.Codigo, Produtos.Nome From Produtos ORDER BY Produtos.Codigo;") If rst.RecordCount > 0 Then Do While Not rst.EOF Combo1.AddItem rst!Nome rst.MoveNext Loop End If rst.Close Set rst = Nothing
|
|
|
Gilson Filho
não registrado
|
|
Postada em 27/08/2005 11:14 hs
esse codigo é para ADO ou DAO?
|
|
|