Password Management

hi.. i have problem from this code..

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub cmdSave_Click()
Dim password As String
Dim EncryptString As String
'Dim DecryptString As String
'Dim rstblstudent As New ADODB.Recordset
Dim rstblstudent As New ADODB.Recordset

rstblstudent.Open "SELECT * FROM tblstudent where stdnumber= 'stdnumber'", cons, adOpenStatic, adLockOptimistic

With rstblstudent

If txtoldpass.Text = Enc.DecryptString(.Fields("stdpassword").Value) Then
If txtnewpass.Text = txtverifypass.Text Then
.Fields("stdpassword").Value = txtnewpass.Text
.Update
MsgBox "New password changed successfully.", vbInformation
Unload Me
Else
MsgBox "Password does not match.", vbExclamation
End If
Else
MsgBox "Please enter correct password.", vbExclamation
End If

End With

rstblstudent.Close
End Sub

--- the error is: EITHER BOF OR EOF IS TRUE, OR CURRENT RECORD HAS BEEN DELETED, REQUESTED OPERATION REQUIRES CURRENT RECORD.

the i choose is current. theres a password. i have using VB6.0 with MYSQL connection..
could you help me for this code.

Hello fren,
I am very new to VB. I downloaded your most of codes and its helpful. Can you please tell me how to create Installer.exe not the set up file. I can create the setup file using Package development but i dont know how to create self extracting installer.exe file as you created in Password Management Software.

Most of the programs are having crystal report so it is not open. It says missing ActiveX Crystal Report like....
how to add the missing file or .dll. If you have please send at my e-mail address [email protected]

Thanks a lot
Nasir

can you give data base passwod

what is data base passworld