Доброго времени суток уважаемые пользователи данного проекта !
Будте любезны и прошу вашей помощи для написания программы авторизации + привязки к железу
Сейчас попробую правильно сформулировать свой вопрос и выложить мотив исходных кодов !
Прошу прощения если я ошибся разделом и настоятельно прошу модераторов и администраторов помочь а не удалять тему !
Вот что я хочу сделать , вылаживаю на скринах для того чтобы вы поняли
вот моё окно выглядит вот так :
и попробую нарисовать для того чтобы было понятно
Вот мой исходный код :
Мне нужно сделать чтобы тот емаил который я введу в окно вставлялся сюда
тот скрипт который сейчас работает даже если не вводить емаил потому что он забитый вручную
вот и ищу что нужно вписать чтобы вставляло тот текст который будет введён в окно !
Читал русский справочник и нашол что-то похожее
пробывал за место [email protected] вписывать $Input1 и '$Input1' тогда всегда выдаёт скрипт
тоест не правельный серийник
наверно он искал не емаил а сам текст $Input1 в файле Account.ini
Помогите пожалуйста люди добрые !! очень срочно !
На скрине я чучуть не правельно написал )) не MySite а MySute ... так что не обращайте внимание !
Будте любезны и прошу вашей помощи для написания программы авторизации + привязки к железу
Сейчас попробую правильно сформулировать свой вопрос и выложить мотив исходных кодов !
Прошу прощения если я ошибся разделом и настоятельно прошу модераторов и администраторов помочь а не удалять тему !
Вот что я хочу сделать , вылаживаю на скринах для того чтобы вы поняли
вот моё окно выглядит вот так :
и попробую нарисовать для того чтобы было понятно
Вот мой исходный код :
Код:
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <Constants.au3>
#include <Inet.au3>
#include <Misc.au3>
#Include <File.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <resources.au3>
#include <File.au3>
$Width = 425
$Height = 95
GUISetBkColor(0xFFFFFF)
$hGUI = GUICreate("", $Width, $Height, -1, -1, BitOR($WS_POPUP, $WS_BORDER))
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetCursor(-1, 0)
$Label1 = GUICtrlCreateLabel("Введите ваш регистрационный электронный адрес", 24, 8, 382, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("", 38, 32, 353, 24)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Button1 = GUICtrlCreateButton("Подтвердить", 23, 64, 76, 25)
$Button2 = GUICtrlCreateButton("Отмена", 100, 64, 73, 25)
$Button3 = GUICtrlCreateButton("Видео Настройки Point Blank", 205, 64, 200, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button3
Run(Config.exe)
Case $button2
Exit
Case $Button1
_ValidateSerial()
Func _ValidateSerial()
Local $Serial, $Temp = @TempDir & '\~snzrtqw.tmp'
If Not InetGet('http://mysite.ru/Account.ini', $Temp) Then
MsgBox(16, 'Ошибка', 'Не удалось проверить серийный номер. Проверьте подключение к интернет.')
Exit
EndIf
$Serial = IniRead($Temp, 'email', '[email protected]', '?')
FileDelete($Temp)
If DriveGetSerial('C:') <> $Serial Then
MsgBox(16, 'Ошибка', 'Серийный код диска С: не подошёл !')
Exit
EndIf
EndFunc ;==>_ValidateSerial
Run(1.exe)
EndSwitch
WEnd
Мне нужно сделать чтобы тот емаил который я введу в окно вставлялся сюда
Код:
$Serial = IniRead($Temp, 'email', ' Емаил который я введу в окно ! ', '?')
тот скрипт который сейчас работает даже если не вводить емаил потому что он забитый вручную
вот и ищу что нужно вписать чтобы вставляло тот текст который будет введён в окно !
Читал русский справочник и нашол что-то похожее
пробывал за место [email protected] вписывать $Input1 и '$Input1' тогда всегда выдаёт скрипт
Код:
MsgBox(16, 'Ошибка', 'Серийный код диска С: не подошёл !')
наверно он искал не емаил а сам текст $Input1 в файле Account.ini
Помогите пожалуйста люди добрые !! очень срочно !
На скрине я чучуть не правельно написал )) не MySite а MySute ... так что не обращайте внимание !