1,184
社区成员
发帖
与我相关
我的任务
分享NetFileEnum()及WNetGetUser()的用法(在Delphi中)
我想通过上面两个函数得到局域网内共享文件夹正在被哪些人访问。是否可行，有没有更好的方法？
问题：
监视指定文件夹及其子文件夹中的文件新增、修改、删除、复制、粘贴操作的记录，
同时记录登录用户、机器名等信息。
已经完成部分：某个文件夹及其子文件夹中的文件新增、修改、删除、复制、粘贴操作的记录；
尚未实现部分：记录登录用户、机器名；
问题：
监视指定文件夹及其子文件夹中的文件新增、修改、删除、复制、粘贴操作的记录，
同时记录登录用户、机器名等信息。
已经完成部分：某个文件夹及其子文件夹中的文件新增、修改、删除、复制、粘贴操作的记录；
尚未实现部分：记录登录用户、机器名；
...全文
请发表友善的回复…
发表回复
wblong 2003-06-14
- 打赏
- 举报
NetFileEnum()怎样使用？
l_xiaofeng 2003-06-11
- 打赏
- 举报
还是楼上的有经验啊，呵呵
naughtyboy 2003-06-11
- 打赏
- 举报
netfileenum只能查看那些共享正在被打开,不能查看是那些用户打开
如果要实现你的要求另外再加上NetSessionEnum(得到当前所有连接到你机器的用户信息)以及
NetSessionGetInfo，NetConnectionEnum几个函数配合来使用
如果要实现你的要求另外再加上NetSessionEnum(得到当前所有连接到你机器的用户信息)以及
NetSessionGetInfo，NetConnectionEnum几个函数配合来使用
l_xiaofeng 2003-06-10
- 打赏
- 举报
NetFileEnum() 太麻烦，在WIN32 SDK帮助里有详细说明！
l_xiaofeng 2003-06-10
- 打赏
- 举报
procedure TForm1.Button2Click(Sender: TObject);
var
lpusername:pchar;
lpnlength:Cardinal;
begin
WNetGetUser('',nil,lpnlength);//去长度
GetMem(lpusername,lpnlength); //分配
WNetGetUser('',lpusername,lpnlength);
Showmessage(strpas(lpusername));
end;
var
lpusername:pchar;
lpnlength:Cardinal;
begin
WNetGetUser('',nil,lpnlength);//去长度
GetMem(lpusername,lpnlength); //分配
WNetGetUser('',lpusername,lpnlength);
Showmessage(strpas(lpusername));
end;
