如何加密用VB写入记事本中的内容

我用VB编了一个小软件，用户输入的部分内容通过程序写入了一个记事本。但是记事本中的内容可以随意查看和修改。我希望不让用户看到，需要输入密码等方法才能访问。说下大致思路就可以！请高手指教。有源程序更好！

推荐答案 2010-03-19

你可以把数据存入access数据库、excel表格、word文档等等之中，然后利用这些文件内置的密码功能来设置密码。不过这些都不是很好的方法，因为你把数据存储到外部文件后，这些文件就不再受VB软件的控制了，用户对这些文件的查看和修改也就不是你能左右的了。你也可以结合其他一些措施进行完善，比如修改文件扩展名、修改文件属性、存储到比较深层的隐秘的文件夹中等等。比较好的方法是在存储数据前先对数据进行加密（比如用MD5），从文件中读入数据后再进行解密，如果不想用MD5，也可以自行对数据进行编码转换，比如把数据的每一个字节和另一个或一串字节（密钥）进行异或操作。

温馨提示：答案为网友推荐，仅供参考

当前网址：http://00.wendadaohang.com/zd/DZn0BjeTI.html

其他回答

第1个回答 2010-03-19

你的思路就有问题，应该内容不要用明文来写，只要看懂自然就没办法修改了，然后在你的vb里加个修改文件的功能，这个地方可以加密码。txt文件是没有办法实现打密码才能访问的功能，word文件输密码也是由word来实现在，不是由word文件本身来实现的，word文件本身也是可以用认何文本工具打开，只是读不出有效内容而己，

第2个回答 2010-03-19

用vb来读取和写入即可，很简单，只需用vb将记事本后缀不用txt，而改为计算机不能识别的名字即可，比如microsoft.mdd，然后隐藏起来，这样就只能用vb来读写

相似回答

我用VB做了一个记事本,已经做好了。请问怎么修改成能加密解密的?答：最简单的加密解密，假设文本在Text1里面，两个按钮，一个加密一个解密：Private Sub command1_click()Dim i As Integer, s As String For i = 1 To Len(Text1.Text)s = s & Chr(Asc(Mid(Text1.Text, i, 1)) + 10)Next Text1.Text = s End Sub Private Sub command2_click()Dim ...

怎么用vb向记事本写入和读取数据,我是新手,请手把手教答：1、Ini文件相关资料参见http://zhidao.baidu.com/question/7278627.html 2、XML文件参见http://wenwen.soso.com/z/q118905307.htm 另外要看你用的是VB6还是VB.NET了，虽然差别不大，但是VB6里你或许需要使用API函数，在VB.NET里大多都有集成好的函数。不管如何，上面两个链接里都包含了你所需要全...

怎样用VB编写一个文件加密程序?答：字节逐位倒排序加密法是以比特为单位的换位加密方法，用VB实现的具体算法是： (1) 以二进制模式打开源文件； (2) 从源文件第I位读取一个字节，假设为字母“A”，得到“A”的ASCII值为65； (3) 将65转换成八位二进制串为“01000001”； (4) 将“01000001”按字节逐位倒排序得另一个八位二...

VB如何向记事本写入数据?答：Open "(Path & FileName).txt" For Output/Append As #1 Print #1,exp1,exp2，……Close #1 注意：引号里边是文件名，扩展名可以省略，但若是要能用记事本打开的话，就需要补充.txt作为其扩展名。Output是将原内容删除重写，Append是补写，不删除原内容，如果没有这个文件，将新建一个文件。exp...