*/
My Password Manager 1.0
Submitted By:
bdip
Rating:
(
Rate It)
You can use this application to store sensitive data like
LoginID Password in a secure database, using a user friendly
interface. This application can also encrypt text messages
using with a password. This version uses Microsoft CryptoAPI to
encrypt and decrypt sensitive data in a password database file.
Please feel free to drop in your suggestions, your effort in
this direction is highly appreciated.
NOTE: Some downloads must be obtained through publishers´s site.
Do you want to get your software listed on this site? Go to our
submissions area.
Screenshot
Details
Number of downloads:
4380
Comments (8)
Good code
Posted on Thursday, November 18, 2004
interface could be made better
A good download
Posted by: Ash on Saturday, December 18, 2004
Add AES support
http://csrc.nist.gov/CryptoToolkit/aes/rijndael/
Update Note
Posted by: BasuDip on Wednesday, October 04, 2006
For an update to this program (supporting CommandLineArguments and minor improvements) visit http://www.geocities.com/basudip_in/vb6code/ and download PasswordManager VB6SourceCode.
Update Note on AES encryption
Posted by: Dipankar Basu on Wednesday, January 03, 2007
for Rijndael encryption see the code at http://www.geocities.com/basudip_in/vb6code/aes/
Programmer
Posted on Friday, February 09, 2007
good program to keep my password database safe
Update Note
Posted by: Dipankar Basu on Tuesday, July 24, 2007
REM frmPassword:=txtFind replacedWith cmbFind
Private Sub Form_Load()
maxEntry = Val(ReadINI("BasuDip Password File", "MaxEntry", PasswordDatabaseFile))
For i = 1 To maxEntry
cmbFind.AddItem ReadINI("Login", "User" & i, PasswordDatabaseFile)
Next i
End Sub
Private Sub cmbFind_Change()
cmbFind.ListIndex = SendMessage(cmbFind.hWnd, CB_FINDSTRING, -1, cmbFind.Text)
End Sub
Replace txtFind TextBox with cmbFind ComboBox in frmPassword
Posted by: BasuDip on Friday, August 03, 2007
REM frmPassword:=txtFind replacedWith cmbFind
Private Sub Form_Load()
maxEntry = Val(ReadINI("BasuDip Password File", "MaxEntry", PasswordDatabaseFile))
For i = 1 To maxEntry
cmbFind.AddItem ReadINI("Login", "User" & i, PasswordDatabaseFile)
Next i
End Sub
Private Sub cmbFind_Change()
cmbFind.ListIndex = SendMessage(cmbFind.hWnd, CB_FINDSTRING, -1, cmbFind.Text)
End Sub
Replace txtFind TextBox with a ComboBox in frmPassword
Posted by: BasuDip on Wednesday, August 15, 2007
Update code with :=
Private Sub Form_Load()
maxEntry = Val(ReadINI("BasuDip Password File", "MaxEntry", PasswordDatabaseFile))
For i = 1 To maxEntry
cmbFind.AddItem ReadINI("Login", "User" & i, PasswordDatabaseFile)
Next i
End Sub
Private Sub cmbFind_Change()
cmbFind.ListIndex = SendMessage(cmbFind.hWnd, CB_FINDSTRING, -1, cmbFind.Text)
End Sub
Add Your Rating
