Jump to content
Sign in to follow this  
Onoitsu2

Netzero Auto Logon+

Recommended Posts

I was bored, and wanted to make an auto logon script for NetZero, and well here it is... pretty plain, but very functional. You need to have your password already stored. I put this in my QuickTray and use it to connect and disconnect.

Inetsignon.au3

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:        Onoitsu2 <onoitsu2@yahoo.com>
;
; Script Function:
;   Automatically logon to NetZero (only if password is stored),
;   Hide the NetZero bar, and close the browser window that loads
;   with my.netzero.com
;   AND
;   If NetZero is running it will immediatly disconnect
;
;   Works on all NetZero install locations, as it reads the registry for
;   INSTALLDIR, then runs it, also can be used to see if NetZero is installed
;   at all.
;
; ----------------------------------------------------------------------------

Opt("WinTitleMatchMode",4)
If ProcessExists("exec.exe") Then
$iMsgBoxAnswer = MsgBox(266244,"Sign Off NetZero?","Sign Off NetZero??")
Select
   Case $iMsgBoxAnswer = 6;Yes
    $pos = MouseGetPos()
    ProcessClose("exec.exe")
    Sleep(5000)
    ProcessClose("exec.exe")
    Sleep(1000)
    MouseMove(700,755,0)
    MouseMove(@DesktopWidth,755,10)
    Sleep(500)
    MouseMove($pos[0],$pos[1],0)
   Case $iMsgBoxAnswer = 7;No
    Exit
EndSelect
Else
    $regloc = RegRead("HKLM\Software\NetZero, Inc.\NetZero","INSTALLDIR")
    If $regloc = "" AND NOT (@error = 0) Then
        MsgBox(266244,"NetZero Not Installed","Unable to Locate the Registry Entry for NetZero"&@CRLF&"This can mean that it is not installed, or installation has been corrupted."&@CRLF&"NetZero Auto Logon will not exit...")
        Exit 1
    EndIf
    Run($regloc&"\exec.exe")
    WinWait("Login to NetZero","",60)
    WinActivate("Login To NetZero")
    Sleep(1000)
    Send("{enter}")
    WinWait("NZTV","",60)
    If NOT WinWaitClose("NZTV","",60) Then
        WinActivate("NZTV")
        Send("{tab}{enter}")
        MsgBox(0,"An Error Occurred During Connection!","An Error Occurred During Connection!"&@CRLF&"Auto Logon App Shutting Down...")
        Exit
    EndIf
;~  WinSetState("NetZero","",@SW_MINIMIZE)
    WinWaitActive("NetZero","",60)
    WinSetState("NetZero","",@SW_HIDE)
    WinWait("http://my.netzero.net","",60)
    WinClose("http://my.netzero.net","")
    Exit
EndIf

Laterzzz,

Onoitsu2


Things I have made:[font="Trebuchet Ms"]_CheckTimeBlock UDF(LT)MOH Call Ignore List (MOH = Modem On Hold)[/font]

Share this post


Link to post
Share on other sites

You do know that you can use rasdial.exe

I love it!!!


[center]AutoIT + Finger Print Reader/Scanner = COOL STUFF -> Check Out Topic![/center][center][font=Arial Black]Check out ConsultingJoe.com[/font][/center][center]My Scripts~~~~~~~~~~~~~~Web Protocol Managing - Simple WiFi Scanner - AutoTunes - Remote PC Control V2 - Audio SpectrascopePie Chart UDF - At&t's TTS - Custom Progress Bar - Windows Media Player Embed[/center]

Share this post


Link to post
Share on other sites

You do know that you can use rasdial.exe

I love it!!!

NetZero will not let you connect like that with the rasdial program, you have to have their zerobar running, as it communicates with the server, I have tried every variation of it, and you will stay connected for like 1 minute, then they see you are not using their software, as they are not getting responses from it.

Once you are connected you can run taskkill /f /im exec.exe

this completely kills it, but leaves you connected still, only problem is disconnecting is a challenge lol

Laterzzz,

Onoitsu2


Things I have made:[font="Trebuchet Ms"]_CheckTimeBlock UDF(LT)MOH Call Ignore List (MOH = Modem On Hold)[/font]

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  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...