我想将数据库的内容导出到文本文件,但是又不想用记事本让人家可以直接看到!(100分)

M

mnmn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #1

我要将数据库的内容导出到文本文件,然后在需要的时候再从文本导入到数据库.
导入导出我都做好了,可是文本文件用记事本就可以打开看到,即使不用.txt扩展名也一样
可以选择打开方式就可以用记事本看到这个文件.
我看有的文件用记事本打开后看到的全是乱七八糟的字符,我想最好就能做成像那样,
人家打开也看不出什么名堂了.

 

少

少爷的拐杖

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #2

1、自定义文件结构
2、字符串加密

 

Q

QuickSilver

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #3

动态创建带密码的ACCESS数据库，然后把数据库的内容导入这个新的数据库文件中
虽说ACCESS的密码容易破解，但还是能起到一定作用的。

 

W

wrf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #4

导出的时候把数据进行加密,没有别的办法

 

少

少爷的拐杖

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #5

最简单的加密方法：
存文本文件时用
function TForm1.CryptStr(const S: string): string;
var
i: integer;
fkey: integer;
begin
result := '';
fkey := 5;
//加密常量5
for i := 1 to length(s) do
result := result + chr(ord(s) xor fkey);
end;
来加密字符串，读出时再次调用是解密。

 

D

dunezi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-03

• #6

加密也是可以的。
还有就是伪加密。
在有些地方加一些乱七八糟的码就可骗人了