Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите чайнику / 15 сообщений из 15, страница 1 из 1
24.06.2003, 17:45
    #32190531
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Хочу организовать переход на запись..
Делаю поле со списком.. Пользователь выбирает значение из списка - и на запись с этим значенеим делается переход..
Пишу в "ПослеОбновления" команду перехода (макрос "НайтиЗапись"), передавая ей в качестве образца значение моего поля со списком..
В результате старое значение поля затирается выбранным, но переход делается..

Что я делаю не так?
...
Рейтинг: 0 / 0
24.06.2003, 17:50
    #32190547
amel
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Список перенеси в 'Заголовок/Примечание' формы, а не в 'области данных' и все будет ок! (выдели область данных в конструкторе->щелкни правой кнопкой мыши и и выбери из меню 'Заголовок/Примечание')
...
Рейтинг: 0 / 0
24.06.2003, 18:02
    #32190561
user123
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
и не забудь отвязать комбобокс от поля в базе(поле данные оставь пустым)
...
Рейтинг: 0 / 0
24.06.2003, 18:25
    #32190593
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Не получается.. :(
Я перенес список в "примечания формы", однако это приводит только к тому, что текущее поле затирается - как если бы список был в "данных" формы..

Если убрать из "данных" этого поля ссылку на поле, по которому собирается список, т.е. сделать "данные" пустыми, то возникает ошибка:

Сбой макроса, связанного с одним из свойств текущего поля, из-за ... blah-blah.. :(
...
Рейтинг: 0 / 0
24.06.2003, 21:50
    #32190696
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Поле лучше перенести в заголовок или примечание (если они есть, и если это ленточная форма - иначе не нужно). "Данные" поля надо оставить пустым.
Потом на событие "после обновления" напиши такую процедуру (макросы - это баловство:):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private function ССС_AfterUpdate()
  dim rs as recordset
  
  set rs = me.recordsetclone
  rs.findfirst  "FFF="  & me.ССС 
  me.bookmark=rs.bookmark
End Function

,где FFF - имя поля данных, а CCC - имя контрола, по значению которого хочешь искать. В твоем случае, должно работать.
Только если ищешь строку, напиши
Код: plaintext
1.
rs.FindFirst  "FFF="  "" & me.CCC & "  """ 

Кстати, я во всех строковых полях, по которым предполагаются сложные обработки или такие вот поиски, от греха в структуре таблицы ставлю условие на значение
not like "*""*"
или
not like "*'*"
(кому какие кавычки нравятся)
...
Рейтинг: 0 / 0
25.06.2003, 14:45
    #32191302
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Это все, конечно, мило, но почему-то саксесс сообщает мне, что у объекта rs нет метода или свойства ' findfirst '.. При раскрыти свойств и методов rs , я нахожу там только метод ' find '..

Когда я заменил ' findfirst ' на ' find ', то возникла ошибка "несовпадения типов" в строке, где присваивается
Код: plaintext
Set rs = Me.RecordsetClone


Что на сей раз не так? :(
...
Рейтинг: 0 / 0
25.06.2003, 14:48
    #32191307
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
а у пресловутого DAO-шмао в ссылках стоит галочка?
...
Рейтинг: 0 / 0
25.06.2003, 14:51
    #32191309
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
DAO - это китайский мудрец?
...
Рейтинг: 0 / 0
25.06.2003, 14:58
    #32191316
Geo
Geo
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
он. Живет (у русифицированных аксессов) в первом пункте меню сервис, если смотреть из окна модуля.
...
Рейтинг: 0 / 0
25.06.2003, 15:34
    #32191391
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Нашел в огромном количестве чек-боксов тот, в котором было написано "MS DAO 3.6 Objects Library" - при исполнении возникает ошибка типов, как и прежде.. :( (RTE 13)
...
Рейтинг: 0 / 0
25.06.2003, 15:40
    #32191395
Лифчик
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Совет кофейника:-)
Может быть, после подключения библиотеки DAO (галочка) перекомпилировать прогу? Или макросы не компилируются?
...
Рейтинг: 0 / 0
30.06.2003, 14:12
    #32195047
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
:(

К сожалению, я так и не нашел, что такое DAO, и программка так и не заработала.. По-прежнему type error.. :(

:(
...
Рейтинг: 0 / 0
30.06.2003, 14:21
    #32195054
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Открой папку C:\Program Files\Common Files\Microsoft Shared\DAO
если там есть файл dao360.dll, то попробуй его зарегить вручную, скопировав в туже папку файлик regsvr32.exe (найди через поиск) и сделай
regsvr32.exe dao360.dll. Перезгрузись
В referefnces должно появиться заветное словосочетание Mocrosoft DAO 3.6 jbject library.
Если файла нет просто переустанови (восстанови) офис.
...
Рейтинг: 0 / 0
30.06.2003, 14:30
    #32195070
Sergey Ermakov
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Все отлично - оказывается, MS DAO 3.6 Objects Library уже было помечено флажком.. Т.е. все должно было работать.. :(

Вот программулька:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub Ïîëå28_AfterUpdate()
  
  Dim rs As Recordset

  Set rs = Me.RecordsetClone
  rs.Find  "ÍàçâàíèåÈçäàíèÿ="  & Me.Ïîëå 28 
  Me.Bookmark = rs.Bookmark
End Sub

Ошика по-прежнему в строке "Set rs = Me.RecordsetClone".. :(
...
Рейтинг: 0 / 0
30.06.2003, 14:42
    #32195097
Senin Viktor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите чайнику
Идни и те же грабли :(

Делай Dim rs As DAO.Recordset

у тебя скорей всего и ADODB подключено? Да еще и находиться выше DAO? А так как и у ADODB есть Recordset и у дао, и ADODB находиться "выше" дао, то при контсрукции Dim rs As Recordset фактически используется Dim rs As ADODB.Recordset.
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Помогите чайнику / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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