3dude Posted April 6, 2008 Share Posted April 6, 2008 Hello guys how are you I want to make a progam which does this: You enter website user pass and for example save and it saves them in an ini file and the other time you run the program and search in the search tab it finds for exaplme yahoo.com.... you understand me... (I only want the code with the saving and reading thing not the whole porgram!I know how to make the GUI and buttons) Thanks View my blog :) 3dude's blog <= help with project :S Link to comment Share on other sites More sharing options...
d4rk Posted April 6, 2008 Share Posted April 6, 2008 (edited) _IECreat() _IEFormGetObjByName _IEFormElementGetObjByName _IEFormElementSetValue IniWrite() IniRead() Edited April 6, 2008 by d4rk [quote]Don't expect for a perfect life ... Expect a least troubles ones[/quote]Contact me : ass@kiss.toWhat I Have Done :Favorites Manager Mangage your favorite's folder, that's coolPC Waker For those who want to save stickersWebScipts Supporter For those who've just started with Web and WebScriptsTemporary Looker Simple but powerful to manage your Temporary folder, you know what you downloaded[UDF] _NumberFormat() Better performance on number display[UDF] _DirGet() What a folder contain [how many (hidden,normal,...) files], with one line of code[UDF] _IsPressEs() Just like _IsPress() but for a group of keys Link to comment Share on other sites More sharing options...
3dude Posted April 6, 2008 Author Share Posted April 6, 2008 (edited) thanks I made my program save the website(section) User(key) And Pass(default) but i can't make it search for it and enter it in an inpurbox I want to make it do that: You save website user pass(already done that) and when you tipe in the website in a inputobx and press find it searches the ini finds website(section) and enters the User(key) And Pass(default) in other two inpu boxes Please Help If you have some better ides please tell them! Thanks -- Or maybe 2 tabs enter and database and the database tab is filled with all the info from the ini Edited April 6, 2008 by 3dude View my blog :) 3dude's blog <= help with project :S Link to comment Share on other sites More sharing options...
3dude Posted April 7, 2008 Author Share Posted April 7, 2008 nobody knows?? View my blog :) 3dude's blog <= help with project :S Link to comment Share on other sites More sharing options...
LIMITER Posted April 7, 2008 Share Posted April 7, 2008 This is a function which logs you in yahoo mail : Hope it helps you Func check($id,$pass) $ie = _IECreate("http://mail.yahoo.com") $hwnd = _IEPropertyGet($ie, "hwnd") $oForm = _IEFormGetObjByName($ie, "login_form") $oId = _IEFormElementGetObjByName($oForm, "login") $oPass = _IEFormElementGetObjByName($oForm, "passwd") $idt = $id $passt = $pass _IELinkClickByText($ie, "Sign Out") _IEAction($oId, "focus") Sleep(250) ControlSend($hwnd, "", "Internet Explorer_Server1", $idt) _IEAction($oPass, "focus") Sleep(250) ControlSend($hwnd, "", "Internet Explorer_Server1", $passt) ControlSend($hwnd, "", "Internet Explorer_Server1", "{ENTER}") _IELoadWait($ie) Endfunc Link to comment Share on other sites More sharing options...
3dude Posted April 7, 2008 Author Share Posted April 7, 2008 no i doesn't help me! but thanks I tried another thing! When you press Add(website pass..) It fills the ini file and a list in the gui but i cant fill the list and save it the other time the proglam load! Please help View my blog :) 3dude's blog <= help with project :S Link to comment Share on other sites More sharing options...
Madza91 Posted April 7, 2008 Share Posted April 7, 2008 (edited) Here we go, i maded some example for you expandcollapse popup#include <GUIConstants.au3> $inifile = @DesktopDir & "\info.ini" $add = 0 $gui = GUICreate("Form1", 282, 270, -1, -1) $List1 = GUICtrlCreateList("", 16, 16, 249, 201) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Button1 = GUICtrlCreateButton("Add >", 16, 232, 75, 25, 0) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Button2 = GUICtrlCreateButton("Edit >", 104, 232, 75, 25, 0) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Button3 = GUICtrlCreateButton("Delete", 192, 232, 75, 25, 0) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Group1 = GUICtrlCreateGroup("Add new", 16, 272, 249, 113) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Label1 = GUICtrlCreateLabel("Website:", 32, 308, 46, 17) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Label2 = GUICtrlCreateLabel("Username:", 32, 332, 55, 17) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Label3 = GUICtrlCreateLabel("Label3", 32, 356, 36, 17) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $1 = GUICtrlCreateInput("", 88, 304, 161, 21) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $2 = GUICtrlCreateInput("Demo", 88, 328, 161, 21) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $3 = GUICtrlCreateInput("Demo", 88, 352, 161, 21) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) $Button4 = GUICtrlCreateButton("OK", 16, 392, 251, 25, 0) GUICtrlSetResizing(-1,$GUI_DOCKTOP+$GUI_DOCKSIZE+$GUI_DOCKLEFT) GUISetState(@SW_SHOW) _IniGetSectionNames() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 if $add = 0 Then $add = 1 GUICtrlSetData($Button1,"Add <") $wpm = WinGetPos($gui) WinMove($gui,"",$wpm[0],$wpm[1],$wpm[2],$wpm[3]+156) Else GUICtrlSetData($Button1,"Add >") $add = 0 $wpm = WinGetPos($gui) WinMove($gui,"",$wpm[0],$wpm[1],$wpm[2],$wpm[3]-156) EndIf Case $Button4 $1a = GUICtrlRead($1) GUICtrlSetData($List1,$1a) IniWrite($inifile,$1a,"1","Username") EndSwitch WEnd Func _IniGetSectionNames() $varx = IniReadSectionNames($inifile) If @error Then Exit Else For $x = 1 To $varx[0] _IniReadInfo($varx[$x]) Next EndIf EndFunc ;==>_IniGetSectionNames Func _IniReadInfo($sSection) $var = IniReadSection($inifile, $sSection) If @error Then Exit Else GUICtrlSetData($List1,$sSection) EndIf EndFunc ;==>_IniReadInfo Edited April 7, 2008 by n3nE [quote name='dbzfanatic' post='609696' date='Nov 26 2008, 08:46 AM']This is a help forum not a "write this for me" forum.[/quote](Sorry for bad English) :) Link to comment Share on other sites More sharing options...
3dude Posted April 8, 2008 Author Share Posted April 8, 2008 Thanks a lot View my blog :) 3dude's blog <= help with project :S Link to comment Share on other sites More sharing options...
Madza91 Posted April 8, 2008 Share Posted April 8, 2008 [quote name='dbzfanatic' post='609696' date='Nov 26 2008, 08:46 AM']This is a help forum not a "write this for me" forum.[/quote](Sorry for bad English) :) Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now