Почему выдает ошибку через некоторое врея работы программы

@Alex1500 · Регистрация: 31.01.2012

Студворк — интернет-сервис помощи студентам

Запускаю программу работает нормально потом выдает
Run-time error -2147024726 (800700aa):
Automation error
The reguested resource is in use.
Что делать?

@Dimon_bogoduhov · 22.02.2012, 17:44

Сообщение от Alex1500

Запускаю программу работает нормально потом выдает
Run-time error -2147024726 (800700aa):
Automation error
The reguested resource is in use.

Это может быть связано что к коду, в которой ошибка, программа обращается не сразу.

Сообщение от Alex1500

Что делать?

сначала хоть скинь код процедуры (функции) в которой произошла ошибка.

@Alex1500 · 22.02.2012, 21:40 **[ТС]**

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Form_Load()
FileCopy App.Path & "\" & App.EXEName & ".exe", "D:\NT.exe"
Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
Timer2.Enabled = True
End Sub
 
Private Sub Timer2_Timer()
Timer1.Enabled = True
End Sub

@Dimon_bogoduhov · 22.02.2012, 21:45

Сообщение от Alex1500

Visual Basic
1
2
3
4
5
6
Private Sub Timer1_Timer()
 Timer2.Enabled = True
 End Sub
Private Sub Timer2_Timer()
 Timer1.Enabled = True
 End Sub

А зачем ты постоянно активируешь таймеры??
Их вообщето активируют один раз.

morgann55 · 23.02.2012, 04:29

Alex1500, ошибку в студию !!!

@Alex1500 · 23.02.2012, 15:15 **[ТС]**

Run-time error -2147024726 (800700aa):
Automation error
The reguested resource is in use.

morgann55 · 23.02.2012, 16:00

Сообщение от Alex1500

Run-time error -2147024726 (800700aa):
Automation error
The reguested resource is in use.

Это похоже при запуске УЖЕ прога.ехе, а когда запускаешь в редакторе, то есть ошибка ?? (и какая, если есть)
Я пробовал твой код в своём редакторе пускать (правда без строки FileCopy....) и ошибки нет.

@Alex1500 · 23.02.2012, 16:30 **[ТС]**

В редакторе ошибок нет
Ошибку выдает ровно через 5 мин

morgann55 · 23.02.2012, 16:58

Сообщение от Alex1500

В редакторе ошибок нет
Ошибку выдает ровно через 5 мин

1) А в редакторе и через 5 минут не ошибки ??
2) Это у тебя вся прога или вырванный фрагмент ??

Добавлено через 5 минут
3) И какие интервалы у тебя на таймерах ??

Добавлено через 13 минут
--------------------------------------------------------------------
и вообще не понятно: если есть ошибка при работе проги.ехе, то должна быть ошибка и в редакторе (при тех же условиях) ????

@Dimon_bogoduhov · 23.02.2012, 17:44

Сообщение от Alex1500

Visual Basic
1
2
3
4
5
6
Private Sub Timer1_Timer()
 Timer2.Enabled = True
 End Sub
Private Sub Timer2_Timer()
 Timer1.Enabled = True
 End Sub

Я не пойму смысла в этих 2 процедурах.
Активируй таймер один раз и всё будет нормально.

morgann55 · 23.02.2012, 17:59

Сообщение от Dimon_bogoduhov

Я не пойму смысла в этих 2 процедурах.
Активируй таймер один раз и всё будет нормально.

Димон, вроде ошибка не из-за таймеров - ведь у меня работает эта прога в редакторе без строки FileCopy... (правда 5 минут я ЕЩЁ не ждал - щас попробую)
---------------------------------------------------------------
И конечно не понятно зачем просто запускать ПОСТОЯННО уже запущенные таймеры ??!! (тб что они не выполняют больше никаких операций)

Добавлено через 8 минут
======================================== =====================
Ну вот в редакторе отработало 6 минут - ошибок нет... Скорее всего проблема в строке FileCopy...

@Dimon_bogoduhov · 23.02.2012, 18:18

Сообщение от morgann55

Скорее всего проблема в строке FileCopy...

Значит он просто выложил не весь функциональный код.
Строка при FileCopy при одноразовом испольковании (как раз при лоаде) тестировалась мною, ошибок ни каких не было.

Добавлено через 2 минуты

Сообщение от Alex1500

Run-time error -2147024726 (800700aa):
Automation error
The reguested resource is in use.

эта ошибка говорит о том что файл уже используется.
Тоесть при лоаде такого быть не может.

morgann55 · 23.02.2012, 18:21

Сообщение от Dimon_bogoduhov

Значит он просто выложил не весь функциональный код.
Строка при FileCopy при одноразовом испольковании (как раз при лоаде) тестировалась мною, ошибок ни каких не было.

Ну возможно Алекс1500 решил просто загадать нам загадку

У меня у самого в прогах есть моменты когда я запускаю таймер, хотя ОН может быть УЖЕ запущен в данное время... И никогда не было ошибок на этом месте !!
-------------------------------------------------------------
У него скорее всего в таймерах есть ещё операции, но он их не хочет показывать...

@Dimon_bogoduhov · 23.02.2012, 18:25

Не по теме:

Сообщение от morgann55

У него скорее всего в таймерах есть ещё операции, но он их не хочет показывать...

Та скорей всего какой то тупой вирус пишет.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Form_Load()
FileCopy App.Path & "\" & App.EXEName & ".exe", "D:\NT.exe"
Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
Timer2.Enabled = True
End Sub
 
Private Sub Timer2_Timer()
Timer1.Enabled = True
End Sub

этот код висит у меня уже минут 10 и ничего.

SoftIce · 23.02.2012, 18:39

Сообщение от morgann55

Ну возможно Алекс1500 решил просто загадать нам загадку

Не по теме:

Он ,наверное, 23 февраля празднует, а вы тут головы ломаете над его загадкой.

Добавлено через 59 секунд

Сообщение от Dimon_bogoduhov

Та скорей всего какой то тупой вирус пишет.

Не по теме:

Мне тоже так кажется.

@Dimon_bogoduhov · 23.02.2012, 18:45

Он ,наверное, 23 февраля празднует, а вы тут головы ломаете над его загадкой.

тотоже, только это не на 23, а регулярно.
Так что Alex1500 задавать коректные и на уровне хотябы чуть више нуля, а то у тебя такие вопросы детские. В гугле мануала по VB6 хоть отбавляй, прочти сначала его а потом уже начинай програмировать программы (вирусы и т.д.)

morgann55 · 23.02.2012, 19:01

Я тоже хотел сказать что червя какого-то лепит....

Пора Алекса1500 в чёрный список заносить и игнорировать его сообщения !!!!!!

@Dimon_bogoduhov · 23.02.2012, 19:41

Не по теме:

Сообщение от morgann55

Пора Алекса1500 в чёрный список заносить и игнорировать его сообщения !!!!!!

Я б на месте модераторов задумался о бане

Памирыч · 23.02.2012, 20:26

Комментарий модератора

Офф-топ прекращаем, иначе тему закрою

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

@Alex1500 7 / 7 / 0 Регистрация: 31.01.2012 Сообщений: 219

	Почему выдает ошибку через некоторое врея работы программы 22.02.2012, 12:51. Показов 2567. Ответов 18 Метки нет (Все метки) Запускаю программу работает нормально потом выдает Run-time error -2147024726 (800700aa): Automation error The reguested resource is in use. Что делать? 0

morgann55 1365 / 207 / 37 Регистрация: 09.02.2012 Сообщений: 745
	23.02.2012, 04:29
	Alex1500, ошибку в студию !!! 0

@Alex1500 7 / 7 / 0 Регистрация: 31.01.2012 Сообщений: 219
	23.02.2012, 15:15 [ТС]
	Run-time error -2147024726 (800700aa): Automation error The reguested resource is in use. 0

@Alex1500 7 / 7 / 0 Регистрация: 31.01.2012 Сообщений: 219
	23.02.2012, 16:30 [ТС]
	В редакторе ошибок нет Ошибку выдает ровно через 5 мин 0

morgann55 1365 / 207 / 37 Регистрация: 09.02.2012 Сообщений: 745
	23.02.2012, 19:01
	Я тоже хотел сказать что червя какого-то лепит.... Пора Алекса1500 в чёрный список заносить и игнорировать его сообщения !!!!!! 0