МГС  Московская Гигабитная Сеть
 www.umos.su info@umos.su  Выделенные линии Ве/б-Студия Хостинг Collocation
 Тарифы Вопросы и ответы Полезная информация Контакты

Софт >> Quik

Страниц в ветке: 1
ArEAlity
Душа форума
***

Зарегистрирован: 14/01/2004
Сообщений: 329
Автозапуск Quik
      #280392 - 18/11/2009 20:53 прикреплённые файлы (403 загрузок)

Нашел на форуме Quik VB Script для автозапуска Quik (см. прикрепленный файл). Надеюсь автор не будет против, штука очень полезная...

Скрипт запускает Quik и вводит логин и пароль, указанный внутри скрипта.

Как использовать:
1. Открыть скрипт при помощи Notepad или любого другого текстового редактора.
2. Заменить YourLogin и YourPassword на логин и пароль соответсвенно.
3. Сохранить скрипт и скопировать в папку с Quik.
4. Можно запускать скрипт.

Дальше можно добавить запуск скрипта в планировщик заданий, чтобы он стартовал автоматически в определенное время или при запуске компа. Плюс к этому я поставил в BIOS время запуска компа, так что могу оставлять комп выключенным, когда ухожу.

Дальше сами, кто во что горазд

Удачной торговли


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
wwdwwd
Гость


Зарегистрирован: 17/06/2008
Сообщений: 8
Нахождение: e
Re: Автозапуск Quik [re: ArEAlity]
      #280770 - 22/11/2009 00:21

Спасибо

--------------------
er


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
new quantum
Свой человек
****

Зарегистрирован: 20/08/2007
Сообщений: 86
Re: Автозапуск Quik [re: ArEAlity]
      #280840 - 22/11/2009 21:51

Текст скрипта не смотрел, но первое что бы сделал - закодировал бы логин и пароль отдельно и ввел бы в скрипт декодирование только в момент запуска.
А так Вы храните логин и пароль в текстовом виде в файле да еще и в самой папке программы... С точки зрения безопасности это недопустимо - хотя может и обойтись - как повезет.


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
ArEAlity
Душа форума
***

Зарегистрирован: 14/01/2004
Сообщений: 329
Re: Автозапуск Quik [re: new quantum]
      #280851 - 23/11/2009 00:03

Quik использует в дополнению к паролю файл с ключами, который сгенирирован с использование пароля и логина. С неправильным файлом, Quik не разрешит доступ.

Т.е. единственные вариант, ето если пароль стырят те, у кого есть алгоритм генерации ключей. На сколько я помню, алгоритма в свободном доступе нет.

Но в целом согласен, что это очень непрофессионально, держать ключи в общедоступном месте.

Если у кого есть желание добавить кодировку логина с паролем, то велкам. У меня со временем пока туго.

Удачи


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Bell
Свой человек
***

Зарегистрирован: 10/07/2003
Сообщений: 154
Re: Автозапуск Quik [re: ArEAlity]
      #280914 - 23/11/2009 15:47

а можно сделать запуск скрипта не из директории Квика? Сейчас он не находит ini и открывает пустое окно

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Pawel
Душа форума
****

Зарегистрирован: 19/03/2007
Сообщений: 410
Нахождение: Москва
Re: Автозапуск Quik [re: Bell]
      #280919 - 23/11/2009 15:58

В ответ на :

Bell писал:
а можно сделать запуск скрипта не из директории Квика? Сейчас он не находит ini и открывает пустое окно



Сделайте запуск не с exe-шника, а с иконки. Должно работать.

--------------------
Как соорудить МТС?
1) Ищем здравую техническую идею
2) Кодируем
3) Меняем условия входа/выхода местами - получаем профитную систему)


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
SocolМодератор
Профессор
****

Зарегистрирован: 16/04/2003
Сообщений: 2259
Нахождение: Пермь
Re: Автозапуск Quik [re: ArEAlity]
      #280936 - 23/11/2009 19:20

В ответ на :

ArEAlity писал:
Т.е. единственные вариант, ето если пароль стырят те, у кого есть алгоритм генерации ключей. На сколько я помню, алгоритма в свободном доступе нет.





Алгоритм в свободном доступе как раз есть. В свободном доступе нет случайных нажатий пользователя, которые используются для генерации ключей.


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
ArEAlity
Душа форума
***

Зарегистрирован: 14/01/2004
Сообщений: 329
Re: Автозапуск Quik [re: Socol]
      #280956 - 24/11/2009 00:11

Спасибо за поправку

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
SocolМодератор
Профессор
****

Зарегистрирован: 16/04/2003
Сообщений: 2259
Нахождение: Пермь
Re: Автозапуск Quik [re: ArEAlity]
      #281064 - 25/11/2009 14:32

Это тебе спасибо за скрипт. А уточнение просто к тому было - что украденные пароли еще не означают взлома системы, мошеннику еще нужны будут ключи pgp.

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
seda
Душа форума
****

Зарегистрирован: 09/03/2007
Сообщений: 333
Нахождение: Vologda
Re: Автозапуск Quik [re: Socol]
      #281277 - 27/11/2009 21:23

Не знаю к кому обратиться, но вроде по теме, может кто из специалистов на-вскидку скажет:
а можно-ли в VBскрипте осуществить следующие вещи -
1. если квик свёрнут, или не активный(перекрыт другим окном или не в фокусе) - вывести его на передний план?
2. если активен/в фокусе - свернуть его?
хочу зацепить фсё енто на хард-кнопку на ноуте...

--------------------
"...однажды он прогнётся под нас..."


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
untoxaМодератор
Ветеран
****

Зарегистрирован: 16/07/2007
Сообщений: 1211
Re: Автозапуск Quik [re: seda]
      #281284 - 27/11/2009 23:31

можно. тут все написано: http://forum.script-coding.info/viewforum.php?id=5

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
seda
Душа форума
****

Зарегистрирован: 09/03/2007
Сообщений: 333
Нахождение: Vologda
Re: Автозапуск Quik [re: untoxa]
      #281344 - 28/11/2009 21:51

спасибо. но это не совсем то что мне хотелось.
мне нужен "чистый" VB скрипт, без использования в нём дополнительных библиотек-нахлобучек (так я и сам сделал - на си свою утилитку прикрутил).
но в целях переносимости хочется что-то "уже по умолчанию присутствующее в стандартной винде" и в таком-же элегантном виде как выложенный выше скрипт.

--------------------
"...однажды он прогнётся под нас..."


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
untoxaМодератор
Ветеран
****

Зарегистрирован: 16/07/2007
Сообщений: 1211
Re: Автозапуск Quik [re: seda]
      #281346 - 28/11/2009 23:33

я не понял: вам шашечки или ехать? вызывать функции winapi напрямую без com-обертки из программы на vbscript нельзя.

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
seda
Душа форума
****

Зарегистрирован: 09/03/2007
Сообщений: 333
Нахождение: Vologda
Re: Автозапуск Quik [re: untoxa]
      #281721 - 02/12/2009 19:34

всё понял. я в скриптах васиковых тёмный человек вот и задаю такие глупые вопросы (думал: "а вдруг там усё есь...").
кстати сразу даже не разглядел, что в первом скрипте тоже внешняя библиотека использована

--------------------
"...однажды он прогнётся под нас..."


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
odal
Гость


Зарегистрирован: 01/09/2009
Сообщений: 21
Нахождение: Нижний новгород
Re: Автозапуск Quik [re: seda]
      #282327 - 08/12/2009 11:16

Вместо логина и пароля, которые сохраняю в скрипте при запуске вводятся левые символы. В чем может быть причина?
отображает только если русские буквы ввести... при вводе латинских- цифры и символы вместо букв при запуске квика в полях логин и пароль. (хотя в скрипте сохраняется логин и пароль который ввел)


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Craft
Свой человек
***

Зарегистрирован: 27/08/2009
Сообщений: 196
Re: Автозапуск Quik [re: odal]
      #282355 - 08/12/2009 15:10

odal, необходимо чтобы по умолчанию стояла англ. раскладка клавиатуры.

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
odal
Гость


Зарегистрирован: 01/09/2009
Сообщений: 21
Нахождение: Нижний новгород
Re: Автозапуск Quik [re: Craft]
      #282362 - 08/12/2009 15:29

спасибо, помогло. не думал что это так принципиально. ))) а можно сделать чтобы при обрыве связи подключалась автоматически?

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
untoxaМодератор
Ветеран
****

Зарегистрирован: 16/07/2007
Сообщений: 1211
Re: Автозапуск Quik [re: odal]
      #282363 - 08/12/2009 15:33

реконнект настройте в самом квике

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
SERYJ
Свой человек


Зарегистрирован: 31/08/2009
Сообщений: 29
Нахождение: MSK
Re: Автозапуск Quik [re: odal]
      #282365 - 08/12/2009 15:38

поменял в скрипте path = "info.exe"
на полный путь
path = "C:\Quik\info.exe"
попробовал запустить не из папки квика
вылетает ошибка "Справочники отсутсвуют.Конфигурация окон будет загружена после подключения к серверу." и ключи опять спрашивает с дискеты a:\
Как обойти эту ошибку?

--------------------
Это только начало, а в начале - тяжело!


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Craft
Свой человек
***

Зарегистрирован: 27/08/2009
Сообщений: 196
Re: Автозапуск Quik [re: SERYJ]
      #282377 - 08/12/2009 16:34

SERYJ, а зачем тебе менять путь и переносить скрипт в др. папку? Оставь скрипт в папке квика и создай ярлык на скрипт где угодно.

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
SERYJ
Свой человек


Зарегистрирован: 31/08/2009
Сообщений: 29
Нахождение: MSK
Re: Автозапуск Quik [re: Craft]
      #282380 - 08/12/2009 16:57

В ответ на :

Craft писал:
SERYJ, а зачем тебе менять путь и переносить скрипт в др. папку? Оставь скрипт в папке квика и создай ярлык на скрипт где угодно.



в целях безопасности - не хотелось бы в папке quik общедоступно выкладывать логин и пароль...

--------------------
Это только начало, а в начале - тяжело!


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
odal
Гость


Зарегистрирован: 01/09/2009
Сообщений: 21
Нахождение: Нижний новгород
Re: Автозапуск Quik [re: odal]
      #282390 - 08/12/2009 17:38

все, разобрался... еще раз спасибо!

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Craft
Свой человек
***

Зарегистрирован: 27/08/2009
Сообщений: 196
Re: Автозапуск Quik [re: SERYJ]
      #282500 - 09/12/2009 14:31

Тады Вам, SERYJ, нужен AutoHotkey и Вам сюда:
http://www.selftrade.ru/automatization/avtozapusk-quik/


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Xynic
Свой человек


Зарегистрирован: 07/10/2007
Сообщений: 42
Нахождение: Санкт-Петербург
Re: Автозапуск Quik [re: Craft]
      #351100 - 23/11/2011 15:19

Добавлю инфу по теме - Автоматизация запуска QUIK с помощью AutoIt
http://www.kamynin.ru/archives/1355
правда, чтобы заработало, я немного подправил этот скрипт, кавычки поменял...
В ответ на :


//~~~~~~ТЕКСТ СКРИПТА~~~~~~~~~~~~~~~~~~~~~
; AutoIt Version: 3.0
; Language: Русский
; Platform: Win9x/NT
; Author: Николай Камынин(kamnik@mail.ru)
; в качестве параматров можно задать
; формат запуска программы: RQ ["HH:MM:SS" ["логин" ["пароль" ["путь к файлу QUIK"]]]]
#include <Date.au3>
$Progr="info.exe" ;имя файла с расширением QUIK
$DirW="C:\Info\" ;путь к файлу QUIK
$wind="Идентификация пользователя" ;название окна
$Name="Иванов" ;логин
$Pas="Password" ;пароль
$TimeStart="9:40:00" ;время запуска QUIK
$TimeStop="23:55:00" ;время окончания сессии
if $CmdLine[0] >0 then
$TimeStart=$CmdLine[1] ;время запуска QUIK
EndIf
if $CmdLine[0] >1 then
$Name=$CmdLine[2] ;логин
EndIf
if $CmdLine[0] >2 then
$Pas=$CmdLine[3] ;пароль
EndIf

if $CmdLine[0] >3 then
$DirW=$CmdLine[4] ;путь к файлу QUIK
EndIf
;~~~~~~~~~~~~~~~~~
$NowDate=_NowCalcDate() ;текущая дата
$DateToWeek=_DateToDayOfWeek ( StringMid( $NowDate,1,4), StringMid( $NowDate,6,2), StringMid( $NowDate,9,2))
$DiffToSecStop=_DateDiff("s", _NowCalc(), $NowDate & " " & $TimeStop)
IF ( $DateToWeek>1 and 7>$DateToWeek and $DiffToSecStop>0 ) Then
$DiffToSecStrat=_DateDiff("s", _NowCalc(), $NowDate & " " & $TimeStart)
Sleep($DiffToSecStrat*1000)
if ProcessExists ( $Progr)==0 then
Run($DirW & $Progr,$DirW)
WinWaitActive($wind)
if StringLen($Name)>0 then
Send($Name )
Send("{TAB}")
EndIf
if StringLen($Pas)>0 then
Send($Pas )
Send("{ENTER}")
EndIf
; Send( «{Shift}+{Ctrl}+L»); Начать вывод через DDE из всех таблиц, имеющих настройки экспорта

EndIf
EndIf




В ответ на :


Объясняю, как овладеть AutoIt, который распространяется бесплатно.
Более того, писать для него скрипты очень просто, если Вы знакомы с компьютером в объеме школьных уроков информатики.
Итак идем на сайт производителя: http://www.autoitscript.com/autoit3/downloads.shtml
Забираем AutoIt v3.3.6.1 заодно рекомендую скачать текстовый редактор AutoIt Editor (SciTE).
Далее устанавливаете AutoIt и редактор на свой компьютер.
В редактор копируйте приведенный ниже текст.
Его можно скопировать и в любой другой текстовый редактор.
Сохраняете текст в файл с раширением “au3”.
После этого, в редакторе SciTE в меню TOOLS выполняете BUILD.
Если Вы работаете в другом редакторе, то после сохранения файла заходите в каталог, где он лежит наводите мышку и жмете на правую кнопку.
Появляется меню Выбираете Compile Script.
Получаете исполняемый файл с расширением exe.

Если Вы при установке AutoIt не указали привязку его к расширению au3, то компиляцию Вашей программы надо сделать вызвав Aut2Exe Делается это так:

Заходим : Пуск->Программы->AutoIt v3->Compile Script to .exe

Появляется окно:

В поле с именем “Source” с помощью кнопки “Browse” выбираем исходную программу с расширением .au3

Жмем кнопку “Convert” . Там же, где исходный файл получаем исполняемый с тем же именем но расширением .exe.

Этот файл Вы помещаете в автозапуск, если надо, чтобы QUIK запускался в определенное время.
Либо помещаете файл на стол и в период с 9:50 до 23:00 в рабочие дни, когда надо, щелкаете по файлу и QUIK запускается.
Теперь о самом скрипте.
Текст его приведен ниже.
Как он работает ясно из комментария.
Продвинутые пользователи могут запускать скрипт командной строкой.
Для менее продвинутых поясняю.
В редакторе текста перед трансляцией запишите свой ЛОГИН и ПАРОЛЬ в следующие строки программы:
$Name=» 123456 » ;логин
$Pas=» AAAAAAA » ;пароль





Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Mikhail Sukhov
на митинги ходят враги моей страны
***

Зарегистрирован: 21/02/2010
Сообщений: 605
Re: Автозапуск Quik [re: Xynic]
      #351113 - 23/11/2011 17:01

В ответ на :

Xynic писал:
Добавлю инфу по теме - Автоматизация запуска QUIK с помощью AutoIt





Выражается одним словом - жесть!

А еще говорят это C# сложный и в ему трудно обучиться:

Code:
var terminal = QuikTerminal.Get(path);

if (!terminal.IsLaunched)
terminal.Launch();



(с)

Так сказать посмотрите вверх и вниз

--------------------
Stock# - платформа для торговых роботов и создание торговых роботов.


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Xynic
Свой человек


Зарегистрирован: 07/10/2007
Сообщений: 42
Нахождение: Санкт-Петербург
Re: Автозапуск Quik [re: Mikhail Sukhov]
      #351145 - 24/11/2011 09:06

Я, например, не программист, как пользоваться этим кодом на C# - понятия не имею...

Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
ViktorSPB
КПРФ
*****

Зарегистрирован: 17/05/2011
Сообщений: 230
Re: Автозапуск Quik [re: Xynic]
      #353443 - 12/12/2011 21:08

Насчет навороченности скрипта..
Тут весь объем по сути (на AutoIt) засчет запуска по времени. Если нужен просто автозапуск, то у меня 15 строк получилось. Все работает.
Что касается С#. Пробовал на С# сделать обработку изменения файла, учитывая, что опыта практически никакого ни в C# ни в Autoit, день убил на то, что бы разобраться как отсечь лишнее событие, чтобы 2 раза моя функция не исполнялась, так и не победил. Поразбирался с AutoIt, все сделал, нормально работает. Проц и память не грузит, все ОК. Главное отличие и, так скажем, удобоперевариваемость AutoIt, лично для меня, в синтаксисе. Где там какие классы, методы, и прочее, переменные прописать так, чтобы в разных методах они работали - сходу не сделать. А в AutoIt все понятно, что не так, вэлком на форум, мне пояснили. Функционал пока устраивает. А чтобы запускался квик в нужное время, настроил свой тв тюнер, а скрипт скомпилировал в экзешник и кинул в автозагрузку. Конечно, понимаю, что может это слишком дуболомное решение, можно все сделать куда интеллигентнее, но для меня, как для НЕпрограммиста, результат достаточный.

--------------------
Успехов.


Опции: Распечатать пост   Напомнить мне!   Оповестить модератора  
Страниц в ветке: 1



Дополнительная информация
2 зарегистрированных и 0 незарегистрированных пользователей просматривает форум.

Модератор:  podval, EVM, x4x, 000, Akelo, Apprentice, shkolnik, TradingS, konkop, SGN, Socol, TopGuy, untoxa, VovaM, Asd, Igonter 

Распечатать тему

Доступ и ограничения:
      Вы не можете начать новую тему
      Вы не можете отвечать на тему
      HTML выключен
      UBBCode включён

Рейтинг: ***
Тема прочитана: 5936

Рейтинг темы

Перейти на

Send letter to Poul | Предупреждение Poul Trade Forum

Powered by UBB.threads™ 6.5.4

Generated in 0.035 seconds in which 0.005 seconds were spent on a total of 12 queries. Zlib compression enabled.