ВСЕ, это последнее что я сделала
автор
s3 = "(SELECT * FROM tb_questions WHERE tb_questions.subject = " & subject & " AND tb_questions.type = " & types & " ORDER BY rnd(tb_questions.number))"
s_high = "SELECT TOP " & num_high & " * FROM " & s3 & " WHERE tb_questions.level=3"
s_easy = "SELECT TOP " & num_easy & " * FROM " & s3 & " WHERE tb_questions.level=1"
s_medium = "SELECT TOP " & num_medium & " * FROM " & s3 & " WHERE tb_questions.level=2"
s = s_easy & " UNION ALL " & s_medium & " UNION ALL " & s_high & " ORDER BY rnd(tb_questions.number)"
CurrentDb.Execute "INSERT INTO tb_temp " & s

ругается, что в ORDER BY я беру поле, которое не выбрано этим запросом.
если закрыть ORDER BY, начинат ругаться на INSERT

если честно,это все было на бонус сделать, у меня уже руки опускаются, видно моих скудных знаний не хватает. Программ-миниму вроде работает ByNumber - отбирает нужное количество вопросов, создает таблицу

автор s = "SELECT TOP " & num & " * FROM tb_questions WHERE tb_questions.subject = 1 ORDER BY rnd(tb_questions.number)"
CurrentDb.Execute "INSERT INTO tb_temp " & s
Me.RecordSource = s

(c)VIG
CurrentDb.Execute "INSERT INTO tb_temp " & s_easy
CurrentDb.Execute "INSERT INTO tb_temp " & s_medium
CurrentDb.Execute "INSERT INTO tb_temp " & s_high
о, точно так работает. Спасибо

все, с ORDER BY я не хочу больше возится, нет времени. Пусть типа так и было задумано, сначало в тесте идут легкие вопросы, потом все более сложные :)

Shuhard

авторP.S.занялся жизнеобеспечением до 18:00
вернусь - посмеюсь
я сейчас кину чем-нибудь тяжелым. Смешно ему. я тут уже вся на нервах, день прошел, а результат :(

а как мне сделать такую вещь - я хочу что бы при распечатке вопросы нумеравались

1
2
3
это как?

авторControlSource = "=1"
RunningSum = True

работает, только надовыбрать OVER ALL
TRUE там нет

вот что еще вспомнила, у нас постояно проблема с MSGBOX в WN2000, ее как то можно преодолеть?

ой, я думала это типа известный баг. Нам препод чуть ли не на первом уроке сказал что с MSGBOX есть проблема именно в 2000, по-моему он пустой выскакивает
он сказал, что не знате как с ней справится и вместо msgbox мы на уроке маленькие формы делаем

последний вопрос на сегодня, если я запуская select с каунтером, то как мне вложить получаемый результат в нужное мне поле в форме

CurrentDb.Execute "SELECT count(*) as ????? FROM td_questions"

я так понимаю где фопросики надо имя поля вставлять или нет?

CurrentDb.Execute "SELECT count(*) AS nuuu FROM tb_questions"
Me.maxEasy.ControlSource = nuuu

вот так что ли? не работает :( говорит что не выполняется моя запрос

CurrentDb.Execute "SELECT count(*) AS nuuu FROM tb_questions"

эта была проба, в дальнейшем там будет условие, я просто хотела посмотреть как это работает.
Я хочу считать сколько вопросов каждого уровня есть.

и вообще я вас обаманула, это был не последний вопрос.
вот есть у меня поле, которая содержит точные имена других полей этой же таблицы(это сивязанное поле right_answer в моей базе в tb_questions ), т.е оно содержит имя поля где лежит правильный ответ на американский тест. Я хотела при распечатке отчета в нужном поле писать в выражение =[[right_answer]], т.е сначало выудить название поля, а потом взять его значения. Ну конечно вы уже догадались, что это не работает :(

DCount("*", "td_questions")
пробую, говорит не находит эту таблицу