Datacombo not populated

[tomita . serban]

I try this code in Visual Basic 6:            in General section ========================= Dim gConn As ADODB.Connection Dim RS As ADODB.Recordset           in Form_load section ========================= Private Sub Form_Load()     Set gConn = New ADODB.Connection     With gConn         .Provider = "MSDASQL.1"         .CursorLocation = adUseServer         .Open "Data Source=ctbsap;Initial Catalog=ctbsap;", "tabele", "tabele"     End With    Set RS = New ADODB.Recordset    With DataCombo1         .BoundColumn = "cont"         Set .RowSource = RS         .ListField = "denumire"    End With    RS.Open "Select * from analitice", gConn, adOpenForwardOnly, adLockReadOnly End Sub DataCombo1 as DataCombo control   RS is populated but why datacombo1 is not populated?   :-( Sorry for my english!