473,396 Members | 2,061 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,396 software developers and data experts.

Password Problem

1
Charlie,

So near to the end, is it a good time to give up?
Try posting your whole procedure exactly as it is now for me please.
I'm sure we can get this working for you (well pretty confident anyway).
Some of these syntax problems can be hard to find but I've had some experience with some doozers in my time - lets give it a try.

Hello NeoPa,

I am having the same probelm, but cannot get the code to verify the user's old password in order to enter a new password. If you could look over it, that would be great. Thanks.
Expand|Select|Wrap|Line Numbers
  1. Private Sub txtPassword_AfterUpdate()
  2. Dim pswd As String
  3. Dim confirm As String
  4.  
  5.     pswd = DLookup("[strEmpPassword]", "tblUsers", "[IngEmpID]=" & txUser)
  6.  
  7.   If pswd = "password" Then
  8.  
  9. EnterPassword:
  10.  
  11.     pswd = InputBox("Please enter a new password", "Change Password")
  12.     confirm = InputBox("Please new password again.", "Password Confirmation")
  13.     If pswd <> confirm Then
  14.      MsgBox "Passwords do not match.", vbOKOnly
  15.      GoTo EnterPassword
  16.     Else
  17.      DoCmd.RunSQL "UPDATE tblUsers   SET [strEmpPassword]]= '" & Me.pswd & "' WHERE [txtUser]='" & Me.txtUser & "';"
  18.     End If
  19.   Else
  20.      'Your normal password checking code here
  21.   End If
  22.  
  23. End Sub
Feb 23 '08 #1
1 954
NeoPa
32,556 Expert Mod 16PB
Hello NeoPa,

I am having the same probelm, but cannot get the code to verify the user's old password in order to enter a new password. If you could look over it, that would be great. Thanks.
Expand|Select|Wrap|Line Numbers
  1. Private Sub txtPassword_AfterUpdate()
  2. Dim pswd As String
  3. Dim confirm As String
  4.  
  5.     pswd = DLookup("[strEmpPassword]", "tblUsers", "[IngEmpID]=" & txUser)
  6.  
  7.   If pswd = "password" Then
  8.  
  9. EnterPassword:
  10.  
  11.     pswd = InputBox("Please enter a new password", "Change Password")
  12.     confirm = InputBox("Please new password again.", "Password Confirmation")
  13.     If pswd <> confirm Then
  14.      MsgBox "Passwords do not match.", vbOKOnly
  15.      GoTo EnterPassword
  16.     Else
  17.      DoCmd.RunSQL "UPDATE tblUsers   SET [strEmpPassword]]= '" & Me.pswd & "' WHERE [txtUser]='" & Me.txtUser & "';"
  18.     End If
  19.   Else
  20.      'Your normal password checking code here
  21.   End If
  22.  
  23. End Sub
I'm not happy with this.

Firstly you are hijacking a thread. Not allowed.
Secondly, you were not prepared to phrase your question but rather expect me to dig through a >1 year old thread (19 posts) to work out what your question might be.
Lastly, we are not a code checking service. We are here to help you learn.

If you would like to post again (in here - I'm splitting the thread for your question) explaining the problem and what your specific question is ("Here's a whole bunch of code - please fix it." just doesn't do it I'm afraid), then we can look at helping you.

I appreciate that this is your first post so I'm bearing that in mind and will take no further action at this time. If you're to make more use of these facilities though, I suggest you have a look at the posting guidelines. There's a link at the top right of every page called Help.

PS. The other thread is Login Forms.
Feb 23 '08 #2

Sign in to post your reply or Sign up for a free account.

Similar topics

1
by: Jordy | last post by:
Environment: Sun servers running solaris 2.8 Php 4.3.6 Apache 1.3.29 Mysql 4.1.1 phpMyAdmin 2.6.0-alpha1 phpAds 2.0 PhpMyadmin and phpAds don't succeed to connect the MySql database when
11
by: John Victor | last post by:
In my mysql database, I've stored all the passwords using the PASSWORD() function. Now I'm running a test and need to compare the password in my php document to that saved in the database. I used...
6
by: John Morgan | last post by:
I urgently need tom use SP3a upgrade the instance of SQLServer200 MSDE runing on my local machine but I am having problems in doing so. My first problem is that when I start the set up procedure...
2
by: Jill Elaine | last post by:
I am building an Access 2002 frontend with linked tables to an encrypted Paradox 7 database. When I first create these linked tables, I'm asked for the password to the encrypted Paradox database,...
4
by: Jonathan Dienst | last post by:
I have a simple data access and administration page for user details on my site, including a login password -- but I cannot get the textbox to work properly if the TextMode is set to "Password". ...
7
by: Dino M. Buljubasic | last post by:
I am storing encrypted password in registry and using it then to log on my application. However, my objConn.Open(str_connecton_string) crashes the application if I use the encrypted password. ...
6
by: Frank L | last post by:
I have some accounting and tax receipting type applications, developed for charitable and non profit groups, that are exhibiting strange behaviour on a few of the 30 or 40 user machines. When...
5
by: John | last post by:
Hi I am trying to set a new password using the following code; Dim u As MembershipUser = Membership.GetUser(UserName) Dim OldPassword As String OldPassword = u.GetPassword If...
3
by: Noel S Pamfree | last post by:
Problem 1 ======= I need to create a page for a friend who operates a school website. She needs to set up a page so that only the Governors can access it. I thought I'd try to use JavaScript to...
2
by: DarthPeePee | last post by:
Hello everyone. I am working on a Password Strength Meter and I am running into 1 problem that I would like to fix. When pressing the "Clear Password & Try Again" button, the password clears...
0
BarryA
by: BarryA | last post by:
What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...
1
by: nemocccc | last post by:
hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?
0
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
0
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
0
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...
0
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...
0
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.