Show Recordset in unbound subform

[vgarzon]

Hi,



I think that I'm stuck in a glass of water, but I've been trying to do this for a couple of hours with no results. Maybe you can help me as I'm not an experienced VBA programmer.

I'm trying to show the data retrieved in an ADO recordset, in an unbound subform.

I do this to get the data in the recordset:

     
     Dim cnLAO As ADODB.Connection
     Set cnLAO = New ADODB.Connection
    
     Dim strCon1 As String
     strCon1 = "PROVIDER=SQLOLEDB;DATA SOURCE=SERVER1C;INITIAL CATALOG=ToolXYZ;INTEGRATED SECURITY=sspi;"
     
     cnLAO.Open strCon1
    
     Dim rsEmpInfo As ADODB.Recordset
     Set rsEmpInfo = New ADODB.Recordset
    
     Dim strSP1 As String
     strSP1 = "EXEC sp_Get_Tool_User_Information NULL, NULL, NULL, NULL, NULL, 'ZONV', 'VIC', 'GAR', 'A'"
    
     rsEmpInfo.ActiveConnection = cnLAO
     rsEmpInfo.Open strSP1

I test the results of the recordset and they work perfectly. Now, I need to show all the results in a subform, but I don't know how to do this.

Can you please give me very specific details of how to do it?

Thanks in advance,

Victor

[RuralGuy]

Why the requirement the SubForm be *unbound*?

[vgarzon]

It's just because the subform is placed in the form, for displaying purposes only.

What I need, is to consult an external database, and show the results in that subform. I'm Using Access only as a front end. All my data is in an MS SQL Server.

Am I ok doing things like that? It's OK to use the subforms for that purpose?

[RuralGuy]

Why not create a static query and bind it to your subform?

[tiuliucci]

Set your Recordset as a variable and then do the following.


SQLs = "SELECT ..."
Forms![Main Form]![Sub Form].Form.RecordSource = SQLs
Forms![Main Form]![Sub Form].Form.Requery

I use this for an unbound form. My main form includes fields for search information. Once the Search button is clicked the record source of the unbound sub form is set to an SQL statement and then requeried.

Take care,
Troy