|
|
|
как сделать правильно?
|
|||
|---|---|---|---|
|
#18+
У меня примерно такой код: ... Set rs1 = CurrentDb.OpenRecordset("Data_budget_diff") If rs1.RecordCount = 0 Then MsgBox "ччч" rs1.Close Else DoCmd.OpenForm "Data_budget_diff1", , , , , acDialog rs1.Close End If 'как тут сделать команду типа WAIT DoCmd.DeleteObject acTable, "Budget_D" DoCmd.CopyObject , "Budget_D", acTable, "Budget_D1" DoCmd.DeleteObject acTable, "Budget_D1" У меня после того,как открывается форма-выполняется определённая операция,как сделать так,чтобы когда удаляется таблица-не писалось,что она используется другим процессом.Т.е. она как-бы не успевает закрыться ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.06.2004, 09:51:10 |
|
||
|
как сделать правильно?
|
|||
|---|---|---|---|
|
#18+
поставил doevents и всё заработало ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.06.2004, 09:55:51 |
|
||
|
как сделать правильно?
|
|||
|---|---|---|---|
|
#18+
WAIT начинается сразу за DoCmd.OpenForm "Data_budget_diff1", , , , , acDialog т.к управление передается на форму Data_budget_diff1 и пока она не закроется, процедура продолжена не будет, т.е. весь этот код: rs1.Close End If 'как тут сделать команду типа WAIT DoCmd.DeleteObject acTable, "Budget_D" DoCmd.CopyObject , "Budget_D", acTable, "Budget_D1" DoCmd.DeleteObject acTable, "Budget_D1" не исполняется! Его нужно делать на загрузке формы Data_budget_diff1 А вообще - это плохой тон в Акцесе удалять и по новой создавать таблицы. Пользуйся запросами, это солиднее :) и надежнее. Частое удаление и создание таблиц засоряет mdb ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.06.2004, 09:59:39 |
|
||
|
|
start [/forum/topic.php?fid=45&gotonew=1&tid=1673992]: |
0ms |
get settings: |
8ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
178ms |
get topic data: |
7ms |
get first new msg: |
4ms |
get forum data: |
2ms |
get page messages: |
27ms |
get tp. blocked users: |
1ms |
| others: | 241ms |
| total: | 486ms |
| 0 / 0 |
