Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как изменять заголовки столбцов при перекрестном запросе? / 19 сообщений из 19, страница 1 из 1
01.07.2003, 11:23
    #32195837
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Господа!
Имеется следующая проблема. Есть две таблицы: товары и поступление товаров в магазин. Необходимо вывести отчет о количестве поставленного товара, скажем, за последние пять поставок. (в строках: список товаров, в столбцах: последняя пост., предпосл. пост. и т.д...)
Я создаю перекрестный запрос: в строках идут товары, в столбцах: пять последних дат поставок.
Делаю отчет - все нормально. Но потом, когда в таблицу "поступления товаров" вносятся новые данные, при запуске отчета выдается сообщение типа: " "[10.06.03]" не распознается ядром базы данных...". Все потому, что при перекретстном запросе в заголовках столбцов стоят последние пять дат. А потом, когда вносятся новые записи - происходит такая фигня. В запросе меняются заголовки столбцов.
Подскажите, пож-та, как тут быть?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2003, 11:33
    #32195850
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Можно в отчете на OnOpen менять ControlSource тех контролов, которые привязаны к стролбцам перекрестного запроса.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2003, 11:48
    #32195874
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
А можно подробнее? Я, естес-но, не очень уловил...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2003, 11:51
    #32195879
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
В отчете некоторые контролы сидят на полях перекрестного запроса. У этих полей периодически меняются имена. Соответственно, надо менять ControlSource этих контролов, и делать это можно на OnOpen отчета.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2003, 12:12
    #32195910
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Понятно. Но как это прописать? В свойствах отчета в событии "открытие", как я понял. Это можно сделать с помощью построителя выражений или на VBA надо писать там?
Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.07.2003, 12:21
    #32195932
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
На VBA. Примерно так:

Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset(Me.RecordSource)
Me!Control1.ControlSource = rs.Fields(0).Name
Me!Control2.ControlSource = rs.Fields(1).Name
rs.Close
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.07.2003, 16:15
    #32205905
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
ВС, а можно пояснить, что я должен поставить на место Fields(0).Name и т.д...
Создаю отчет на основе запроса Query1:
Код: plaintext
1.
2.
3.
4.
5.
          Date1     Date2     Date3 ....
Prod1
Prod2         
Prod3
...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.07.2003, 16:29
    #32205937
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
> а можно пояснить, что я должен поставить на место Fields(0).Name и т.д...

Ничего не надо ставить. Должно остаться, как написано. Идея-то в том, чтобы названия полей брались из запроса, где они от раза к разу меняются.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.07.2003, 16:40
    #32205957
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Просто из приведенного кода я не вижу, что данные заголовков столбцов он берет именно из запроса Query1.
Блин... Конец рабочей недели. Голова совсем не варит... Чего я не понимаю?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.07.2003, 16:52
    #32205978
sasha_1
sasha_1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
ну ведь написано
Me.RecordSource

me-это отчет, соответственно из его сурса поля и берутся.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 10:49
    #32206797
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
>На VBA. Примерно так:
>
>Dim rs As DAO.Recordset
>Set rs = CurrentDb.OpenRecordset(Me.RecordSource)
>Me!Control1.ControlSource = rs.Fields(0).Name
>Me!Control2.ControlSource = rs.Fields(1).Name
>rs.Close

ВС!
Выдает ошибку в первой же строке:
"Compile error
User-defined type not defined".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 10:51
    #32206802
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
А библиотека DAO подключена?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 11:14
    #32206840
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Теперь да. :)
Теперь что-то новое: "Приложению Microsoft Access не удается найти поле "Control1", указанное в выражении".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 11:35
    #32206874
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Почтеннейший, я ведь не знаю, как Ваши контролы называются. Control1 - это я просто для примера написал.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 11:55
    #32206910
PaulB
PaulB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Смотрите:
C:\Program Files\Microsoft Office\Office\Samples\Решения.mdb
"Создание сложных отчетов"
"Создание перекрестного отчета с динамическими заголовками столбов"

Кратко поясню: там программно присваиваются переменные источники данных полям, имена которых зафиксированы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 18:02
    #32207556
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
ВС!
Большое спасибо! Все сработало. Просто тормозил...
Есть еще маленький вопросик... В верхнем колонтитуле ставлю поле даты (date1), которое должно, по идее, отображать название столбца-источника (из запроса).
В той же процедуре при открытии пишу:
Me![Date1] = rs.Fields(2).Name
Не работает...
Me![Date1].Value = rs.Fields(2).Name
Тоже не работает... :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2003, 18:05
    #32207559
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Me![Date1].ControlSorce = "=""" & rs.Fields(2).Name & """"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.07.2003, 10:55
    #32207996
Champion
Champion
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
Спасибо огромное, ВС! Что бы я без вас делал. :)
Именно так и сработало... А почему - не пойму. Правой части вообще не понял...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.07.2003, 11:37
    #32208063
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как изменять заголовки столбцов при перекрестном запросе?
По поводу правой части: она создает стринг типа

="Vasya"

Именно так дожен выглядеть ControlSource (знак равенства, а потом выражение), если это не поле.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как изменять заголовки столбцов при перекрестном запросе? / 19 сообщений из 19, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 391ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1680536]:
 0ms
get settings:
 11ms
get forum list:
 20ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 32ms
get topic data:
 14ms
get forum data:
 4ms
get page messages:
 69ms
get tp. blocked users:
 2ms
others: 231ms
total:  391ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]