ADODC et sort

Bonsoir
je suis entrain de développer une application en vb6.
Cette application se connecte a une base de données sql server
la connexion se fait a l'aide d'un controle adodc, l'affichage des données d'une table se fait dans un datagrid
je veut que l'utilisateur lorsqu'il clique sur l'entete du datagrid, les données seront triés avec la colonne voulue.

j'ai utilisé le code suivant sur le datagrid

Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)
'On Error Resume Next
Dim rs As ADODB.Recordset
Set rs = Me.Ado_inci.Recordset
rs.Sort = DataGrid1.Columns(ColIndex).DataField
End Sub

le résultat est le suivant: le tri ne s'effectu pas, et lorsque j'annule "On Error Resume Next", un message d'erreur s'affiche en m'indiquant le message suivant: "l'ordre du tri n'a pas pu être appliqué"

le problème c'est que lorsque j'utilise ce code avec une base de donnée access le tri s'exécute, et avec sql server rien ne se passe....

 

Salut,

Salut,

Je pense à une solution à toi de voir apres.
Tri ton recordset et ensuite recharche ton datagrid avec ton recordset.
Fait le test et informe le forum si c'est ok.

SLB.

remarque : Peux tu donner ton code de déclaration de rs et de chargement de ton datagrid?

slt,
merci pour ton attention lillith212, j'ai essayé ce que vous m'aavez proposer mais le même message s'affiche