客户端登陆日志记录
对于一些大型的管理系统,如果使用的人员较多,有必要记录用户登陆时使用的电脑的特征码,当然记录用户的操作记录也是必要的(本文不做讨论),
思路是用户登陆时,将用户的电脑名称,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) 编辑 收藏 举报