Имитация недопустимой ошибки в Word на событие.

За вознаграждение или нахаляву (если повезёт)

Модераторы: Хыиуду, MOTOCoder, Medved, dr.Jekill

Ответить
Asis
Сообщения: 1
Зарегистрирован: 24 май 2004, 20:17

24 май 2004, 20:27

Помогите, плиз. Нам необходимо провести эксперимент по психологии агрессии. Для этого необходимо сымитировать сбой в работе Word на сотое нажатие клавиши <пробел>.

Предположим, есть Word'овский документ (Word 97), например avtoportret.doc
Необходимо присоединить к нему макрос, который:
1) Начиная с открытия этого файла, по ходу набора в нем некоторого текста считает количество нажатий на клавишу <пробел> (сами пробелы, естественно, в тексте появляются);
2) При достижении некоторого количества нажатий пробелов, допустим 100, макрос, имитируя сбой в Word, выдает диалоговое окно с сообщением "Программа выполнила недопустимую операцию, и будет закрыта" и кнопками <закрыть> (активная) и <сведения> (неактивная), с появлением этого диалогового окна работать в документе, набирать текст уже нельзя;
3) При нажатии на кнопку <закрыть> Word закрывается, а результаты всей работы в документе не сохраняются (желательно, но не обязательно, чтобы набранный текст сохранялся в др. файле, например, avtoportret.rtf).

Огромная просьба, помогите кто может, напишите текст макроса полностью, так как я в макросах и VBA совсем не разбираюсь.

Заранее благодарю, Алексей!
Аватара пользователя
Naeel Maqsudov
Сообщения: 2551
Зарегистрирован: 20 фев 2004, 19:17
Откуда: Moscow, Russia
Контактная информация:

28 май 2004, 01:22

Увы, нельзя.
Можно только так. Раз в N+delta секунд происходит имитация ошибки и имитация падения Word.
Текущий документ сохраняется в другую папку, а исходный остается без изменений.

А какая реакция системы пранируется на случай коглда "умный" тестируемый сам нажмет кнопку "Сохранить" до имитации сбоя?
Ответить