'Si esta cerrada la conexión la abro
If DEnv1.CxnOrdClientes.State <> 1 Then _
DEnv1.CxnOrdClientes.Open
'Mando a llamar al command, enviandole mi parametro
DEnv1.cmdOrdCliente_Grouping miVariable
'Muestra el reporte
drOrdCliente.Show 1
'Cierra la conexion
DEnv1.CxnOrdClientes.Close