请问如何关闭客户端共享文件夹？[已解决]

pandy05 · 发表于 2012-7-6 18:23:07

本帖最后由 pandy05 于 2012-7-10 13:00 编辑

近期域内中了病毒，因客户端共享文件夹导致，请问如何关闭客户端共享文件夹（默认共享、打印机、打印机驱动程序、远程桌面除外），我只能通过_Net_Share_ResourceStr和_Net_Share_ShareEnum函数判断出共享文件夹的类型，请问共享文件的共享名要怎么判断呢？先谢过！

fpquenya · 发表于 2012-7-6 21:08:22

回复 1# pandy05
是要删除客户端计算机上的共享吗?
试试这个,通过组策略在域客户端计算机批量执行


Local $oWMI,$colShares,$oShare
$oWMI = ObjGet("winmgmts:\\.\root\cimv2")
$colShares = $oWMI.ExecQuery("SELECT * FROM Win32_Share")
For $oShare In $colShares
        If $oShare.Name <> "IPC$" And $oShare.Name <> "ADMIN$" Then $oShare.Delete() ;看是否保留系统默认共享
Next

pandy05 · 发表于 2012-7-7 08:06:16

本帖最后由 pandy05 于 2012-7-7 12:41 编辑

回复 2# fpquenya

因为打印机还是必须要共享的，执行这个脚本的话共享的打印机都被关闭了，如果要判断共享类型，这个脚本可否实现？

pandy05 · 发表于 2012-7-7 18:52:42

有没有帮忙解答一下啊，实在是干着急啊

fpquenya · 发表于 2012-7-8 01:27:59

回复 4# pandy05

研究了下msdn的说明,下面这个能满足你的要求了.自己也学到了新的东西,呵呵


;-----------------------------------------------
;只删除共享文件夹的共享
;不删除系统默认共享/打印机共享/打印机驱动程序共享
;通过Type和Name来判断
; http://msdn.microsoft.com/en-us/library/aa394435(VS.85).aspx
; 0 (0x0) Disk Drive (print$也为0)
; 1 (0x1) Print Queue
; 2 (0x2) Device
; 3 (0x3) IPC
; 2147483648 (0x80000000) Disk Drive Admin
; 2147483649 (0x80000001) Print Queue Admin
; 2147483650 (0x80000002) Device Admin
; 2147483651 (0x80000003) IPC Admin
;-----------------------------------------------
Local $oWMI,$colShares,$oShare
$oWMI = ObjGet("winmgmts:\\.\root\cimv2")
$colShares = $oWMI.ExecQuery("SELECT * FROM Win32_Share")
For $oShare In $colShares
     If $oShare.Type = 0 And $oShare.Name <> "print$" Then $oShare.Delete()
Next

pandy05 · 发表于 2012-7-9 13:49:53

回复 5# fpquenya

嗯嗯，多谢多谢！终于可以应用上了以解我心头之“恨”！

au3x · 发表于 2012-12-5 10:28:13

		自动登录	找回密码
密码			加入

[系统综合] 请问如何关闭客户端共享文件夹？[已解决]

相关帖子