why! do think your finish!
How good your!, why you need more! why you d'nt care for sometng else!
Dim cmd1 As New OleDb.OleDbCommand("Update Admininfo Set Pass=@UPass Where UserId='" & FrmLogin.txtUserName.Text & "' ", cn) <vbnet> to <vbnet> Dim cmd1 As New OleDb.OleDbCommand("Update Admininfo Set Pass=@UPass Where UserId='" & FrmLogin.TxtAdminUserName.Text & "' ", cn) <vbnet> thank you very much