stickleprojects Level: Moderator

 Registered: 09-09-2002 Posts: 891
|
Re: String Hide
Hi and welcome to the forum :-)
A few answers:
1) Use the ASCII numbers for your strings rather than holding them in the code.
Example:
dim pwd as string
dim i as integer
i=64
pwd = pwd & chr$(i)
i=65
pwd = pwd & chr$(i)
i=66
pwd = pwd & chr$(i)
' comment - remove this line - pwd = @AB
|
However, this is a lot of code and may be more trouble than downloading some decent encryption.
2) To convert decimal to hex, use the HEX function - see help for usage. I also found this http://www.freevbcode.com/ShowCode.asp?ID=6741 from www.google.com for conversion
3) To check if a file exists:
if dir$("c:\foo\bar\myfilepath.txt")<>"" then
'file exists
end if
|
Hope this helps,
Kieron
____________________________
Build it better, faster, quicker, easier.. then fix it (non-offical MS mission statement)
|