Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как получить доступ к ТАБЛИЦЕ....... / 9 сообщений из 9, страница 1 из 1
03.07.2003, 16:19
    #32198712
Slava A. Odievich
Slava A. Odievich
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
..... которая не связана с открытой ФОРМОЙ.

То есть как ее продекларировать в VBA Subr, чтобы можно было выбрать и изменить в ней некое ПОЛЕ, критерий выбора которого определяется в Форме.

Включить эту ТАБЛИЦУ в ЗАПРОС, являющийся источником ЗАПИСЕЙ для ФОРМЫ не удается.

Злокозненная ТАБЛИЦА используется для накопления и хранения набора Счетчиков, и никак не связывается с остальными данными.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 16:22
    #32198724
Hummer
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Смотреть
Alter Table, TableDef, recordset.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 16:40
    #32198765
Nick987
Nick987
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Никак не декларировать
currentdb.execute "UPDATE [ТАБЛИЦА] SET ПОЛЕ = " & me![поле] & " WHERE ПОЛЕ2 = 2"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 17:17
    #32198829
Slava A. Odievich
Slava A. Odievich
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Сделал такой Код:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
       s1 =  "SELECT Inv_Count.InvCount FROM [Inv_Count] " 
       s2 =  "WHERE [MonthYear]= "  & mm_yyyy &  ";" 
              
       Set rst = CurrentDb.OpenRecordset(s1 & s2)
                      
       With rst
                .Requery
       End With
       
       nn = InvCount


Поле InvCount возвращается NULL, хотя тот же Запрос из Таблицы возвращает нужное значение.

Причем VBA не протестует. Означает ли это что нужная Таблица открыта правильно?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 17:46
    #32198908
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Set rst = CurrentDb.OpenRecordset(s1 & s2)
nn = rst. InvCount
rst.Close

И кроме того неплохо бы проверить, что mm_yyyy действительно содержит то, что надо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 18:49
    #32198985
Slava A. Odievich
Slava A. Odievich
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Спасибо!

Только сработало тогда, когда я присвоил

nn = rst![InvCount]

Теперь, если можно, помогите отправить новое значение InvCount назад в Таблицу.

Я не в ладах с синтаксисом .Edit
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2003, 20:10
    #32199033
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Set rst = CurrentDb.OpenRecordset(s1 & s2)
If Not rst.BOF Then
rst.Edit
rst.InvCount = nn
rst.Update
End If
rst.Close
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.07.2003, 09:29
    #32199248
Hummer
Hummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
2 Владимир Саныч
rst . InvCount работать не будет. Обращение к полям рекордсета либо через ! либо rst("имя поля").
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.07.2003, 13:19
    #32199604
Slava A. Odievich
Slava A. Odievich
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как получить доступ к ТАБЛИЦЕ.......
Спасибо всем за помощь :-)

Все заработало.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как получить доступ к ТАБЛИЦЕ....... / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 359ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1680726]:
 0ms
get settings:
 11ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 38ms
get topic data:
 13ms
get forum data:
 4ms
get page messages:
 59ms
get tp. blocked users:
 2ms
others: 210ms
total:  359ms
x
x
Закрыть


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