help with login password.

[THEAF]

the code i use presently changes the password but when it is revisited or the progamme is shut down and then started up again the password wil revert to the old one.I was thinking that i could use the Modelo that i can store the password there and change it.
IF ANYONE KNOWS HOW TO DO THIS.
i don't to store the password in a Access docso id be greatful if anyone could give me an answer.
THANK YOU VERY MUCH

[shuvo2k6]

the code i use presently changes the password but when it is revisited or the progamme is shut down and then started up again the password wil revert to the old one.I was thinking that i could use the Modelo that i can store the password there and change it.
IF ANYONE KNOWS HOW TO DO THIS.
i don't to store the password in a Access docso id be greatful if anyone could give me an answer.
THANK YOU VERY MUCH

Hey,
u didn't mention here, where u store the Password. You have to store the password in a file. Then u see the topic on how write in a file. U can use here FileSystemObject. When u change ur password, everytime u write into that file, but not append.

Regards,
shuvo2k6

[creative1]

IF you post your code here it will be easy to see how you are doing that.

[lotus18]

I was thinking that i could use the Modelo that i can store the password there and change it.

Can anyone explain to me what MODELO is?

Rey Sean

[Ali Rizwan]

Add a reference Microsoft Runtime Library to your project.

Declare Variables

Dim fso as new filesystemobject
dim f as file
dim t as textstream

Now to store your password to a text file use this code:

Private Sub cmdwrite_Click()
            set f=fso.getfile(file path)
            set t=f.openastextstream(forwriting)
            t.writeline(text1.text)
            t.close
End Sub

Now to read your password from text file use this code:

Private Sub cmdread_Click()
            dim a as string
            set f=fso.getfile(file path)
            set t=f.openastextstream(forreading)
            a=t.readline
            t.close
End Sub

For any more help you can contact me.

Regards
>> ALI <<