Оключение оповещения об ошибке

[sayman]

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

но при этом выскакивает сообщение об ошибки и программа завершается.

Сабж как отключить оповещение об ошибке?

 

[kaster]

sayman [?]

работе

чьей/какой?

не критическая ошибка

как узнал что ошибка не критическая?

невозможно выполнить действие для этого оьбекта

код в студию

но при этом выскакивает сообщение об ошибки

какой ошибке?

программа завершается.

стало быть ошибка все же критическая

Сабж как отключить оповещение об ошибке?

такого рода ошибки отключаются исключительно правильным написанием кода.

 

[sayman]

Func lotereya($work,$user,$queshon) 
			$my_url = "http://"
			$my_params = ""
					
            $oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
            $oHTTP.Open("POST", $my_url)
            $oHTTP.SetRequestHeader("Content-Type","application/x-www-form-urlencoded")
            $oHTTP.Send($my_params)
            $oHTTP.WaitForResponse
            $Response = $oHTTP.ResponseText
			Return $Response			
EndFunc

ошибка возникает тут раз в 1000-5000 запросов причём возникает случайно. то есть один и тот же запрос может прогнать кучу раз а может при первой попытке вывалить


И да пока висит окно с ошибкой программа продолжает работать если нажать там ок закрывается

 

[kaster]

sayman
скорее всего не создается объект

$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")

попробуй после каждого создания поставить проверку, в цикле. то есть если создался то идешь дальше

Do
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
Until IsObj($oHTTP)

 

[sayman]

sayman
скорее всего не создается объект

$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")

попробуй после каждого создания поставить проверку, в цикле. то есть если создался то идешь дальше

Do
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
Until IsObj($oHTTP)

не помогло теперь ошибка выскакивает здесь

$oHTTP.Send($my_params)
$oHTTP.Send($my_params)^ ERROR

 

[r35p3ct]

Добавь в код:

$oIEErrorHandler = ObjEvent("AutoIt.Error","ComErrFunc")
Func ComErrFunc()
    If IsObj($oIEErrorHandler) Then
		$HexNumber = Hex($oIEErrorHandler.number, 8)
		if $HexNumber=00000000 then Return 0
		SetError($HexNumber)
		Return 1
    EndIf
    Return 0
EndFunc

 

[sayman]

Добавь в код:

$oIEErrorHandler = ObjEvent("AutoIt.Error","ComErrFunc")
Func ComErrFunc()
    If IsObj($oIEErrorHandler) Then
		$HexNumber = Hex($oIEErrorHandler.number, 8)
		if $HexNumber=00000000 then Return 0
		SetError($HexNumber)
		Return 1
    EndIf
    Return 0
EndFunc

замечательный человек долгих лет тебе жизни!

ответил именно на поставленный вопрос :IL_AutoIt_1:

 

[r35p3ct]

можно и плюсиком под сообщением отблагодарить ;)

 

[Garrett]

sayman [?]

Сабж как отключить оповещение об ошибке?

:blink:
[?]

ответил именно на поставленный вопрос

То что r35p3ct замечательный человек, ни кто не сомневался ;D

Но, где скажите: [?]

именно поставленный вопрос

 

[CreatoR]

r35p3ct [?]

можно и плюсиком под сообщением отблагодарить

Предупреждение

За нарушение правил форума (пункт А.10.5):

10. Запрещается злоупотреблять функцией «Репутация» (+1/-1). Это касается следующих пунктов:
...
5. Просьба о повышении репутации за оказанную помощь, но при этом позволяется использовать личную подпись для этой цели.

 

[Viktor217]

r35p3ct [?]

можно и плюсиком под сообщением отблагодарить

[warn]За нарушение правил форума (пункт А.10.5):

10. Запрещается злоупотреблять функцией «Репутация» (+1/-1). Это касается следующих пунктов:
...
5. Просьба о повышении репутации за оказанную помощь, но при этом позволяется использовать личную подпись для этой цели.

[/warn]

По-моему это не просьба, это намёк на существование плюсика(=

 

[CreatoR]

Viktor217 [?]

По-моему это не просьба, это намёк на существование плюсика

Какая разница.

А тебе тоже...
{OverQuoteWarn.Admin}

 

[r35p3ct]

OffTopic:

спорить не собираюсь, вы тут хозяин. НО
1. Человек недавно на форуме, если новичку объясняют, что код нужно обременять в тег Autoit это одно хорошо, а то, что есть такая функция как благодарность это - выпрашивание?
Ни раз видел подобное сообщение на форуме, типа на ненадо спасибо, просто нажми под сообщением и наказаний небыло, даже не мог подумать, что за такое могут наказать.
2. Один раз меня попросили сменить аватар т.к на нем была попа девушки, потом я часто видел аватар у участника с СИСЬКАМИ и ничего.
Не так давно в подписи у одного из участников была ПРОСЬБА, нажми + если помог. И тоже нормально.
Ну это я так для размышления для всех.

 

[Yashied]

Ошибка скорее всего возникает здесь:

$oHTTP.Send($my_params)

Вылет скрипта можно обойти используя функцию Execute().

...
	
Execute('$oHTTP.Send($my_params)')
If (@error) Or ($oHTTP.Status <> 200) Then
	Return SetError(1, 0, '')
EndIf
	
...

 

[CreatoR]

r35p3ct [?]

Человек недавно на форуме, если новичку объясняют, что код нужно обременять в тег Autoit это одно хорошо, а то, что есть такая функция как благодарность это - выпрашивание?

А для чего по твоему есть надпись при созданий темы?

На форуме принято ставить участникам +1 и/или отмечать полезные сообщения отвечающих в теме участников,
а также помечать тему решенной после получения ответа на свой вопрос!

Ни раз видел подобное сообщение на форуме, типа на ненадо спасибо, просто нажми под сообщением и наказаний небыло

Покажи где.

я часто видел аватар у участника с СИСЬКАМИ и ничего

Опять же, покажи этого участника.

Не так давно в подписи у одного из участников была ПРОСЬБА, нажми + если помог. И тоже нормально.

Да нормально, если бы ты внимательно читал правила, то знал бы что это разрешается.

P.S
То что не замечается, ещё не значит что можно.