Что нового

Прокомментируйте ошибку плз

vsavelyev

Новичок
Сообщения
18
Репутация
0
Можете прокомментировать ошибку, в чем проблема:

Код:
==> Illegal text at the end of statement (one statement per line).:
If StringRegExp($sHTML, $sPattern, 0) Then   MsgBox(64, '', '???????? ? ????????: ' & $i) $str = $i EndIf
If StringRegExp($sHTML, $sPattern, 0) Then   MsgBox(64, '', '???????? ? ????????: ' & $i) ^ ERROR

Код:
$sPattern = $domens

	  For $i = 1 To 100 Step 1

		 If StringRegExp($sHTML, $sPattern, 0) Then   MsgBox(64, '', 'Страница с запросом: ' & $i) EndIf

		 _IELinkClickByText ($oIE, "Следующая")
		 _IELoadWait($oIE)
		 Sleep(1000)
		 $sHTML = _IEDocReadHTML($oIE)

	  Next
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
vsavelyev [?]
Можете прокомментировать ошибку
Ошибка в синтаксисе, используйте
Код:
;~ ...
If StringRegExp($sHTML, $sPattern) Then MsgBox(64, '', 'Страница с запросом: ' & $i)
;~ ...
Или
Код:
;~ ...
If StringRegExp($sHTML, $sPattern) Then
	MsgBox(64, '', 'Страница с запросом: ' & $i)
EndIf
;~ ...
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
vsavelyev [?]
Рабочий пример покажите.
Пример:
Код:
For $i = 1 To 10
	If Mod($i, 2) Then MsgBox(64, 'Info', 'Число ' & $i & ' нечетное')
	If Not Mod($i, 2) Then
		MsgBox(64, 'Info', 'Число ' & $i & ' четное')
	EndIf
Next
 
Верх