Sign in to follow this  
Followers 0
Kreatorul

Yahoo Messenger Faster Login

1 post in this topic

#1 ·  Posted (edited)

I think it's a nice script...just select the path to YahooMessenger.exe then write id and pass in the input boxes click rembember id and pass and restart the program then u'll login into Y!M with only 1 click :P Edit:10x to Valuater

#include <GuiConstants.au3>
$r=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M")
$r2=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M2")
$r3=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M3")
If $r="" or $r2="" or $r3="" Then
    $file=FileOpenDialog("Path to Yahoo Messenger exe", "", "Exe (*.exe)")
    $win1 = GuiCreate("Fast Y!M Login", 220, 110)
    ;GuiSetState()
    ;GuiGetMsg()
    $label1=GuiCtrlCreateLabel("Enter the ID", 5, 10)
    $label2=GuiCtrlCreateLabel("Enter the password",110, 10)
    $id=GUICtrlCreateInput("", 5, 35, 100)
    $pass=GuiCtrlCreateInput("", 110, 35, 100)
    $button=GuiCtrlCreateButton("Remember ID and PASS", 5, 70)
    GuiSetState()
    While 1
        $msg = GuiGetMsg()
        If $msg = $GUI_EVENT_CLOSE Then Exit
    If $msg = $button Then
    RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M", "REG_SZ", GuiCtrlRead($id))
    RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M2", "REG_SZ", GuiCtrlRead($pass))
    RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M3", "REG_SZ", $file)
    MsgBox(0, "Restart", "Now restart the program")
    ExitLoop
    EndIf
    Wend
    GUIDelete($win1)

    Else
        GuiCreate("Fast Y!M Login", 150, 80)
    $menu=GUICtrlCreateMenu("File")
    $menu2=GUICtrlCreateMenuitem("Unregister ID", $menu)
    $buttonu=GuiCtrlCreateButton("Unregister ID", 70, 25)
    $run=GuiCtrlCreateButton("Run Y!M", 5, 25)
        GuiSetState()
        While 1
        $msg = GuiGetMsg()
        If $msg = $GUI_EVENT_CLOSE Then Exit
            If $msg = $run Then 
            Run(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M3"))
            EndIf
            
            If $msg = $buttonu Then 
            RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M")
            MsgBox(0, "Restart","Now restart the program")
            ExitLoop
            EndIf
            
            If $msg=$menu2 Then 
            RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M")
            MsgBox(0, "Restart","Now restart the program")
            ExitLoop
            
            WinWaitActive("Yahoo! Messenger with Voice")
            If WinExists("Yahoo! Messenger with Voice") Then Send(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M") & "{TAB}" & RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Y!M", "Y!M2") & "{ENTER}")
            EndIf
            WEnd
            EndIf
            Exit
Edited by Kreatorul

Share this post


Link to post
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
Sign in to follow this  
Followers 0