Jump to content

A Panel


Ibrahim
 Share

Recommended Posts

#NoTrayIcon
#Region;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=wrong.ico
#AutoIt3Wrapper_outfile=..\1111.exe
#AutoIt3Wrapper_Allow_Decompile=n
#AutoIt3Wrapper_Res_Description=Application By Ibrahim Ghorabah
#AutoIt3Wrapper_Res_Fileversion=3.1.0.0
#AutoIt3Wrapper_Res_LegalCopyright=This Is Ibrahim Ghorabah Program
#AutoIt3Wrapper_Res_Language=1033
#EndRegion;**** Directives created by AutoIt3Wrapper_GUI ****
#include <IE.au3>
#include <GUIConstants.au3>
_IEErrorHandlerRegister ()
$oIE = _IECreateEmbedded ()
$WholeWidth = @DesktopWidth - 50
$includedWidth = $WholeWidth - 20

Global $Button[46], $Expand[9]
$gui = GUICreate ("My Control Center", $WholeWidth, 520, -1, -1, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
GUISetState (@SW_HIDE) 
$background = GUICtrlCreatePic ("prog.cap", 0, 0, 0, 0)
$Label_1 = GUICtrlCreateLabel ("Operation In Progress", 30, 31, 201, 215)
$Button[1] = GUICtrlCreateButton ("&Search it.!", 10, 400, 100, 25)
$Button[2] = GUICtrlCreateButton ("&Forums", 10, 430, 100, 25)
$Button[3] = GUICtrlCreateButton ("&Link it. .!", 10, 460, 100, 25)
$Button[4] = GUICtrlCreateButton ("Programming", 115, 400, 100, 25)
$Button[5] = GUICtrlCreateButton ("&Network", 115, 430, 100, 25)
$Button[6] = GUICtrlCreateButton ("&Email Check", 115, 460, 100, 25)
$Button[7] = GUICtrlCreateButton ("&Messenger", 220, 400, 100, 25)
$Button[8] = GUICtrlCreateButton ("&Office", 220, 430, 100, 25)
$Button[9] = GUICtrlCreateButton ("Check Mail.", 220, 460, 100, 25)
$Button[10] = GUICtrlCreateButton ('IMDB', 115, 400, 50, 25)
$Button[11] = GUICtrlCreateButton ('SubS.', 170, 400, 50, 25)
$Button[12] = GUICtrlCreateButton ('Yahoo!', 225, 400, 50, 25)
$Button[13] = GUICtrlCreateButton ('Torrent', 280, 400, 50, 25)
$Button[14] = GUICtrlCreateButton ('Autoit', 115, 430, 50, 25)
$Button[15] = GUICtrlCreateButton ('Andr', 170, 430, 50, 25)
$Button[16] = GUICtrlCreateButton ('Systern', 225, 430, 50, 25)
$Button[17] = GUICtrlCreateButton ('Live.@', 280, 430, 50, 25)
$Button[18] = GUICtrlCreateButton ('IE', 115, 460, 50, 25)
$Button[19] = GUICtrlCreateButton ('Ftp_E', 170, 460, 50, 25)
$Button[20] = GUICtrlCreateButton ('Ftp_c', 225, 460, 50, 25)
$Button[21] = GUICtrlCreateButton ('TelNet', 280, 460, 50, 25)
$Button[22] = GUICtrlCreateButton ('Browse', 220, 400, 50, 25)
$Button[23] = GUICtrlCreateButton ('Compile', 275, 400, 50, 25)
$Button[24] = GUICtrlCreateButton ('Edit', 330, 400, 50, 25)
$Button[25] = GUICtrlCreateButton ('Tidy', 385, 400, 50, 25)
$Button[26] = GUICtrlCreateButton ('P_GWay', 220, 430, 50, 25)
$Button[27] = GUICtrlCreateButton ('P_Web', 275, 430, 50, 25)
$Button[28] = GUICtrlCreateButton ('Sniff', 330, 430, 50, 25)
$Button[29] = GUICtrlCreateButton ('Capture', 385, 430, 50, 25)
$Button[30] = GUICtrlCreateButton ('Aplay 1', 220, 460, 50, 25)
$Button[31] = GUICtrlCreateButton ('Aplay 2', 275, 460, 50, 25)
$Button[32] = GUICtrlCreateButton ('Aplay 3', 330, 460, 50, 25)
$Button[33] = GUICtrlCreateButton ('Aplay 4', 385, 460, 50, 25)
$Button[34] = GUICtrlCreateButton ('&Yahoo', 325, 400, 50, 25)
$Button[35] = GUICtrlCreateButton ('M&SN', 380, 400, 50, 25)
$Button[36] = GUICtrlCreateButton ('&Gmail', 435, 400, 50, 25)
$Button[37] = GUICtrlCreateButton ('&Web', 490, 400, 50, 25)
$Button[38] = GUICtrlCreateButton ('Word', 325, 430, 50, 25)
$Button[39] = GUICtrlCreateButton ('Excel', 380, 430, 50, 25)
$Button[40] = GUICtrlCreateButton ('Access', 435, 430, 50, 25)
$Button[41] = GUICtrlCreateButton ('P.Point', 490, 430, 50, 25)
$Button[42] = GUICtrlCreateButton ('Yahoo', 325, 460, 50, 25)
$Button[43] = GUICtrlCreateButton ('Hotmail', 380, 460, 50, 25)
$Button[44] = GUICtrlCreateButton ('Gmail', 435, 460, 50, 25)
$Button[45] = GUICtrlCreateButton ('Maktoob', 490, 460, 50, 25)
$DelTemp = GUICtrlCreateButton ('Empty Brwosing History', 550, 400, 200, 25)
$DelTemp = GUICtrlCreateButton ('MsConfig', 550, 430, 200, 25)
$DelTemp = GUICtrlCreateButton ('Control Panel', 550, 460, 200, 25)
$DelTemp = GUICtrlCreateButton ('MsConfig', 550, 490, 200, 25)

$GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
$Topic = GUICtrlCreateInput ("", 10, 490, 530, 20)
;GUICtrlSetColor ($Button[1], 0xff0000)
GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
For $p = 10 To 45
    GUICtrlSetState ($Button[$p], $GUI_HIDE + $GUI_DISABLE)
Next
GUISetState (@SW_SHOW)
$oldclip=""
While 1
    IF $Topic() <> "" and $oldclip<> ClipGet() Then
        $oldclip=ClipGet()
        GUICtrlSetData($Topic,ClipGet())
    EndIf   
        
    
    $msg = GUIGetMsg ()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $Button[1]
            GUICtrlSetData ($Label_1, 'Movie Search')
            $searchstr=StringReplace(GUICtrlRead($Topic),"."," ")
            $searchstr=StringReplace($searchstr,"-"," ")
            $searchstr=StringReplace($searchstr,"<"," ")
            $searchstr=StringReplace($searchstr,"("," ")
            $searchstr=StringReplace($searchstr,")"," ")
            $searchstr=StringReplace($searchstr,"["," ")
            $searchstr=StringReplace($searchstr,"]"," ")
            $searchstr=StringReplace($searchstr,"-"," ")
            $searchstr=StringReplace($searchstr,"_"," ")
            $searchstr=StringReplace($searchstr,"AC3","")
            $searchstr=StringReplace($searchstr,"XViD","")  
            $searchstr=StringReplace($searchstr,"2006","")
            $searchstr=StringReplace($searchstr," avi","")  
            $searchstr=StringReplace($searchstr," ENG ","")
            $searchstr=StringReplace($searchstr,"aXXo","")
            $searchstr=StringReplace($searchstr,"DvDrip","")
            $searchstr=StringReplace($searchstr,"  "," ")
            $searchstr=StringReplace($searchstr,"   "," ")

            GUICtrlSetData($Topic,$searchstr)
            Expand(0, 10, 13)
        Case $msg = $DelTemp
            run("RunDll32.exe "&"InetCpl.cpl,ClearMyTracksByProcess 4351")
        Case $msg = $Button[2]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail")
            Expand(1, 14, 17)
        Case $msg = $Button[3]
            GUICtrlSetData ($Label_1, 'Movie Search')
            $searchstr=StringReplace(GUICtrlRead($Topic)," ",".")
;~          StringInStr ( $searchstr, "com")+StringInStr ( $searchstr, "com")+StringInStr ( $searchstr, "com")=0 Then
            
            GUICtrlSetData($Topic,$searchstr)
            GUICtrlSetData ($Label_1, "Last Button Pressed: Messenger")
            Expand(2, 18, 21)
        Case $msg = $Button[4]
            GUICtrlSetData ($Label_1, "Last Button Pressed: C++")
            Expand(3, 22, 25)
        Case $msg = $Button[5]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite")
            Expand(4, 26, 29)
        Case $msg = $Button[6]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Autoplay")
            Expand(5, 30, 33)
        Case $msg = $Button[7]
            GUICtrlSetData ($Label_1, "Last Button Pressed: MessengerX")
            Expand(6, 34, 37)
        Case $msg = $Button[8]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Office")
            Expand(7, 38, 41)
        Case $msg = $Button[9]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Check Mail")
            Expand(8, 42, 45)
    ;______________________________________________Web Search__________________________________________
        Case $msg = $Button[10]
            
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Internet Movie Database")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://www.imdb.com/find?s=all&q=" & GUICtrlRead ($Topic), 0)
    ;_IECreate ("http://www.imdb.com/find?s=all&q="&GUICtrlRead($Topic),0,1,0)
        Case $msg = $Button[11]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Yahoo Movies")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://subscene.com/subtitlesearch.aspx?title=" & GUICtrlRead ($Topic), 0)
    ;_IECreate ("http://movies.yahoo.com/mv/search?p="&GUICtrlRead($Topic)&"&fr=Dtk-tab-web-t&toggle=1&cop=&ei=UTF-8",0,1,0)
        Case $msg = $Button[12]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Web Searching using yahoo Search Engine")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://search.yahoo.com/search?p=" & GUICtrlRead ($Topic) & "&fr=yfp-t-501&toggle=1&cop=mss&ei=UTF-8", 0)
    ;_IECreate ("http://search.yahoo.com/search?p="&GUICtrlRead($Topic)&"&fr=yfp-t-501&toggle=1&cop=mss&ei=UTF-8",0,1,0)
        Case $msg = $Button[13]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Web Searching using Google Search Engine")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            $torrentName=StringReplace(GUICtrlRead ($Topic)," ","+")
            _IENavigate ($oIE, "http://www.isohunt.com/torrents/?iht=-1&ihq="&$torrentName,0)
    ;_IENavigate ($oIE, "http://www.google.com.eg/search?hl=ar&q=" & GUICtrlRead ($Topic) & "&btnG=%D8%A8%D8%AD%D8%AB+Google%E2%80%8F&meta=", 0)
    ;_IECreate ("http://www.google.com.eg/search?hl=ar&q="&GUICtrlRead($Topic)&"&btnG=%D8%A8%D8%AD%D8%AB+Google%E2%80%8F&meta=",0,1,0)
    ;_________________________________________________Forums_________________________________________

________
        Case $msg = $Button[14]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://www.autoitscript.com/forum/index.php?", 0)
            
        Case $msg = $Button[15]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://forum.andr.net", 0)
        Case $msg = $Button[16]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://forum.sysinternals.com", 0)
        Case $msg = $Button[17]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://www.lifehacker.com", 0)
    ;------------------------------------------------Link It . . . .!-----------------------------
        Case $msg = $Button[18]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, GUICtrlRead ($Topic), 0)
        Case $msg = $Button[19]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, GUICtrlRead ($Topic), 0)
        Case $msg = $Button[20]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE,"Ftp "&GUICtrlRead ($Topic), 0)
        Case $msg = $Button[21]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE,"Telnet "&GUICtrlRead ($Topic), 0)
        Case $msg = $Button[22]
    ;-----------------------------------------------Programming-----------------------
            GUICtrlSetData ($Label_1, "Last Button Pressed: Browse")
        Case $msg = $Button[23]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Compile")
        Case $msg = $Button[24]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Edit")
        Case $msg = $Button[25]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Tidy")
        Case $msg = $Button[26]
    ;------------------------------------------
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 1")
        Case $msg = $Button[27]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 2")
        Case $msg = $Button[28]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 3")
        Case $msg = $Button[29]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Scite 4")
    ;----------------------------------------------
        Case $msg = $Button[30]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 1")
        Case $msg = $Button[31]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 2")
        Case $msg = $Button[32]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 3")
        Case $msg = $Button[33]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Aplay 4")
    ;-----------------------------------------------------Messenger------------------------------------
        Case $msg = $Button[34]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Yahoo")
            run (@ProgramFilesDir & "\Yahoo!\Messenger\YahooMessenger.exe")
            WinWaitActive ("Yahoo! Messenger", "YLoginWnd")
            Sleep (500)
            Send ("me")
            Send ("{tab}")
            Send ("pwwd")
            Send ("{enter}")
            
        Case $msg = $Button[35]
            GUICtrlSetData ($Label_1, "Last Button Pressed: MSN")
            run (@ProgramFilesDir & "\MSN Messenger\msnmsgr.exe")
            WinWaitActive ("Windows Live Messenger", "")
            Sleep (500)
            Send ("me@msn.com")
            Send ("{tab}")
            Send ("pwwd")
            Send ("{enter}")
            
        Case $msg = $Button[36]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Gmail")
            run (@ProgramFilesDir & "\Google\Google Talk\googletalk.exe")
            WinWaitActive ("Google Talk", "@main")
            Sleep (500)
            Send ("pwwd")
            Send ("{enter}")
            
        Case $msg = $Button[37]
        GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://www.ebuddy.com/", 0)
            
;-----------------------------------------------------------------------------------------------            
        Case $msg = $Button[38]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Last Button Pressed: MYahoo")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "G:\ibrahimat\SS.SWF", 0)
            
        Case $msg = $Button[39]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Excel")
        Case $msg = $Button[40]
            GUICtrlSetData ($Label_1, "Last Button Pressed: Access")
        Case $msg = $Button[41]
            GUICtrlSetData ($Label_1, "Last Button Pressed: P.Point")
    ;-----------------------------------------------------------Mail Check------------------------------------
        Case $msg = $Button[42]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Last Button Pressed: MYahoo")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "http://msg.edit.yahoo.com/config/reset_cookies?&.y=Y%3dv%3d1%26n%3d6bad3dlbrsu1f%26l%3d1e1kisqqu/o%26p%3dm2ivveg313000900%26jb%3d30%7c129%7c%26iz%3d31111%26r%3d99%26lg%3den-US%26intl%3dus%26np%3d1%3b%20path%3d/%3b%20domain%3d.yahoo.com&.t=T%3dz%3dv5h5GBv/25GB.2gJbyp6b9yNDFPBjY2NzUwTjUzMDE-%26a%3dQAE%26sk%3dDAAQl4h.Grz.F4%26d%3dc2wBTXpZNEFURXhNREkzT1RJME56WS0BYQFRQUUBenoBdjVoNUdCZ1dBAXRpcAEuY29hMEE-%3b%20path%3d/%3b%20domain%3d.yahoo.com&.ver=2&.done=http://us.rd.yahoo.com/messenger/client/%3fhttp://mail.yahoo.com/", 0)
            _IELoadWait($oIE)
            $o_form = _IEFormGetObjByName ($oIE, Chr(34)&"yreglgtb"&Chr(34))
            $o_login = _IEFormElementGetObjByName ($o_form, "username")
            $o_password = _IEFormElementGetObjByName ($o_form, "passwd")
            $o_signin = _IEFormElementGetObjByName ($o_form, Chr(34)&".save"&Chr(34))
            $username = "mail@yahoo.com"
            $password = "pwwd"
              _IEFormElementSetValue ($o_login, $username)
            _IEFormElementSetValue ($o_password, $password)
            _IEAction ($o_signin, "click")
            
        Case $msg = $Button[43]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Last Button Pressed: MHotmail")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "HTTP://WWW.HOTMAIL.COM", 0)
            _IELoadWait($oIE)
            $o_form = _IEFormGetObjByName ($oIE, "f1")
            $o_login = _IEFormElementGetObjByName ($o_form, "login")
            $o_password = _IEFormElementGetObjByName ($o_form, "passwd")
            $o_signin = _IEFormElementGetObjByName ($o_form, "SI")
            $username = "your mail@hotmail.com"
            $password = "yourpassword"
              _IEFormElementSetValue ($o_login, $username)
            _IEFormElementSetValue ($o_password, $password)
            _IEAction ($o_signin, "click")



        Case $msg = $Button[44]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Last Button Pressed: MGmail")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "HTTP://WWW.GMAIL.COM", 0)
        Case $msg = $Button[45]
            GUICtrlSetState ($GUIActiveX, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetData ($Label_1, "Last Button Pressed: MMaktoob")
            GUICtrlSetState ($Label_1, $GUI_HIDE + $GUI_DISABLE)
            GUICtrlSetState ($background, $GUI_HIDE + $GUI_DISABLE)
            $GUIActiveX = GUICtrlCreateObj ($oIE, 10, 31, $includedWidth, 360)
            _IENavigate ($oIE, "HTTP://WWW.MAKTOOB.COM", 0)
    EndSelect
WEnd

Func Expand($0, $1, $2)
    $y = ''
    If $0 = 0 Or $0 = 3 Then $y = 400
    If $0 = 1 Or $0 = 4 Then $y = 430
    If $0 = 2 Or $0 = 5 Then $y = 460
    If $Expand[$0] = 0 Then
        If $Expand[0] = 1 Then Expand(0, 10, 13)
        If $Expand[1] = 1 Then Expand(1, 14, 17)
        If $Expand[2] = 1 Then Expand(2, 18, 21)
        If $Expand[3] = 1 Then Expand(3, 22, 25)
        If $Expand[4] = 1 Then Expand(4, 26, 29)
        If $Expand[5] = 1 Then Expand(5, 30, 33)
        If $Expand[6] = 1 Then Expand(6, 34, 37)
        If $Expand[7] = 1 Then Expand(7, 38, 41)
        If $Expand[8] = 1 Then Expand(8, 42, 45)
        $Expand[$0] = 1
        $x = 275
        For $s = $1 To $2
            GUICtrlSetState ($Button[$s], $GUI_ENABLE + $GUI_SHOW)
            If $0 = 0 Or $0 = 1 Or $0 = 2 Then
                GUICtrlSetPos ($Button[$0 + 4], $x - 105, $y, 100, 25)
                GUICtrlSetPos ($Button[$0 + 7], $x, $y, 100, 25)
            ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then
                GUICtrlSetPos ($Button[$0 + 4], $x, $y, 100, 25)
            EndIf
            $x = $x + 55
            Sleep (50)
        Next
    ElseIf $Expand[$0] = 1 Then
        $Expand[$0] = 0
        $x = 385
        For $s = $2 To $1 Step - 1
            GUICtrlSetState ($Button[$s], $GUI_HIDE + $GUI_DISABLE)
            If $0 = 0 Or $0 = 1 Or $0 = 2 Then
                GUICtrlSetPos ($Button[$0 + 4], $x - 105, $y, 100, 25)
                GUICtrlSetPos ($Button[$0 + 7], $x, $y, 100, 25)
            ElseIf $0 = 3 Or $0 = 4 Or $0 = 5 Then
                GUICtrlSetPos ($Button[$0 + 4], $x, $y, 100, 25)
            EndIf
            $x = $x - 55
            Sleep (50)
        Next
    EndIf
EndFunc ;==>Expand

Thanks Generator. . .Sorry for not seeing it!

not quite finished though,but check out the moving buttons kind of cool thing,and the autopaste into the text box is quite nice and usefull, the paste is then processed to remove any appendicies when u press the search button,hope it works at ur side,Ant yet again I"M NOT A SPAMMER

Porg.cap is a photo just hidden behind a name"The sould behind the face quiet a scorpion hit"

Prog.rar

Edited by GaryFrost
changed code tags
Link to comment
Share on other sites

sorry for the douple code it was stupid thing by my browser,Though it's my fault<--------Check out my mails and my passwords, :P

Link to comment
Share on other sites

like i said it was a double paste the original is tagged above

Go back to the bottom of your first post. Do you see an Edit Button?

Further directions can be provided on request.

George

Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.

Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.***

The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number.

Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else.

"Old age and treachery will always overcome youth and skill!"

Link to comment
Share on other sites

can you use [ autoit] tags please

8)

Those tags have been so screwed up that I quit using them a long time ago. If it ever gets back to the point where I can just click the AutoIt tag button again, then I'll go back to using it. Although I don't like syntax hilighting anyway. :P

George

Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.

Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.***

The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number.

Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else.

"Old age and treachery will always overcome youth and skill!"

Link to comment
Share on other sites

Those tags have been so screwed up that I quit using them a long time ago. If it ever gets back to the point where I can just

click the AutoIt tag button again, then I'll go back to using it. Although I don't like syntax hilighting anyway. :P

It can't possibly that hard to type [autoit ] two times you don't need a button it makes it easier for us to try out your script.

[quote name='PsaltyDS' post='635433' date='Jan 27 2009, 07:04 AM']Larry is a mass murderer?! It's always the quiet, clean cut, bald guys... [/quote]

Link to comment
Share on other sites

It can't possibly that hard to type [autoit ] two times you don't need a button it makes it easier for us to try out your script.

Not doing it!

I just make sure that I have it indented before I add the post. I'm just not impressed with Crayola code. Never have liked it and I turn off hilighting in all editors.

George

Question about decompiling code? Read the decompiling FAQ and don't bother posting the question in the forums.

Be sure to read and follow the forum rules. -AKA the AutoIt Reading and Comprehension Skills test.***

The PCRE (Regular Expression) ToolKit for AutoIT - (Updated Oct 20, 2011 ver:3.0.1.13) - Please update your current version before filing any bug reports. The installer now includes both 32 and 64 bit versions. No change in version number.

Visit my Blog .. currently not active but it will soon be resplendent with news and views. Also please remove any links you may have to my website. it is soon to be closed and replaced with something else.

"Old age and treachery will always overcome youth and skill!"

Link to comment
Share on other sites

Guys ,Get a room

and there is no Edit button thus no further "Directions" should be needed,and why u r not commenting on my script :P

Link to comment
Share on other sites

Guys ,Get a room

and there is no Edit button thus no further "Directions" should be needed,and why u r not commenting on my script :P

There is an edit button, move your mouse and drag the horonzontal scroll, i ran your script but had trouble going to website and the input box seem to be flashing with your code.
Link to comment
Share on other sites

There is an edit button, move your mouse and drag the horonzontal scroll, i ran your script but had trouble going to website and the input box seem to be flashing with your code.

the input box isn't flushing with my code it's the clipboard,like i said "AUTO-PASTE"

Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...