Search Tools Links Login

Camaro's NetZero 3.0.4 DUN Creator (Updated for Netzero 3.0.4)

The main purpose is to access Netzero through my Windows CE Device.
But can also be used to Access NetZero Faster, and without the banners.
This program allows you to convert your current netzero account so you don't have to use the netzero software.
You can surf at faster speeds because there are no banners loading,
just enter your username and password and it will tell you the codes to set in a Dial Up account.
To use on 3.0.4 change the version to 0:3.0.4
Check out for an online version. Use an Active X enabled browser!

Original Author: CamaroMan


To use on 3.0.4 change the version to 0:3.0.4


Very Detailed Code Source.
Easy For Everyone.
Web Based version at


The Valid Dial-Up Username and Password for netzero.
To use on 3.0.4 change the version to 0:3.0.4

Side Effects

To use on 3.0.4 change the version to 0:3.0.4

API Declarations

Function Pass(password)
Key1 = "`-=~!@#$%^&*()_+[]{}|;':" _
& """" & ",./<>?abcdefghijklmnopqrstuvwxyzABCDEFG" _
Key2 = "GFEDCBAzyxwvutsrqponmlkjihgfed" _
& "cba?>& "!~=-`9876543210ZYXWVUTSRQPONMLKJIH"

For i = 1 To Len(password)

A = Mid(password, i, 1)

B = InStr(1, Key1, A)

C = B - (i - 1)

D = Mid(Key2, C, 1)

E = E + D

Next i

If E = "" Then
Pass = "0" & E & "1"
End If
End Function
Function User(Username, Version)
If Username = "" Then
User = ""
If Version = "" Then
User = "2.2.2:" & Username & ""
User = Version & ":" & Username & ""
End If
End If
End Function
To Use on Netzero Zeroport 3.0.4 change the version to 0:3.0.4
This would cause netzero to connect.

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 134 times


Visual Basic 6

Posted: 9/3/2020 3:45:00 PM
Size: 406,050 bytes

Loading Comments ...


No comments have been added for this post.

You must be logged in to make a comment.