【结贴】客户端登录时，“灾难性故障”**

chenyongci · 发表于 2008-12-15 11:32:36

我在‘系统初始化’功能的DORUN方法中，在标记{记录信息}的地方，添加了代码，把当前的IP记录到数据库中。

IPStr:=business.System.JSSysUtils.GetLocalIPStr;
query1 := TQuery.Create(nil);
query1.ConnectionString:='DataBaseURL=Biz:\SYSTEM\SYSTEM.DATABASE';
query1.CommandText:='update TPERSON set IP='''+IPStr+ ''' where FID like ''%'+loperator.ID+'%'' ';
query1.Execute;

直接在建模工具下调试运行，都是没问题的，能记录到数据库中。

但是用协同管理系统登录时，，就会提示“灾难性故障”，，不知道怎么回事

lixy · 发表于 2008-12-15 11:34:40

看看你的IE是否显示为脱机工作

lixy · 发表于 2008-12-15 11:35:28

http://bbs.justep.com/forum.php?mod=viewthread&tid=6731

chenyongci · 发表于 2008-12-15 11:40:16

关键是，只要我把这面代码去掉，就能正常登录，只要有上面的代码就会有这个提示

atiger · 发表于 2008-12-15 11:43:04

楼主，你运行系统初始化，然后通过功能树运行该功能正常吗？如果没有这样运行过，你运行看看，如果报错，那么看看是执行哪句报出来的。

另外，客户端登陆，是IE还是business，如果是business，那么请问business是否跟Studio，就是建模工具在同一个目录下呢？

lixy · 发表于 2008-12-15 11:44:06

你去掉建模工具的调试账号，让登陆框出来，然后初始化调试，如果报错，看看各个对象的状态。

chenyongci · 发表于 2008-12-15 11:49:05

按照六楼说得，调试出问题了，
query1.CommandText:='update TPERSON set IP='''+IPStr+ ''' where FID like ''%'+loperator.ID+'%'' ';
这句话有问题，
请问这个时候应该怎么获得当前登录的账号呢？？

lixy · 发表于 2008-12-15 11:53:02

你看看这个函数怎么写的
TSystemCore.AddSystemLog(TSystemCore.Operator.Context, 'SYSTEM', '登陆系统');

chenyongci · 发表于 2008-12-15 12:14:28

呵呵，，好了，多谢啊，，
结

		自动登录	找回密码
密码			立即注册