Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Вниз

Знатокам SQL 


Turalyon   (2001-12-17 10:12) [0]

Привет всем.
Есть задача - необходимо чтобы в результате запроса записи были в случайном порядке (типа экзамен). Есть ли какой нить способ сделать их случайными прямо в запросе?
Я придумал способ как это сделать "в ручную" создаю структуру, в которй храню ключи от результата SQL запроса, потом их "перемешиваю" и выдаю по одному... но это как мне кажется через з..цу может есть способ попроще???



Alexandr   (2001-12-17 10:26) [1]

на SQL видимо никак
только на клиенте ручками.
и в слечае парадокса это нормально.



gek   (2001-12-17 10:30) [2]

Я делал так сначала генерил числа случайные ну а потом запрос делал типа

SetCif:set of 1..255;
SetCif:=[];
k:word;
CountProhod:word;
CountProhod:=0;
repeat
k:=random(200);
if(not (k in SetCif))and(k <> 0) then
begin
SetCif:=SetCif +[k];
inc(CountProhod);
end;
until CountProhod = 10;//кол-во вопросов

select * from mytable where id in SetCif все нормально работает



Turalyon   (2001-12-17 10:41) [3]

2gek
А разве в результате выполнения запроса оно не выберет все по порядку следования в физичексой таблице? Мне просто не совсем понятно как работает оператор in. То есть я понимаю как он работает, только не понятно, в каком порядке он будет выбирать записи из списка SetCif.



gek   (2001-12-17 10:54) [4]

Когда я все это дело делал у меня такой вопрос не стоял. Честно говоря
не могу просветить. Для меня было главное получить случайные записи.
Но вот че на ум приходит - можно таким же образом отфильтровать таблицу не прибегая к SQL запросу.
Да если тебе надо как то упорядочить записи используй ORDER BY для SQL
ну и индексы для обычной таблицы



Turalyon   (2001-12-17 11:08) [5]

Мне наоборот не надо их упорядочивать, а перемешать надо :)
Я попробовал сейчас в SQLExplorer -е все работает, причем в результате запроса выдается сначала та запись, которая стоит первая в списке, потом след. и т.д. так что если они рандомные, то все ок. СПАСИБО БОЛЬШОЕ!!!!




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.029 c
3-52453           МаксБ                 2001-12-13 15:19  2002.01.17  
Проблема с датой


4-52681           Anderius              2001-11-17 21:24  2002.01.17  
Как насильно завершить другую программу?


14-52662          Dima-k17              2001-11-23 09:56  2002.01.17  
(1)Windows XP + (2)Delphi 5


3-52474           Котелок               2001-12-10 07:47  2002.01.17  
Так всё таки, можно как нибудь победить DBGrid?


1-52567           dnd                   2001-12-28 11:46  2002.01.17  
Подскажите пожалуйста как можно открыть файл *.r32