Password change

[lee123]

how can i change the data in my password form to read This- ******* instead of the data i put in there, is there a format i am suppose to use....

lee123

[debasisdas]

if you want to display *** or any other character at the pasword prompt in a textbox ,set the password character to the desired character..

[EYE4U]

I think you want to save your data in files or in database in this form.
If yes you cant do this but use encrypting and decrypting techniques by using this convert your data into some other unreadable form and save to file or database and when reading encrypt the data again at runtime.

Hope it helps you
If you want any example i can make one for you.

Regards
ARUZ

[lee123]

cool yea make an example thanx

lee123

[EYE4U]

Lee
While Searching over the internet i found a cool example with a dll for encrypting and decrypting of data.

Using dll:
To use the dll add reference to the dll file and to encrypt just write this

Dim ObjCrypt As New vbCrypt.EncryptionTools   
MsgBox ObjCrypt.MD5HashString("test123")
'Results: CC03E747A6AFBBCBF8BE7668ACFEBEE5

If you dont understand that example there is a very simple way by which you can make your own encryption and decryption function.

public function Encrypt(Value_String as string)as string
value_string =replace(value_string,"a","%")
value_string =replace(value_string,"b","$")
value_string =replace(value_string,"c","#")
value_string =replace(value_string,"d","@")
end function
 
public function Decrypt(Value_String as string)as string
value_string =replace(value_string,"%","a")
value_string =replace(value_string,"$","b")
value_string =replace(value_string,"#","c")
value_string =replace(value_string,"@","d")
end function

now ::

msgbox Encrypt("abcd")

output :: %$#@

msgbox Decrypt("%$#@")

output :: abcd

Regards
ARUZ

[lee123]

thanks i'll try it

lee123