|
You last visited: Today at 02:26
Advertisement
problem ini read ican't understand
Discussion on problem ini read ican't understand within the AutoIt forum part of the Coders Den category.
04/29/2016, 23:06
|
#1
|
elite*gold: 0
Join Date: Oct 2013
Posts: 6
Received Thanks: 0
|
problem ini read ican't understand
i have problem. i want to check $input if match in username in ini.
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListView.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <Array.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Login NEOW", 270, 112, 192, 124)
$Input1 = GUICtrlCreateInput("Email", 24, 40, 121, 21)
$Button1 = GUICtrlCreateButton("Login", 160, 16, 99, 49)
$Label1 = GUICtrlCreateLabel("", 24, 72, 147, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Func readuser()
$accinfo="https://www.dropbox.com/s/q9xfiiu6amahdvj/Username.ini"
$Ini = InetGet($accInfo,@ScriptDir & "\username.ini") ;download version.ini
$sRead = IniRead(@ScriptDir & "\username.ini", "username", "username", "")
Local $user = GUICtrlRead($input1)
If $user = $sread Then
Exit
Else
MsgBox(64,"Register","Register pls")
EndIf
FileDelete(@ScriptDir & "\username.ini")
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button1
readuser()
EndSwitch
WEnd
Username.ini
[username]
username=1234
if me write 1234 in inputbox and check it tell me register that.
can anyone can tell me what that wrong?
And can expand that function iniread please.
sorry for my bad english dude
|
|
|
04/30/2016, 00:08
|
#2
|
elite*gold: 400
Join Date: Jun 2011
Posts: 513
Received Thanks: 101
|
Try this:
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Login", 248, 121, 661, 422)
$input_username = GUICtrlCreateInput("Username", 23, 21, 201, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER))
$input_password = GUICtrlCreateInput("Password", 23, 48, 201, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER))
$button_login = GUICtrlCreateButton("Login", 23, 76, 201, 23)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button_login
_Read_User()
EndSwitch
WEnd
Func _Read_User()
$iniRead_username = IniRead("info.ini", "Account", "User1", "")
$iniRead_password = IniRead("info.ini", "Account", "Pass1", "")
Local $user = GUICtrlRead($input_username)
Local $pass = GUICtrlRead($input_password)
If $user = $iniRead_username And $pass = $iniRead_password Then
MsgBox(0, "", "Correnct Username & Password")
ElseIf $user = $iniRead_username And $pass <> $iniRead_password Then
MsgBox(0, "", "Correct Username but wrong Password")
ElseIf $user <> $iniRead_username And $pass = $iniRead_password Then
MsgBox(0, "", "Wrong Username but correct Password")
ElseIf $user <> $iniRead_username And $pass <> $iniRead_password Then
MsgBox(0, "", "Wrong Username & Password")
EndIf
EndFunc
|
|
|
04/30/2016, 03:57
|
#3
|
elite*gold: 138
Join Date: Apr 2012
Posts: 3,495
Received Thanks: 1,769
|
Quote:
$Ini = InetGet($accInfo,@ScriptDir & "\username.ini") ;download version.ini
|
This is your problem. If you access the website , dropbox doesn't directly return you the file. So INetGet downloads you the source code of the page. Either you manage to click on the download button or upload your file somewhere else where you can download it from the url. Though it isn't smart to write down passwords in plain text and make it available for everyone. What do you need the login for?
|
|
|
04/30/2016, 11:36
|
#4
|
elite*gold: 0
Join Date: Oct 2013
Posts: 6
Received Thanks: 0
|
Quote:
Originally Posted by Moneypulation
This is your problem. If you access the website , dropbox doesn't directly return you the file. So INetGet downloads you the source code of the page. Either you manage to click on the download button or upload your file somewhere else where you can download it from the url. Though it isn't smart to write down passwords in plain text and make it available for everyone. What do you need the login for?
|
i try this before i complete my database.
Quote:
Originally Posted by °Incinerate
Try this:
Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Login", 248, 121, 661, 422)
$input_username = GUICtrlCreateInput("Username", 23, 21, 201, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER))
$input_password = GUICtrlCreateInput("Password", 23, 48, 201, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER))
$button_login = GUICtrlCreateButton("Login", 23, 76, 201, 23)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button_login
_Read_User()
EndSwitch
WEnd
Func _Read_User()
$iniRead_username = IniRead("info.ini", "Account", "User1", "")
$iniRead_password = IniRead("info.ini", "Account", "Pass1", "")
Local $user = GUICtrlRead($input_username)
Local $pass = GUICtrlRead($input_password)
If $user = $iniRead_username And $pass = $iniRead_password Then
MsgBox(0, "", "Correnct Username & Password")
ElseIf $user = $iniRead_username And $pass <> $iniRead_password Then
MsgBox(0, "", "Correct Username but wrong Password")
ElseIf $user <> $iniRead_username And $pass = $iniRead_password Then
MsgBox(0, "", "Wrong Username but correct Password")
ElseIf $user <> $iniRead_username And $pass <> $iniRead_password Then
MsgBox(0, "", "Wrong Username & Password")
EndIf
EndFunc
|
Thank you
|
|
|
|
Similar Threads
|
Looking for classic oldschool server -read to understand what mean oldschool !
05/22/2015 - SRO PServer Advertising - 9 Replies
Oldschool mean -
1st - 80-90-100 cap
2nd - old guild community if u remmember it from iSro
3rd - old alchemy look.
4th - old item mall.
5th - old glow of items ! not updated shits.
If u find any server even with 10 players online tell me about it I would be glad ot join in servers like those not new shits !:):):):):):):):):):):)
|
Help I can not understand what the problem is
10/21/2012 - Rappelz Private Server - 1 Replies
Game opt
S app.name:game001
S auth.server_idx:1
S auth.server_name:Test
S db.game.ip:127.0.0.1
S db.c._password:
S db.c.account:sa
S db.c.name:Arcadia
S db.c.server:127.0.0.1
|
ICAN SEE Wsadsadnodfanofdaonkfndkl
06/30/2012 - Trading - 1 Replies
saddhbdsbhivbibivjnkduhnunoiad WHAT DAFUQ!"§=121 3201´03ß812 480 4
das bin ixcg
|
Problem(Warning no german because i can't understand it)
02/21/2011 - S4 League - 4 Replies
Sorry its long and boring but i can't do anything about for the impatient people.
:rtfm::mofo::D:mofo::rtfm: afros are protecting smiley dude
I was just wondering if there would exist a working ghost mode hack that doesnt give me a dynamic string table error / making me fall through the floor because ingame i saw alot of people walking through walls and i just fall through the floor in office map.(im talking about zblock's hack here)
In the td (not most...
|
hello i dont understand the language so that i cant read the instruction
11/23/2010 - CrossFire - 9 Replies
can you translate it to english because i want a wallhack to use ASAP
|
All times are GMT +2. The time now is 02:26.
|
|