Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Adding Security to applications
Message
De
11/11/2004 05:38:49
 
 
À
10/11/2004 09:14:31
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8
OS:
Windows 2000 SP4
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
00959949
Message ID:
00960322
Vues:
12
Jay

The logon screen will be modal, returning T or F depending on whether the logon was successful. If successful then you can enter the rest of your code, else, bomb them out.

Here's a simple encryption algo for you, if you like. It takes the text of the input password and converts it to a number, which is what's stored in the user record. Anyone can read that number but they won't know how it was derived, e.g. how many chars were used to make it, what chars, etc. When logging in, the user's password input is merely sent through this algo and compared with the stored password number.
LPARAMETER	tcPasswordText

LOCAL		lnNoChars, lnCharNum, lnPassword

lnNoChars	= LEN( tcPasswordText)	&& Get num of chars in password expr.
lnPassword	= 0

* Get the numeric ASCII value of each char in the password
* and add it to a running total, resulting in the encrypted
* password value for storing in the table
* ____________________________
For lnCharNum = 1 to lnNoChars
	lnPassword = lnPassword + ASC( SUBSTR( tcPasswordText, lnCharNum, 1) )
Endfor

Return lnPassword
HTH

Terry
- 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.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform