Что нового

Как выйти из вложенного цикла

joparezzz

Новичок
Сообщения
65
Репутация
0
Код:
While 1
;код 1
While 2
$sSearch = 'Некий текст'
$sText = _IEBodyReadText ($oIE)
If StringInStr($sText, $sSearch) Then
MsgBox(64, 'Info', 'Есть такой текст: ' & $sSearch)
Else
MsgBox(64, 'Info', 'Нет такого текста: ' & $sSearch)
EndIf
WEnd
;код 2
WEnd


Не подскажите как реализовать выход из цикла?
Мне надо если находится 'Некий текст' то выйти из второго цикла, если не находит то перейти в начало цикла
пробовал вот так:

Код:
While 1
;код 1
While 2
$sSearch = 'Некий текст'
$sText = _IEBodyReadText ($oIE)
If StringInStr($sText, $sSearch) Then
MsgBox(64, 'Info', 'Есть такой текст: ' & $sSearch)
ExitLoop
Else
MsgBox(64, 'Info', 'Нет такого текста: ' & $sSearch)
EndIf
WEnd
;код 2
WEnd

но программа почему то выходит сразу из 1 цикла, а мне надо чтоб выходило только из 2 цикла
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Re: Цикл

Предупреждение За нарушение правил форума (пункт Б.5):
Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.


Данные правила могут пополняться локальными правилами раздела.
Как правильно называть темы

"Цикл" - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, ваш Модератор.











Добавлено:
Сообщение автоматически объединено:

joparezzz [?]
но программа почему то выходит сразу из 1 цикла
Всё нормально работает.
Код:
#include<IE.au3>
$oIE = _IECreate('http://ya.ru')
$sSearch = 'Яндекс' ; true
;$sSearch = 'Некий текст' ; false

While 1
ConsoleWrite('>>> While 1 ' & @CRLF)
	While 2
		ConsoleWrite('>>> While 2 ' & @CRLF)
		$sText = _IEBodyReadText($oIE)
		If StringInStr($sText, $sSearch) Then
			MsgBox(64, 'Info', 'Есть такой текст: ' & $sSearch)
			ExitLoop
		Else
			MsgBox(64, 'Info', 'Нет такого текста: ' & $sSearch)
		EndIf
	WEnd
WEnd
 
Верх