ник: час
Dim STR_SQL As String
STR_SQL = "SELECT SALE_TBL.* FROM SALE_TBL"
Adodc1.ConnectionString = GLB_CONNECTION
Adodc1.RecordSource = STR_SQL
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
Как отсортировать записи не создавая новый запрос
или не получится?????