Grid não exibe valores da consulta

[ricard.net 0]

Estou com um outro probleminha, após fazer uma consulta simples, do tipo select * from empregados, o meu objeto recordset rstobj.recordcount retorna 6 registros, porém os mesmos não são exibidos no grid.

 

Segue a função utilizada para preenchimento do grid

Sub setDataGrid()  DataGrid1.Caption = cap5  DataGrid1.Columns.Add (0)    For i = 0 To rstObj.fields.Count - 1   DataGrid1.Columns(i).Caption = rstObj.fields(i).Name  Next  MsgBox rstObj.recordcount  Set DataGrid1.DataSource = rstObj  DataGrid1.RefreshEnd Sub

Valeu!

[luiz humberto 0]

Especifique os campos em sua SQL.

SELECT Nome       ,IdadeFROM Funcionarios

Obs: Não deve ser usado o operador curinga(*).

Ou também Faça um laço de repetição especificando o DataField no DataGrid, ao invés de especificar os campos em sua SQL.

[ricard.net 0]

Nada feito Luiz.

 

mudei a consulta para select username,departament,contatcperson from empregados, mas ainda assim os dados não são exibidos no grid.

 

Sub setDataGrid()  Dim i As Integer  DataGrid1.Caption = cap5  DataGrid1.Columns.Add (0)    For i = 0 To rstObj.Fields.Count - 1   DataGrid1.Columns(i).Caption = rstObj.Fields(i).Name  Next  MsgBox rstObj.RecordCount  Set DataGrid1.DataSource = rstObj  DataGrid1.RefreshEnd Sub

Note que no código assima eu configuro o cabeçalho do grid

DataGrid1.Columns(i).Caption = rstObj.Fields(i).Name

Essa parte funciona perfeitamente bem, mostrando o nome dos campos "username","departament","contactperson"

 

Aparentemente a instrução abaixo não funciona. Entretanto nenhum erro é apresentado pelo vb6. Alguma idéia?

Set DataGrid1.DataSource = rstObj

Especifique os campos em sua SQL.

SELECT Nome       ,IdadeFROM Funcionarios

Obs: Não deve ser usado o operador curinga(*).

Ou também Faça um laço de repetição especificando o DataField no DataGrid, ao invés de especificar os campos em sua SQL.

<{POST_SNAPBACK}>

[Graymalkin 0]

Você chegou a definir os campos da DataGrid antes de utilizar esse modo (com um ADODC e "Retrieve Fields")? Se sim, experimente retirar e colocar novamente a DataGrid e utilizar esse seu código mesmo (mas não mexa em nenhuma propriedade da DataGrid antes de se certificar de que está funcionando).Abraços,Graymalkin