MPoil
Дата: 09.06.2004 09:51:10
У меня примерно такой код:
...
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"
У меня после того,как открывается форма-выполняется определённая операция,как сделать так,чтобы когда удаляется таблица-не писалось,что она используется другим процессом.Т.е. она как-бы не успевает закрыться
Rivkin Dmitry
Дата: 09.06.2004 09:59:39
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