■■■ 关于写 ini文件里奇怪的问题????

[Earthnut]

我遇到一个奇怪的问题,不知道是为什么?
把连接数据库的信息如IP,登录名,密码...存在一个ini文件里,
1.当数据库在局域网内或本机的时候,密码经过简单加密,如密码原来为6666,加密变成:IIII, ini文件里的格式为:LogPwd=IIII ,在ini文件里能正常显示和读出加密的内容;

2. 但当数据库在在广域网的服务器上时候,连接测试,发现保存到.ini文件的密码的字符的显示就不正常了, 加密的字符在ini文件里变成了几个黑竖框LogPwd=■■■■,显示不正常的字符,也不能正常读出.
用showmessage(DecEnStr(my_ini.ReadString('Login','LogPwd','')))显示为空,可以是不能识别吧.

请问一下这是什么原因呢?如果程序有问题的话,那应该在第1种情况下也不会正常,但与数据库的位置似乎任何的什么关系,两种情况程序一样,唯一不同的数据库服务器的位置(IP)不同,所以又不得不从数据库的位置上去想....


罗索说了这么多,请大家帮我分析一下大概的原因?谢谢....

[Earthnut]

写入ini文件的代码:
//==========写入数据库服务器信息到ini文件=================
path := Extractfilepath(application.ExeName);
if path[length(path)]<>'\' then
path:= path+'\'+'config.ini'
else
path := path+'config.ini';

my_ini:=Tinifile.Create(path);
my_ini.WriteString('login','HostIP',Trim(ed_host_ip.Text));
my_ini.WriteString('login','LogName',Trim(ed_con_name.Text));
my_ini.WriteString('login','LogPwd',DecEnStr(ed_con_pwd.Text));
my_ini.Free;

DecEnStr为加密函数.

[gobiz]

没遇到过！建议你先试试明码保存，是否也是出现这样的问题！
估计是字符集编码的问题，不能确定！

[Earthnut]

-------谢谢提醒----用明码,正常.. 难道加密函数的问题,有问题为什么本地的又正常?不解

[Earthnut]

换了个加密函数正常,可以,但弄不清的是原来那个为什么在要本地为什么正常,在远程的就不正常..不解.

[windindance]

与你密码有关。
很有可能你加密后的字符串中包含异常字符。

[iskyshop]

这个是你的字符编码的问题,建议都使用utf-8就肯定解决问题了,在保存汉字的时候增加AnsiToUtf8(password),这样保存的就不是乱码了

[milunhailili]

编码问题。
你现在在桌面上新建一个记事本，在里面输入“学校”两个字（不包括引号），保存后，再打开，看看是什么。

[tanqth]

在你的DecEnStr里进行一次base64应该不会的问题了。

[喝口水]

编码问题，AnsiToUtf8(password)

[Earthnut]

谢谢各位。编码问题。结贴了！