Счастье есть, просто оно иногда не совсем реальное
Иногда чувствую себя лохом...
Полдня не мог придумать как сделать простую вобщем-то вещь - сортировку записей в multi-value поле.
Точнее в нём то сделал, но есть ещё одно такое хитрое поле, где записей десятками, ибо они там блоками располагаются и сортировать нужно уже блоки, соответственно отсортированному вышеупомянутому полю...
Ага, я знаю, что нихрена не понятно, но по-другому написать всё равно нельзя
Короче в итоге вышла структура
For i=0 To Ubound(...)
For j=0 To Ubound(.)
If Instr(...(j), "...") Then
If Right(...(j),Len(...(j))-6) = ...(i) Then
For sk=j To j+20
MasBuff = MasBuff + Chr$(13) + ...(sk)
Next
End If
End If
Next
Next
А весь код занял всего 46 строк.
И чего тут было тупить спрашивается?
Правда говорят - понедельник - день тяжёлый...
Полдня не мог придумать как сделать простую вобщем-то вещь - сортировку записей в multi-value поле.
Точнее в нём то сделал, но есть ещё одно такое хитрое поле, где записей десятками, ибо они там блоками располагаются и сортировать нужно уже блоки, соответственно отсортированному вышеупомянутому полю...
Ага, я знаю, что нихрена не понятно, но по-другому написать всё равно нельзя

Короче в итоге вышла структура
For i=0 To Ubound(...)
For j=0 To Ubound(.)
If Instr(...(j), "...") Then
If Right(...(j),Len(...(j))-6) = ...(i) Then
For sk=j To j+20
MasBuff = MasBuff + Chr$(13) + ...(sk)
Next
End If
End If
Next
Next
А весь код занял всего 46 строк.
И чего тут было тупить спрашивается?
Правда говорят - понедельник - день тяжёлый...
Неприличными словами не выражаться? (с) оттуда же