[Сеть, интернет] Автоматизация онлайн игры в IE
- Автор темы BETAJIb
- Дата начала
edward_freedom
Осваивающий
- Сообщения
- 200
- Репутация
- 44
edward_freedom
Осваивающий
- Сообщения
- 200
- Репутация
- 44
Re: [Сеть, интернет] Динамическая программа для IE
Зайди в раздел ботов, там много полезной информации
Зайди в раздел ботов, там много полезной информации
edward_freedom
Осваивающий
- Сообщения
- 200
- Репутация
- 44
Re: [Сеть, интернет] Динамическая программа для IE
BETAJIb
Обьясняй точней.Какой текст, с чем сравнивать, откуда его брать
BETAJIb
Обьясняй точней.Какой текст, с чем сравнивать, откуда его брать
Re: [Сеть, интернет] Динамическая программа для IE
ну вот пусть там будет такой кусок скрипта:
<body><div class="top">[<span class="red">176/218</span>] [<span class="blue">134/164</span>] [<span class="green">52/120</span>]</div></body>
пусть мне нужно тута занести в переменную вот эти цифры - 176...ну и они все времья меняться будут...походу...
ну вот пусть там будет такой кусок скрипта:
<body><div class="top">[<span class="red">176/218</span>] [<span class="blue">134/164</span>] [<span class="green">52/120</span>]</div></body>
пусть мне нужно тута занести в переменную вот эти цифры - 176...ну и они все времья меняться будут...походу...
- Сообщения
- 4,020
- Репутация
- 626
Re: [Сеть, интернет] Динамическая программа для IE
BETAJIb
игнорирование предупреждений – на этом форуме далеко не заведет. отпиши в пм мне или любому другому админу или модератору, как придумаешь название темы, чтобы я ее открыл
Добавлено:
тема перенесена и переименована. BETAJIb, возьми на заметку, все что было сказано
BETAJIb
игнорирование предупреждений – на этом форуме далеко не заведет. отпиши в пм мне или любому другому админу или модератору, как придумаешь название темы, чтобы я ее открыл
Добавлено:
Сообщение автоматически объединено:
тема перенесена и переименована. BETAJIb, возьми на заметку, все что было сказано
- Сообщения
- 3,999
- Репутация
- 967
BETAJIb
Попробуйте так:
Попробуйте так:
Код:
#include <Array.au3>
$oIE = _IECreate('http://...')
; ...
$oElements = _IETagNameGetCollection($oIE, 'span')
For $oElement In $oElements
If $oElement.className == 'red' Then
$aHP = StringSplit(_IEPropertyGet($oElement, 'innerText'), '/', 2)
ExitLoop
EndIf
Next
_ArrayDisplay($aHP)
- Сообщения
- 7,790
- Репутация
- 2,323
BETAJIb
Можно так попробовать:
Можно так попробовать:
Код:
#include <Array.au3>
#include <IE.au3>
$iMax = 1000
Dim $aResult[$iMax][2]
$j = 0
$oIE = _IECreate('http://...')
$oElements = _IETagNameGetCollection($oIE, 'span')
For $oElement In $oElements
If StringRegExp($oElement.className, '^(red|blue|green)$') Then
$sText = $oElement.innerText
If StringRegExp($sText, '^\d+/\d+$') Then
$j += 1
If $j = $iMax - 1 Then
$iMax += 1000
ReDim $aResult[$iMax][2]
EndIf
$aResult[$j][0] = StringRegExpReplace($sText, '/.*$', '')
$aResult[$j][1] = StringRegExpReplace($sText, '^.*/', '')
EndIf
EndIf
Next
If $j Then
ReDim $aResult[$j + 1][2]
$aResult[0][0] = $j
_ArrayDisplay($aResult)
Else
MsgBox(16, 'Error', 'Ничего не нашли')
EndIf
