客户端登陆日志记录

     对于一些大型的管理系统,如果使用的人员较多,有必要记录用户登陆时使用的电脑的特征码,当然记录用户的操作记录也是必要的(本文不做讨论),

思路是用户登陆时,将用户的电脑名称,ip地址,网卡地址,甚至是CPUID,主板id,组合为字符串写入数据库,供需要时查实!

特别是需要记录多次尝试登陆的电脑需要记录,估计是想试密码吧!!

     自己写代码获取以上的硬件信息也可以,估计要写很多,现在有个现存的第三方控件

MiTeC System Information Component Suite  简称MSICS

使用该控件可以简单的几句代码获取以上信息:

mtc_systmnf1.RefreshData();
mmo1.Lines.Add('计算机名称:'+mtc_systmnf1.Machine.MachineName);
mmo1.Lines.Add('计算机IP:'+mtc_systmnf1.Network.IPAddresses[0]);
mmo1.Lines.Add('计算机网卡地址:'+mtc_systmnf1.Network.MACAddresses[0]);
mmo1.Lines.Add('计算机CPU序列号:'+mtc_systmnf1.CPU.SerialNumber);
mmo1.Lines.Add('计算机BIOS唯一ID:'+mtc_systmnf1.Machine.SMBIOS.SystemUUID);
mmo1.Lines.Add('计算机硬盘序列号:'+mtc_systmnf1.Storage.Physical[0].SerialNumber);

 

 

获取的方法有了,写入数据库就不在多说!

 demo exe

http://pan.baidu.com/share/link?shareid=260008526&uk=4127515284

 

posted on 2013-11-05 11:12  Delphi XE5  阅读(1075)  评论(0编辑  收藏  举报

导航