Scribd
Upload
92 views

Autoit Help Excel

The document provides instructions and code for a login script in AutoIt. It begins with welcoming the user and pointing them to resources for functions like _Excel_RangeRead() and IE UDF examples. It then offers help for any problems and shares a login script code that includes GUI elements like labels, inputs, buttons and progress monitoring. The code verifies the login by comparing the username and password inputs to hardcoded values. The author then modifies the code to retrieve the username and password values from an external text file to allow adding and changing credentials more easily.

Uploaded by

BUKU PENGURUSAN
Copyright
© © All Rights Reserved
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
92 views

Autoit Help Excel

The document provides instructions and code for a login script in AutoIt. It begins with welcoming the user and pointing them to resources for functions like _Excel_RangeRead() and IE UDF examples. It then offers help for any problems and shares a login script code that includes GUI elements like labels, inputs, buttons and progress monitoring. The code verifies the login by comparing the username and password inputs to hardcoded values. The author then modifies the code to retrieve the username and password values from an external text file to allow adding and changing credentials more easily.

Uploaded by

BUKU PENGURUSAN
Copyright
© © All Rights Reserved
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
You are on page 1/ 2

Hi @shikherg and welcome to the AutoIt Forum.

From the AutoIt help file you should see this functions which are part of the Excel UDF:
_Excel_RangeRead()

And also if you are going to login to a website you need to look in to IE UDF
Examples and everything is on the help file.

After you try something and you got a problem you can publish here your problem and your code and we will help you.

Regards
Alien.

https://www.autoitscript.com/forum/topic/97418-simple-login-username-and-password/

To whom was the request of my login script is

How many sent me PM asking for my login script to program

then i decided post

My Script :

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>;
#include <EditConstants.au3>

ProgressOn("Load Program", "Open Program", "0%"); Just to let more beautiful


For $i = 10 To 100 Step 10
Sleep(1000)
ProgressSet($i, $i & "%")
Next
ProgressSet(100, "Full Load", "Complete")
Sleep(500)
ProgressOff()

$Form1 = GUICreate("Login", 400, 250, -1, -1); begining of Login


$PASSWORD = GUICtrlCreateInput("", 65, 167, 220, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$ButtonOk = GUICtrlCreateButton("&OK", 200, 220, 75, 25, 0)
$ButtonCancel = GUICtrlCreateButton("&Cancel", 280, 220, 75, 25, 0)
$passwordlabel = GUICtrlCreateLabel("Password:", 8, 172, 50, 17)
$usernamelabel = GUICtrlCreateLabel("Username:", 8, 143, 52, 17)
$USERNAME = GUICtrlCreateInput("", 65, 144, 220, 21)
GUICtrlCreateGroup('',10,2,380,100)
GUICtrlCreateLabel('Terms of use of this Software',30,10,340,18)
GUICtrlSetColor(-1, 0x0012FF)
GUICtrlSetFont(-1,12,400)
GUICtrlCreateLabel('To use this software to be Registered in Forum',30,28,340,18)
GUICtrlSetFont(-1,12,400)
GUICtrlCreateLabel('',30,46,340,18)
GUICtrlSetFont(-1,12,400)
GUICtrlCreateLabel('To open the program',30,64,340,18)
GUICtrlSetFont(-1,12,400)
GUICtrlCreateLabel('Team gOHc Thank you for your choice',30,82,340,18)
GUICtrlSetFont(-1,12,400)
GUICtrlCreateGroup('',-99,-99,1,1)
GUICtrlSetBkColor(-1,0x000000)
GUISetState(@SW_SHOW)

While 1
$MSG = GUIGetMsg()
Switch $MSG
Case $ButtonOk
If VerifyLogin(GUICtrlRead($USERNAME),GUICtrlRead($PASSWORD)) = 1 Then
GUIDelete($Form1)
MsgBox(-1,"Logado com Sucesso","Login Succ..")
RunP()

Else
MsgBox(-1,"Error"," Username ou Senha está incorreto, Tente denovo")
EndIf
Case -3
Exit
Case $ButtonCancel
Exit
EndSwitch
WEnd
Func VerifyLogin($USERNAME,$PASSWORD)
If $USERNAME = "your user here" And $PASSWORD = "your pass here" Then
Return 1
Else
Return 0
EndIf
EndFunc; End login

Func Runp()

;Your Code begining here


EndFunc

Func onautoitexit()
Exit
EndFunc ;==>onautoitexit

Yes, I modified my that the use, but more

Exemple:

http://yoursite.com/login.txt

File .txt

usuario|pass1

usuario2|pass2

Func VerifyLogin($USERNAME,$PASSWORD)
local $x = 1
Do
inetget("http://yoursite.com/login.txt",@systemdir & "/login.txt")
$login = filereadline(@systemdir & "/login.txt",$x)
$string = stringsplit($login,"|")
if $string[1] = $username and $string[2] = $password then
return 1
exitloop
Else
$x = $x + 1
Endif
if $login = "" then
return 0
exitloop
endif
until $x = $x + 1
EndFunc

You might also like