MS SQL 2k, Access XP.
Имеется следующая процедура:

Private Sub rstKlienty_FetchComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
' ---------------------------------------------------------
Dim strFilter As String, strOrder As String
Dim frm As Form
Set frm = Forms![Клиенты].[СписокКлиентов].Form
strFilter = ""
strOrder = ""
If frm.FilterOn Then
strFilter = frm.Filter
End If
If frm.OrderByOn Then
strOrder = frm.OrderBy
End If
' ---------------------------------------------------------
Set frm.Recordset = rstKlienty
...
' ---------------------------------------------------------
If strFilter <> "" Then
frm.Filter = strFilter
frm.FilterOn = True
End If
If strOrder <> "" Then
frm.OrderBy = strOrder
frm.OrderByOn = True
End If
' ---------------------------------------------------------

' ---------------------------------------------------------
Set frm = Nothing
End Sub

Но после выполнения frm.OrderByOn = True табличная формочка покрывается "#Имя?", хотя фильтр восстанавливается нормально.

Как восстановить сортировку?

Пока нашел такое решение:
проводить синтаксический разбор OrderBy и формировать свойство Sort рекордсета.
Есть ли другие идеи?