Уважаемые сторожилы и просто умные и знающие люди, нужна Ваша помощь!
Сколько же раз Вы это слышали: "Нужно, помогите и т.д...." )))
Постараюсь коротко но не уверен, что получится, т.к. профессионально сорее всего Вам не объясюу.
Есть торговый термина TRANSAQ и надоело каждый раз вводить логин и пароль. Цель автоматизировать данный процесс... Ниже окно входа в программу:
Рисунок 1
Запуск программы решил:
; Запуск TRANSAQ
; Run ("C:\Transaq\transaq.exe") - через эту команду не работает
ShellExecute ("C:\Transaq\transaq.exe" , "ЛОГИН ПАРОЛЬ", "C:\Transaq")
В процессе решил немного свой скрипт облагородить и немного помочь так же Коллегам в этом... Через ISN AutoIt Studio создал графический интерфейс:
Рисунок 2
В итоге получился такой код:
;*****************************************
;TRANSAQ_AutoLogin.au3
;*****************************************
;MsgBox(266288,"Вход в TRANSAQ","Ввведите логин и пароль для TRANSAQ",50)
;WinWaitActive ("Вход в TRANSAQ")
;Sleep(3000)
;WinClose ("Вход в TRANSAQ")
;MouseClick ("primary", 308, 13, 1, 0)
; Окно ввода логина и пароля;
#include-once
#include <StaticConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <EditConstants.au3>
$Form = GUICreate("Logo&Pass",540,340,-1,-1,$WS_POPUPWINDOW,BitOr($WS_EX_DLGMODALFRAME,$WS_EX_OVERLAPPEDWINDOW))
$Form_BGimage = GUICtrlCreatePic(@scriptdir&"\"&"Images\me2125201-stock-market-hd-a0240.jpg",0,0,540,340,$WS_CLIPSIBLINGS)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetResizing(-1,102)
GUICtrlCreateButton("Поехали!",210,295,130,30,$BS_MULTILINE,-1)
GUICtrlSetFont(-1,8,700,0,"Micra")
GUICtrlCreateInput("логин",60,140,150,20,-1,$WS_EX_CLIENTEDGE)
GUICtrlSetFont(-1,12,700,0,"Micra")
GUICtrlCreateInput("пароль",340,140,150,20,-1,$WS_EX_CLIENTEDGE)
GUICtrlSetFont(-1,12,700,0,"Micra")
GUICtrlCreateLabel("Вход в TRANSAQ",10,60,521,41,BitOr($SS_CENTER,$SS_NOTIFY),-1)
GUICtrlSetFont(-1,24,700,0,"Micra")
GUICtrlSetColor(-1,"0x4D6486")
GUICtrlSetBkColor(-1,"-2")
GUICtrlCreateCheckbox("Сохранить",20,305,111,20,-1,-1)
GUICtrlSetFont(-1,8,700,0,"Micra")
GUICtrlSetBkColor(-1,"-2")
; Запуск TRANSAQ
; Run ("C:\Transaq\transaq.exe")
ShellExecute ("C:\Transaq\transaq.exe" , "ЛОГИН ПАРОЛЬ", "C:\Transaq")
; Finished!
При запуске проекта, графический интерфейс не выводится, а сразу исполняется запуск программы... :'(
Помогите решить данную проблему и как можно еще потом решить вопрос по привязке Логина и Пароля из окна ввода в при входе программу и возможности сохранения/не сохранения пароля?
Сколько же раз Вы это слышали: "Нужно, помогите и т.д...." )))
Постараюсь коротко но не уверен, что получится, т.к. профессионально сорее всего Вам не объясюу.
Есть торговый термина TRANSAQ и надоело каждый раз вводить логин и пароль. Цель автоматизировать данный процесс... Ниже окно входа в программу:
Рисунок 1
Запуск программы решил:
; Запуск TRANSAQ
; Run ("C:\Transaq\transaq.exe") - через эту команду не работает
ShellExecute ("C:\Transaq\transaq.exe" , "ЛОГИН ПАРОЛЬ", "C:\Transaq")
В процессе решил немного свой скрипт облагородить и немного помочь так же Коллегам в этом... Через ISN AutoIt Studio создал графический интерфейс:
Рисунок 2
В итоге получился такой код:
;*****************************************
;TRANSAQ_AutoLogin.au3
;*****************************************
;MsgBox(266288,"Вход в TRANSAQ","Ввведите логин и пароль для TRANSAQ",50)
;WinWaitActive ("Вход в TRANSAQ")
;Sleep(3000)
;WinClose ("Вход в TRANSAQ")
;MouseClick ("primary", 308, 13, 1, 0)
; Окно ввода логина и пароля;
#include-once
#include <StaticConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <EditConstants.au3>
$Form = GUICreate("Logo&Pass",540,340,-1,-1,$WS_POPUPWINDOW,BitOr($WS_EX_DLGMODALFRAME,$WS_EX_OVERLAPPEDWINDOW))
$Form_BGimage = GUICtrlCreatePic(@scriptdir&"\"&"Images\me2125201-stock-market-hd-a0240.jpg",0,0,540,340,$WS_CLIPSIBLINGS)
GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetResizing(-1,102)
GUICtrlCreateButton("Поехали!",210,295,130,30,$BS_MULTILINE,-1)
GUICtrlSetFont(-1,8,700,0,"Micra")
GUICtrlCreateInput("логин",60,140,150,20,-1,$WS_EX_CLIENTEDGE)
GUICtrlSetFont(-1,12,700,0,"Micra")
GUICtrlCreateInput("пароль",340,140,150,20,-1,$WS_EX_CLIENTEDGE)
GUICtrlSetFont(-1,12,700,0,"Micra")
GUICtrlCreateLabel("Вход в TRANSAQ",10,60,521,41,BitOr($SS_CENTER,$SS_NOTIFY),-1)
GUICtrlSetFont(-1,24,700,0,"Micra")
GUICtrlSetColor(-1,"0x4D6486")
GUICtrlSetBkColor(-1,"-2")
GUICtrlCreateCheckbox("Сохранить",20,305,111,20,-1,-1)
GUICtrlSetFont(-1,8,700,0,"Micra")
GUICtrlSetBkColor(-1,"-2")
; Запуск TRANSAQ
; Run ("C:\Transaq\transaq.exe")
ShellExecute ("C:\Transaq\transaq.exe" , "ЛОГИН ПАРОЛЬ", "C:\Transaq")
; Finished!
При запуске проекта, графический интерфейс не выводится, а сразу исполняется запуск программы... :'(
Помогите решить данную проблему и как можно еще потом решить вопрос по привязке Логина и Пароля из окна ввода в при входе программу и возможности сохранения/не сохранения пароля?