Question

delphi函数

没学过Delphi.需要把里面的函数转成别的语言vbscript或者js或者其他的
如果不行的话 如果能用那Delphi源文件把里面的ini文件解密也行.
thanks!
文件地址: http://cdzyuan.phost.ws/delphi.rar

能把ini文件加密的解出来就行了

Answer 1

uCwSysParam文件哪？

我解了一下，可能是下面的，你看看对不对 ，由于这里不能输入空格，所以密码是空格的我直接写文字了

[ExeFlag]
ExeSetup=0
ProductorCount=1
CustomorCount=1
TimeValue=5
[Customor]
resName=127.0.0.1
DbName=
UserName=
PWD=8个空格
LoginMode=1
[配置信息]
服务器=192.168.10.225
数据库=常德职院
用户名=sa
口令=8个空格
[Productor]
resName=192.168.100.9
DbName=常德职院
UserName=sa
PWD=cdzy7280775
LoginMode=1

Answer 2

我可以做成一个DLL 然后用
set xx = new Server.CreateObject(strClassString);

这样的方式来做到！

如果要的话。你就给我发个信息。我帮你做一个！这样行吗？

Answer 3

看上去是应用到ASP的WEB应用程序中,给你提供一个思路,你去实现,用一个ASP的简单移位加密的简单算法(包括加密和解密),INI文件直接encrypt,生成的乱码,呵呵,在调用时再用这个移位解密函数读出来,只是简单的隐藏一下不过,如果有心人,仔细一看就明白了.

附:你的D源码我看了,原理还是和移位加密差不多,所以,你就这么干算了,起码来说,一般人看了乱码头脑就发晕了