louie1743shkirondo
Новичок
- Сообщения
- 28
- Репутация
- 0
В общем, я генерирую последовательный ряд чисел(от 4-8 в ряд), который находится в отдельном скрипте - это ID в ВК.
Затем я подключаю этот скрипт, вставляю ID в ссылку, копирую HTML-код страницы, ищу статус и тд... Вопрос вот в чём:
Почему ID и то, что есть в ссылке на страницу человека, отличаются?
Получается примерно так:
iamhappyverymuch |https://vk.com/id967 ||335 ; 335 - это ID, который я вставил в ссылку... По идее ("|"и "||" - просто для красоты)
Вот сам код:
Затем я подключаю этот скрипт, вставляю ID в ссылку, копирую HTML-код страницы, ищу статус и тд... Вопрос вот в чём:
Почему ID и то, что есть в ссылке на страницу человека, отличаются?
Получается примерно так:
iamhappyverymuch |https://vk.com/id967 ||335 ; 335 - это ID, который я вставил в ссылку... По идее ("|"и "||" - просто для красоты)
Вот сам код:
Код:
#include <String.au3>
#include <Array.au3>
#include <File.au3>
#include <IE.au3>
#include <Random.au3>
HotKeySet("{ESC}", "Close")
Rand()
VK()
Func VK()
$Shell = "https://vk.com/id" & $ID
Rand()
$IE = _IECreate($Shell, 0, 0)
$Url = _IEPropertyGet($IE, "innerHTML")
$qIE = _IEQuit($IE)
$Text = _StringBetween($Url, '<title>', '</title>')
$HeadLine = _StringBetween($Url, 'current_text">', '<')
If $HeadLine <> 0 Then
Global $File = @ScriptDir & "\States.txt"
If Not FileExists($File) Then _FileCreate($File)
GLobal $FileOpen = FileOpen($File)
Global $z = ""
For $z In $HeadLine
FileWrite($File, $z & ' |' & $Shell & " ||" & $ID & @CRLF)
Next
Global $b = ''
For $b In $HeadLine
$x = 1500
$y = 750
ToolTip($b & @CRLF, $x, $y, 'Статистика', $b, 4)
Sleep(100)
Next
VK()
Else
VK()
EndIf
EndFunc
Func Close()
Exit
EndFunc