как упорядочтить рекордсет

[Sirik]

создаю вот так:
RR As New ADODB.Recordset

структура, например, вот такая:
With RR.Fields
.Append "NameCom", adBSTR, , adFldUnknownUpdatable
For i = 1 To 14
.Append "N" & i, adInteger, , adFldUnknownUpdatable
.Append "P" & i, adInteger, , adFldUnknownUpdatable
Next i
.Append "S", adInteger, , adFldUnknownUpdatable
End With
RR.Open

как упорядочить рекодсет по алфавиту по полю NameCom ?

[GSerg]

RTFM.
.sort="NameCom ASC"

[Sirik]

ага, только тут уместна ошибка -3265

зы. метод Sort использовать после обяъвления структуры рекорсета или после добавления всех данных?
[/quote]

[Konst_One]

если ты хочешь колоночки свои расположить по-порядку, то только ручками при создании рекордсета, а если данные отсортировать по конкретным колонкам, то тебе уже сказали как

[Sirik]

надо отсортировать относительно поля NameCom

[Konst_One]

и в чем проблема

GSerg тебе уже сказал, как надо делать

[VVitafresh]

и в чем проблема

Наверное в том, что такой код бьет ошибку:

Код: Выделить всё


With RR.Fields
    .Append "NameCom", adBSTR, , adFldUpdatable
    .Append "S", adInteger, , adFldUnknownUpdatable
End With
    RR.Open
   
    RR.AddNew
    RR.Fields(0).Value = "aaa"
    RR.Fields(1).Value = 1
    RR.Update
    RR.AddNew
    RR.Fields(0).Value = "ccc"
    RR.Fields(1).Value = 3
    RR.Update
    RR.AddNew
    RR.Fields(0).Value = "bbb"
    RR.Fields(1).Value = 2
    RR.Update
   
    RR.Sort = "NameCom asc"


Хотя:

Код: Выделить всё


RR.Sort = "S asc"


отрабатывает без вопросов и правильно.

[Ennor]

В объявлении поля смени тип:

Код: Выделить всё

.Append "NameCom", adVarWChar, 4000

Проверено, работает на MDAC 2.8 SP1. Почему так - точно не знаю; скорее всего, потому, что выбираемый тобой тип поля не является нативным практ. ни для одной СУБД и потому автоматом подменяется на adLongVarWChar (можешь сам проверить). Поскольку заменитель является, по сути, BLOB-типом, то сортировать по нему так вот просто ADO не дает.

Да, предел такого поведения тоже имеется - 4679. Ну или *2, если adVarChar, видимо...

[Sirik]

2 Ennor, самое интересное, что твой код работоспособный!
огромное человеческое спасибо!