Yahoo Messenger Faster Login

[Kreatorul]

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 Edit:10x to Valuater

expandcollapse popup

#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 September 7, 2006 by Kreatorul