Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Making a password form
Message
General information
Forum:
Visual FoxPro
Category:
Troubleshooting
Miscellaneous
Thread ID:
01256935
Message ID:
01256940
Views:
16
It's not just a simple case of there being more chars allowed in the .txtPassword.Value than in the samples: "nrrc16780pass"?

ie

IF ( ALLTRIM( thisform.txtPassword.Value) == "nrrc16780pass") OR ( ALLTRIM( thisform.txtPassword.Value) == "nrrc16866pass")

>For access to this database, we use the user's logon ID to verify that they are listed in different access tables. For faster access for users in different cities, we have decided to run the database also through a Citrix server. However, when users try running it through Citrix, it no longer recognizes their login ID for some reason (if anyone knows any way to fix that, I'd appreciate it). So to solve this problem, if the user's logon ID is not recognized I decided to prompt a password. Keep in mind that I am not very experienced in FoxPro so I am sure this is a very simple problem that I have. I have done this in about as simple a way as possible as well. I simply prompt the password, if it matches one of the four user's passwords (from the other cities), it is supposed to assign them their access level and then open the database. However, it seems to simply skip over the IF statements for the different passwords and jump right into the else, which says they do not have access and
>quits the database.
>
>Here is the Click code for the Enter button after they have typed the password. I also have a password mask, but I doubt that affects things.
>
>
>IF (thisform.txtPassword.Value == "nrrc16780pass") OR (thisform.txtPassword.Value == "nrrc16866pass");
>	OR (thisform.txtPassword.Value == "nrrc10208pass")
>	m.dbaccess = "B"
>	m.dbaccess2 = "B"
>	m.dbaccess3 = "B"
>	CLOSE TABLES ALL
>	DO FORM switchboard.scx
>	thisform.release
>	ELSE
>	IF (thisform.txtPassword.Value == "nrpr14565pass")
>		m.dbaccess = "A"
>		m.dbaccess2 = "A"
>		m.dbaccess3 = "A"
>		CLOSE TABLES ALL
>		DO FORM switchboard.scx
>		thisform.release	
>		ELSE
>			txtlogin = ("You cannot be logged in at this time.  Please contact Kelli Buscher for access " +CHR(13)+;
>			"to Surface Water Quality Information.")
>			MESSAGEBOX(txtlogin,16,"ACCESS DENIED")
>			QUIT
>	ENDIF
>ENDIF
>
>
>As you can see it is about as simple as can be. I would be open for better ideas for using passwords and especially if someone has an idea about Citrix. For the mean time though, can you guys tell what I'm missing here. I'm sure it is quite small.
- Whoever said that women are the weaker sex never tried to wrest the bedclothes off one in the middle of the night
- Worry is the interest you pay, in advance, for a loan that you may never need to take out.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform