文件夹监视 (300分)

  • 主题发起人 主题发起人 晓风月
  • 开始时间 开始时间
我也想要一份
yejsj@163.net
 
如果能给我一份源代码,我将非常感谢!
yuanlao@eyou.com
 
我这里有取“机器名”与“IP地址”的程序一份,供大家参考,但登陆用户就不知道
to 晓风月 你的原码能给我一份吗?E-mail:happyking21@sohu.com
procedure GetHostInfo(var Name, Address: string; var IpAddr : Integer);
var
WSAData: TWSAData;
HostEnt: PHostEnt;
begin
WSAStartup(2, WSAData); //调用API启动WinSock
SetLength(Name, 255);
Gethostname(PChar(Name), 255); //调用API取得本机名称
SetLength(Name, StrLen(PChar(Name)));
HostEnt := gethostbyname(PChar(Name));
with HostEnt^ do
begin
Address:=Format('%d.%d.%d.%d',[Byte(h_addr^[0]),Byte(h_addr^[1]),
Byte(h_addr^[2]),Byte(h_addr^[3])]);
IpAddr := Byte(h_addr^[0]) shl 24 + Byte(h_addr^[1]) shl 16 +
Byte(h_addr^[2]) shl 8 +Byte(h_addr^[3]);
end;
WSACleanup;
end;
 
有好东西大家分享哈
kiven.liu@163.com
 
能发给我一份吗?
yzk@jmtw.com
 
to: 驱动程序
你那段代码只不过是取本机的IP和机器名而已,还不如GetComputerName();GetUserName()
来得快!不过还是感谢你的参入!



 
在2000中的计算机管理中有个共享文件夹,其中的'会话'选项可以看到每个共享文件夹的
使用计算机名和用户,你可以用windows的消息机制获取.
 
yanwei_sc@yahoo.com.cn
我帮你请教一下其他朋友。
 
本人知识有限,不能帮忙遗憾!热烈关注!
 
真是好东西啊,我一直想用java写一个,希望搂住能早日写出来,最好少用控件,少用api.
[:D]
 
朋友,把你的这个代码发给俺一份,在此先谢过了!!!!
 
你既然能够知道文件的修改部分,就不会曲线救国吗?
文件属性里面有最后的修改人,那个也就是登陆的用户名了。
拿过来不就解决了。(参见文件操作部分)
 
文件夹的拷贝与剪切我已经解决本地用户操作的监视,主要是通过钩子实现的。
但网络用户对服务器上的文件拷贝与剪切没能监视到。

另外一个没有解决的大问题是:没能正确记录网络用户登录用户、机器名。
 
看起来问题很难,其实很容易。
仅仅是因为我比别人细心。
上面的问题,答案就在DELPHI的DEMO中。他演示了对文件夹进行监控。
当对文件夹进行新增、修改、删除、复制、粘贴等操作时,将显示对
话框。询问是否进行该操作。将此程序少加改动,可以实现对文件夹删除
时显示输入密码以及将进行的操作记录写在一个文本文件中。这样当别人
在自己机器上进行文件夹操作时,就会自动记录所进行的操作,文件夹名
和操作时间。是不是很有意思。
对了它是个ACTIVEX在DELPHI中进行注册就行了。
 
看样子我不能帮你,我实在是不会,不过希望能
向你学习
能将源码email一份给我吗
yanghai0437@sina.com
 
收藏下来,不是自己擅长部分
 
收藏此问题,我也正在学习网络通讯方面的东西,能给我一份源代码吗
jxy_cn@hotmail.com
 
淘金鼠(智能眼)III代(软件发布)
软件名称:淘金鼠(智能眼)III代
软件版本:V3.0.0
见议分类:应用软件->系统增强
联系EMAIL:yishengdxx@sohu.com
软件网站:http://jiayinman.vip.sina.com
下载地址:http://jiayinman.vip.sina.com/cn/yssoft/goldmouse.exe
软件容量:633 KB
软件类型:国产软件 / 简体中文 /免费软件
应用平台:Win95/98/NT/2000/XP
界面预览:http://jiayinman.vip.sina.com
软件介绍:淘金鼠(智能眼)III代,全新的代码编程,完全能取代你的动作,是你的绝对的得力助手。一切都可以让他自动完成你的操作。具有人的眼睛一般的功能,即使你故意将桌面的图标或指定的对象拖离原位,他也能迅速将其捉拿归案,试试吧,一个挺有意思的工具软件。
 
后退
顶部