Author Topic: Помогите неумехе  (Read 12625 times)

0 Members and 1 Guest are viewing this topic.

MaxKot

  • Освоившийся
  • **
  • Posts: 30
    • View Profile
Re: Помогите неумехе
« Reply #45 on: November 27, 2017, 02:50:57 PM »
Все таки хочу разобраться, что не так с этим компом. На домашнем печатает все правильно, все логины и пароли по своим полям ввода. Комп на работе уже 5 аккаунтов отсеял:( И это я не все еще проверил. Никакой связи между аккаунтами нет, есть и латиница, и кириллица, и логин из одного слова и из двух. Вылезла еще одна загвоздка - код с  командой  STRCONCAT, в скрипте написанном выше в первый раз находит картинку, во второй - останавливается, хотя на домашнем компе все в норме:( Пора наверное на свалку, только другого нет :'( Может кто объяснить хоть направление, где искать?

Viktor77

  • Активный участник
  • ***
  • Posts: 106
    • View Profile
Re: Помогите неумехе
« Reply #46 on: October 16, 2020, 02:04:07 AM »
Попробуй вот такой вариант
Code: (clickermann) [Select]
//Создаешь рядом со скриптом файл "LogPass.txt" и в него записываешь строки по образцу

//Тест1@mail.ru:111111111
//Тест2@mail.ru:абвгд
//Тест3@mail.ru:тестТестТЕСТ

//Сам скрипт:

IF(TFCOUNT("LogPass.txt") > $count)
   INC($count,1)
ELSE
   HALT // Стоп по достижении конца файла
END_IF
$str = TFREAD ("LogPass.txt", $count)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(10,10) // клик по полю логина
WAITMS (50)
TOCLIP($log) // скопировать логин в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по полю пароля
WAITMS (50)
TOCLIP($pass) // скопировать в пароль в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (50)

LCLICK(10,10) // клик по "Вход"

//Каждый новый проход будет считываться новая строка с логином и паролем
опробовал такой вариант смены аккаунтов? но будет ли работать оно в таком скрипте, где на аккаунтах разное количество твинов, на одном аккаунте 16, на другом 30, на большинстве 12-13. там где закрыть браузер, т.е смена аккаунта нужна.
Code: (clickermann) [Select]
IF(TFCOUNT("LogPass.txt") > $count)
   INC($count,1)
ELSE
   HALT // Стоп по достижении конца файла
END_IF
$str = TFREAD ("LogPass.txt", $count)
$log = STRCUT2 ($str, 1, STRPOS ($str, ":")-1)
$pass = STRCUT2 ($str, STRPOS ($str, ":")+1, STRLEN ($str))

LCLICK(1065,120)   
WAITMS (1000)
LCLICK(505,345) // клик по полю логина
WAITMS (1000)
TOCLIP($log) // скопировать логин в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (1000)

LCLICK(505,395) // клик по полю пароля
WAITMS (1000)
TOCLIP($pass) // скопировать в пароль в буфер
WAITMS (50)
KEYDOWN (#CTRL) // вставить
WAITMS (50)
KEYPRESS(#V)
WAITMS (50)
KEYUP (#CTRL)
WAITMS (1000)

LCLICK(640,470) // клик по "Вход"
WAIT(5)

//GETSCREEN
//IF_PICTURE_IN (1135,100,1200,130, "выход.bmp")
//   LCLICK($_return1,$_return2)
//   WAIT(5)
//END_IF
LCLICK(1185,100) // клик по "Выход"
WAIT(5)
   LCLICK(805,173) // клик по "Выход"
WAIT(5)
и как можно вызвать яндекс браузер на котором есть несколько и более профилей, именно тот профиль который нужен? браузер не стоит по умолчанию.
« Last Edit: October 16, 2020, 02:06:58 AM by Viktor77 »