Visual Basic - Cambiar recordsource según acceso

Hola, estoy trabajando con un datagrid y un adodc. Estoy intentando que al acceder al datagrid cambie según la persona que ha entrado, pero no me hace caso.
el código es:
if user=client
Adodc1.CommandType = adCmdText
'Adodc1.RecordSource = "select * from Clients where num <= 2001"
If user = auxiliar Then
Adodc1.RecordSource = "select * from Clients where num <= 2001"
Else
Adodc1.RecordSource = "select * from Pacients_General where llit >= 2001"
End If

No me funciona

Fijate que para generar la consulta primero tienes que desvincular el datagrid y al final volver a vincularlo al recordset. Aca va un ejemplo:

set datagrid1.datasource=nothing
if user=client
Adodc1.CommandType = adCmdText
'Adodc1.RecordSource = "select * from Clients where num <= 2001"
If user = auxiliar Then
Adodc1.RecordSource = "select * from Clients where num <= 2001"
Else
Adodc1.RecordSource = "select * from Pacients_General where llit >= 2001"
End If
set datagrid1.datasource=Adodc1.RecordSource
datagrid1.rebind
datagrid1.refresh