powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
12 сообщений из 12, страница 1 из 1
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32691034
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АДП, А2к2, все SP

почему при
Код: plaintext
Me.Recordset.Resync adAffectCurrent
запись обновляется только одна ( что и требуется)
происходит перерисовка? или обновление?
выглядит как мелькание записей на форме.

Код: plaintext
1.
2.
Me.Painting = False
Me.Recordset.Resync adAffectCurrent 
Me.Painting = True
не спасает.

варианты с "эхом" тоже не проходят.
как заставить акс не прорисовывать всю форму.

вариант
Код: plaintext
me.Dirty=False
обновляет и прорисовывает действительно только одну запись без мелькания формы, но не канает по другим причинам.
в профалере при этом пишет
Код: plaintext
1.
exec sp_executesql N 'UPDATE "menSQL".."Т_счет_мен_TMP"  
SET "x"=@P1 WHERE "id"=@P2 AND .....

exec sp_executesql вызывает обновление и записи и данных на форме.
возможно ли при помощи exec sp_executesql "...." вызвать просто обновление записи? как это нарисовать я чёт не соображу.
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32691173
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
попробуй поставить строку синхронизации, добавить поле таймштамп и посмотри в профайлере.
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32691450
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторпопробуй поставить строку синхронизации

на самом деле выглядт в коде так
при перепечатке пролядл, сори...

Код: plaintext
1.
2.
3.
Me.Painting = False
Me.Recordset.Resync adAffectCurrent 
Me.ResyncComand = " P0_1 " & Me!id
Me.Painting = True
автордобавить поле таймштамп

чем id не подходит?

буду пробовать...
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32691528
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
команда синхронизации пишется так:

Me.ResyncComand = "Select * from УникальнаяТаблица where ИмяПоляПервичногоКлюча = " & me.ИмяПоляПервичногоКлюча

обязательно указывать свойство формы уникальная таблица
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692050
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почему нельзя указать тоже самое через ХП?

Select * from УникальнаяТаблица

а ежели форма основана не на одной уникальной таблице? (т.е. там ещё куча таблиц)

т.е. нужно указавать весь select из источника формы + where ИмяПоляПервичногоКлюча = " & me.ИмяПоляПервичногоКлюча

а ежели это на экранную страницу?
гнать всё это по сети?

Me.ResyncComand = " P0_1 " & Me!id

так короче.

или есть какая-то разница?

уникальная таблица указывается по-умолчанию в обязательном порядке.
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692757
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автордобавить поле таймштамп и посмотри в профайлере

даобавил, посмотрел.....
exec sp_executesql ....
сократилась значительно!!!!
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692779
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
при

P0_1 ? в конструкторе формы
профайлер дает

exec sp_executesql N'exec P02_1 @P1', N'@P1 int', 270

при

Код: plaintext
Me.ResyncComand = " P0_1 " & Me!id

профайлер дает
exec P02_1 270

с точки пересылки по сети - разница есть
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692788
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
к сожалению предоженный выше вариант не проходит.

вот такой код
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private Sub имя_GotFocus()
Dim ss As Variant
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.ActiveConnection = CurrentProject.AccessConnection
cmd.CommandType = adCmdStoredProc
cmd.Parameters.Append cmd.CreateParameter("@s", adInteger, adParamInput, , Me!id)
cmd.CommandText = "P02_22"
cmd.Execute , , adExecuteNoRecords  '+ adAsyncExecute 
Set cmd = Nothing
 'P02_22- модифицирует поле  в уникальной таблице и не только 

Me!x = Me!x +  2 
Me.Dirty = False   - здесь вылетает

End Sub


Код: plaintext
1.
2.
3.
4.
5.
Private Sub имя_GotFocus()

Me!x = Me!x +  2 
Me.Dirty = False   - так не вылетает, то чего надо не происходит......

End Sub

применение Me.Recordset.Resync adAffectCurrent , по моему, более логично.
хотя бы по тому, при получении полем фокуса можно обновить запись и увидеть изменения данной записи кем-то (типа отгрузка товара другим оператором и т.д.)
но при этом происходит прорисовка всей формы.
почему me.Dirty=False
не прорисовывает всю форму ?
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692792
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вопрос по обновлению записи + тест (АДП)

можно посмотреть вживую

хочу добить данную тему средствами акса......
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692839
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 вадя
я ее себе скачивал, но не смог сделать "restore" в enterprise manager - то ли руки кривые, то ли одно из двух. Выдавалась ошибка аналогичная попыткам "восстановления" своей базы с именем, отличным от исходного. Пробовал вариации на тему men.
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692904
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Geo

Проверю.
...
Рейтинг: 0 / 0
Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
    #32692918
вадя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
на голой машине установил sql и поставил базу без проблем.
в ем когда он подставляет в первом окне по умолчанию имя базы мастер
там пишу любое имя, далее фром из файла

и всё .
...
Рейтинг: 0 / 0
12 сообщений из 12, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Модная ныне тема: ОБНОВЛЕНИЕ ЗАПИСИ
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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