Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - putman

Pages: 1 ... 10 11 [12] 13 14
166
Общие вопросы / Re: Удаленное управление.
« on: October 28, 2014, 01:10:28 PM »
Зачем свойства?... Из них только понятно, что тебя зовут Алексей  ;D ;D ;D

Правая кнопка - Изменить - Локальные ресурсы - буфер обмена. Ну или подобное на твоей версии.
И кликер тут не при чём, это настройки удалённого рабочего стола.
Галочка - буфер обмена установлена.

167
Общие вопросы / Re: Удаленное управление.
« on: October 28, 2014, 10:53:01 AM »
Так давай еще раз но чтоб люди поняли.
Есть удаленная машина, на которой крутится ПОшка. Есть средство удаленногоу правления (что то типа RAdmin).
Есть локальная машина, которая управляет удаленной через RAdmin. Соответственно серверная часть RAdmin стоит на удаленной, а клиентская на локальной.
Есть кликер, который крутится на локальной машине и тыкается в клиентскую часть RAdmin. Мышкой тыкается, клавиатурой нет.

Все верно?
Все верно.
Я думаю удаленный доступ средствами винды сделан.
Вот скрины иконки и её свойства.
Админы не скажут что и как, по этому только такие скудные данные.

168
Общие вопросы / Re: Удаленное управление.
« on: October 28, 2014, 07:37:36 AM »
Code: (Clickermann) [Select]
keydown(#CTRL)
KEYPRESS(#C)
keyup(#CTRL)
//---//---//
keydown(#CTRL)
KEYPRESS(#V)
keyup(#CTRL)
На моем компьютере этот код работает замечательно.
Вы не поняли, я захожу на рабочий сервер через удаленный доступ.
Программа открывается на сервере, я лишь вижу её изображение и могу писать, работать мышью.
Но беда в том, что Кликермановские команды с клавиатуры на сервер не передаются.
Мышиные же работают отлично.
Вопрос, как донести до сервера команды клавиатуры ?

169
Общие вопросы / Удаленное управление.
« on: October 27, 2014, 01:12:53 PM »
Здравствуйте.
На работе с базой данных у нас все работают удаленно.
Пытаюсь упростить себе работу по рутинному внесению данных.
Мышкой все работает (приходится много копировать и вставлять), а Ctrl + V, C не работают.
Клавиатуру Кликермана сервер не видит.
Что посоветуете сделать ?


170
Вставил код с поиском Finf file.exe.
У меня сейчас 8500 строк в файле, поиск происходит за разное время (от 26 до 50 мсек), задержку в ожидании ответа от программы Finf file.exe убрал вообще (строка 166).
Сейчас более 17000 строк, время поиска не увеличилось, хвала симбиозу Clickermann + ассемблер !!!

171
Именно так =)

172
Вставил код с поиском Finf file.exe.

Большое Вам спасибо, с такой скоростью поиска можно и 100 000 строк думаю без проблем переваривать.
Подожди )
 У меня похожая задача в твиттере.
 Решил конечно, но задержка великовата.
 Напиши пожалуйста  сюда
 1) Что за программа? Где брал программу ?
 2) Выложи  свой  скрипт.

Скрипт обращения к программе для поиска строки в предыдущем сообщении.
Программа поиска Finf file.exe, она наверное ещё в досе была, я припоминаю такую вроде.

173
Про ассемблер это была штука. К дальнейшему коду отношения не имеет.
Что-то очень мало времени у тебя занимает. Оно хоть работает? Может ошибся где? Проверял?
Я только комп купил, новый. Жесткий диск флешёвый 120 ГБ, там Кликерман установлен, видимо из-за этого так быстро.
Ну и проц i7, 3.5 Ггц.
Вот кусок кода где идёт поиск:
Quote
UNDEFINE($url)

$url = ""
$ank = $_ankw
INIWRITE("name.ini","file","name_small.txt")
INIWRITE("name.ini","ank",$ank)
INIWRITE("name.ini","return","-1")
$start = $_ms
EXECUTE("Find file.exe")
WHILE(INT(INIREAD("name.ini", "return")) = -1)   // ????????
   //WAITMS(30)
   //LOGWRITE ("Æä¸ì")
END_CYC
$start = $_ms - $start
IF(INT(INIREAD("name.ini", "return")) = 1)
   LOGWRITE ("Èìÿ åñòü â áàçå")
   
       $_kank =  $_kank + 15
       $_bzank = $_bzank + 1
      GOTO (st)
END_IF


174
Вставил код с поиском Finf file.exe.
У меня сейчас 8500 строк в файле, поиск происходит за разное время (от 26 до 50 мсек), задержку в ожидании ответа от программы Finf file.exe убрал вообще (строка 166).
С файлом длиной 1000 строк, время было примерно такое же, видимо максимум в этом ожидании это скорость работы с диском, т.е. чтение, а сам поиск реализован на ассемблере и длится ничтожно малое время.
Большое Вам спасибо, с такой скоростью поиска можно и 100 000 строк думаю без проблем переваривать.

175
C find file отлично получается, подскажите, где почитать про работу с внешними программами поиска.
А то, ничего не понял в той части программы, где эта работа реализована.
У меня получилось:

Quote
21:05:23 Время теста
21:05:23 Тест 1 32 мс
21:05:23 Тест 2 15 мс
21:05:23 
21:05:23 Тест 3. Длинные 1270 мс
21:05:23 Тест 4. Короткие 1227 мс
21:05:23 Тест 6. Короткие в массив 874 мс
21:05:23 Тест 7. Короткие. Вызов AutoIt 50 мс

, вот повторный тест.

Quote
21:08:07 Время теста
21:08:07 Тест 1 55 мс
21:08:07 Тест 2 12 мс
21:08:07 
21:08:07 Тест 3. Длинные 850 мс
21:08:07 Тест 4. Короткие 772 мс
21:08:07 Тест 6. Короткие в массив 444 мс
21:08:07 Тест 7. Короткие. Вызов AutoIt 55 мс

Почему такой большой разброс интересно ?

176
Vint, спасибо, буду изучать код.
Сравнение сторонней быстрой программой очень интересно.
Еще я хотел в каждый элемент массива писать не одно значение, а например 20, длиной по 12 символов допустим, мне кажется будет быстрее, надо проверить.

177
Большое спасибо !
Ваш код работает, не знаю, что я не так скопировал в первый раз. Скопировал снова, вставил, работает.

178
Вот правильный код
...
Этот код отрезает одинаковое количество символов, то которое указано в первом условии, в данном случае это + 3.
На остальные условия (с разными длинами доменов) он не реагирует, какие бы цифры там не стояли.
Code: [Select]
   IF((STRPOS ($_ankf, "mail/") > 0) & ($pos = 0))
     $pos =  STRPOS($_ankf, "mail/") + 3
  END_IF
т.е. получается
Code: [Select]
23:37:13 l/goldsmetana/
23:37:13 xxx1910xxx19010/
23:37:13 ox/lagonet/
23:37:13 t/bagira19/

179
В коде выше у меня не работают условия, каждый раз входит во все IF.
Никак не могу найти как в условии проверять истинность присутствия одной из строк - list, inbox, mail или bk.

180
У меня 4 различных начала урл.
ДЛя начала надо узнать какой именно из них, что бы потом его отрезать.
Что то у меня такое условие только начало с майл отрезает, а остальные оставляет как были.

Code: [Select]

for($var, $var < 4)
 $varm = $var + 1
 $_ankf = TFRead("name.txt", $varm)
 
 IF STRPOS ($_ankf, "mail/") = 1   
$pos =  STRPOS($_ankf, "mail/") + 5
 END_IF
 
  IF  STRPOS($_ankf, "inbox/") = 1   
$pos =  STRPOS($_ankf, "inbox/") + 6
  END_IF
 
  IF  STRPOS($_ankf, "list/") = 1   
$pos =  STRPOS($_ankf, "list/") + 5
  END_IF
 
  IF  STRPOS($_ankf, "bk/") = 1   
$pos =  STRPOS($_ankf, "bk/") + 3
 END_IF

ps:
$_ankf = STRCUT2($_ankf, $pos, 100)

LOGWRITE ($_ankf)

END_CYC


Pages: 1 ... 10 11 [12] 13 14