Что нового

Переменная меняет значение на рандомное, когда я подключаю скрипт в скрипт

louie1743shkirondo

Новичок
Сообщения
28
Репутация
0
В общем, я генерирую последовательный ряд чисел(от 4-8 в ряд), который находится в отдельном скрипте - это 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
 
A

Alofa

Гость
Код:
; ...

Rand() ; В общем, я генерирую последовательный ряд чисел(от 4-8 в ряд), который находится в отдельном скрипте - это ID в ВК.

VK()

Func VK()
$Shell = "https://vk.com/id" & $ID ;  ... вставляю ID в ссылку

Rand(); <<< А КАК ВЫ ДУМАЕТЕ, ЧТО ДЕЛАЕТСЯ ЗДЕСЬ? >>>

; ... копирую HTML-код страницы, ищу статус и тд... 
$IE = _IECreate($Shell, 0, 0)
$Url = _IEPropertyGet($IE, "innerHTML")
$qIE = _IEQuit($IE)
; ...
 
Верх