|
|
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
:^) Ура! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:08 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
...Не ура. Секундочку... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:08 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
А как, кстати, пополнить данный запрос Union'ом? Куда его? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:10 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Dim f As Field For Each f In CurrentDb.QueryDefs(...) ...ControlSource = "=[" & f.Name & "]" Next ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:10 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
То, что я сейчас написал, позволит задать ControlSource только тем контролам, для которых есть поля. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:11 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
А что подставить на место * при таком раскладе? --- Dim f As Field For Each f In CurrentDb.QueryDefs("запрос") *.ControlSource = "=[" & f.Name & "]" Next End Sub --- Что не соображу сходу... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:19 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Сделал так (при условии, что все поля в отчете названы так, как должны получаться в запросе): Dim f As Field For Each f In CurrentDb.QueryDefs("запрос") Me(f.Name).ControlSource = "=[" & f.Name & "]" Next Но... вылетает ошибка выполнения 3251 (операция не поддерживается для объектов данного типа) - на строчке For... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:22 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
For Each f In CurrentDb.QueryDefs("запрос").Fields - моя ошибка. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:25 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Открылся без ошибки, но... ВСЕ поля ([1 (Пн)] и т.п.) пусты! Правда, другие при этом (Фамилии...) отображаются нормально... Эх... Может действительно подумать мне о дополнении недостающими в запросе... Но как? P.S.: сам запрос при этом показывает все правильно... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:33 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Нет, и другие (ВСЕ) поля пустые... Я просто забыл снять с Фамилий установленный ранее Сурс...:) Проблемка не решилась... Уж извините, что замучал, наверное... :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:39 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Все-таки интересно посмотреть, какой ControlSource получается при его задании в конструкторе. См. мой пост от 13:03. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:39 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Дык Сурсы тех полей, кот. есть в выборке, нормальны, а на строке присвоения полям несуществующих сурсов Access выдает ошибку и не открывает дальше :(. Debug-то ставится после следующего присвоения... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:43 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
И это происходит даже при On error resume next... Ошибка-то не понятная - ругается на невозможность найти поле, а название его и есть название самого запроса... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:45 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
> а на строке присвоения полям несуществующих сурсов Access выдает ошибку и не открывает дальше 1. А как же Resume Next? 2. А как же мой For Each, который проходит только по существующим? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:46 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
> а название его и есть название самого запроса... WHAT??? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:47 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Можно переименовать контролы - дать им, скажем, какой-нибудь одинаковый префикс. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:48 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Дык Владимир, по Вашей формуле надо чтобы имена контролов в отчете должны совпадать с полями выборки... А ошибка действительно не понятная... Кстати ваша конструкция ошибок не выдает, но поля при этом все пустые... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 13:54 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
все таки добейте сурсы. Оно менее геморно. :) _ А юнион... - заведите себе опорную табличку из одного числового поля и (скажем) 10 значений [0-9]. (Для прочих целей, т.е. вывода больше чем 10 записей - можете создать запросы - прямые произведения таблички на себя). /это связано с тем, что в акс. требуется писать в select ... _FROM_ ... /Обзовите ее, скажем MSysN, поле N. Тогда, к примеру: Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. где Q - отобранный набор данных для свертки, и даст вам требуемый "полный" набор данных _для свертки_. Вот и все. Этой же таблой MSysN можете пользоваться в right/left join-ах, для выборки заданного наперед количества записей, даже если реально этих записей нет (т.е. выводить требуемое кол-во пустышек). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:06 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
И ко мне лучше на ты. Я ведь один человек, а не два. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:12 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
>>И это происходит даже при On error resume next... А какой у Вас режим останова /по ошибкам/? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:13 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
>>#01/01/2003# & ms.N as date, тьфу, патарапилси #01/01/2003# + ms.N as date, ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:15 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
>> А какой у Вас режим останова /по ошибкам/? - это где/как? извиняюсь... А вот по поводу UNION'а... Все-таки не до конца понял со временной табличкой - как, на примере моего запроса: --- PARAMETERS [forms]![alltime_master]![Подразделение] Text, [forms]![alltime_master]![godvar] Long, [forms]![alltime_master]![Месяц] Byte, [forms]![alltime_master]![Неделя] Byte; TRANSFORM nz(Sum(roundmy([vremya]/3600,2)),0) AS [Значение] SELECT [Фамилия] & " " & [Имя] & " " & [Отчество] AS Сотрудник, Staff.Подразделение, Staff.ТабельныйНомер, AllTime.god, AllTime.mesyac, roundmy(Sum([vremya])/3600,2) AS [Итого за неделю] FROM (AllTime INNER JOIN Staff ON AllTime.karta = Staff.НомерКарты) INNER JOIN Календарь ON AllTime.data = Календарь.Дата WHERE (((Staff.Подразделение)=[forms]![alltime_master]![Подразделение]) AND ((AllTime.god)=[forms]![alltime_master]![godvar]) AND ((AllTime.mesyac)=[forms]![alltime_master]![Месяц]) AND ((Календарь.Неделя)=[forms]![alltime_master]![Неделя])) GROUP BY [Фамилия] & " " & [Имя] & " " & [Отчество], Staff.Подразделение, Staff.ТабельныйНомер, AllTime.god, AllTime.mesyac PIVOT Choose(Weekday([data],2),'(Пн)','(Вт)','(Ср)','(Чт)','(Пт)','(Сб)','(Вс)'); --- Куда надо вставить предложенный текст? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:20 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
>>Me(f.Name).ControlSource = "=[" & f.Name & "]" В кач-ве брела: А не случится ли [[1 (Пн)]] ? - тогда - error - И пустышка в источниках. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:21 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
>>>> А какой у Вас режим останова /по ошибкам/? - это где/как? извиняюсь меню Параметры вкладка Другие группа "перехват ошибок: останов" (Акс 97) куда вставить: - "поручик Ржевский, молчать!" - если вы создали кросс таб, то переписать ему источник не составит труда. Главное - идея: Дополнить ваш набор записей 7-ю (или более) пустышками посредством юнион. А [[ ]] - скорее всего. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:30 |
|
||
|
В дополнение к вопросу по запуску отчета, основанного на запросе с параметрами..
|
|||
|---|---|---|---|
|
#18+
Если не в лом, то вот ссылочка на папочку - в ней 3 файла. Может, прояснит что-то...: ftp://temp:ftpin@ftp.agmedia.ru:21 (Только смотреть файлы там надо не Эксплорером, а любым ftp-клиентом...) Очень прошу помочь! Борис ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.09.2003, 14:42 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32267751&tid=1679405]: |
0ms |
get settings: |
12ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
41ms |
get topic data: |
10ms |
get forum data: |
3ms |
get page messages: |
77ms |
get tp. blocked users: |
2ms |
| others: | 234ms |
| total: | 401ms |

| 0 / 0 |
