win 2008 创建共享无权限访问,2003可以

InternetAutodial 2012-01-04 04:56:26

Set objSWbemServices = objSWbemLocator.ConnectServer(strComputer,strNameSpace,strUser,strPassword)
'objSWbemServices.Security_.ImpersonationLevel = wbemImpersonationLevelImpersonate
'objSWbemServices.Security_.AuthenticationLevel = wbemAuthenticationLevelPktPrivacy

if funType=0 then
' create Share folder
Set objNewShare = objSWbemServices.Get("Win32_Share")
errReturn = objNewShare.Create(sharebaseDir,shareDir, FILE_SHARE,MAXIMUM_CONNECTIONS, "Public share for the Finance group.")


strUser为administrator

在2003 上面利于程序创建后,有everyone 权限,可以访问

但2008 创建成功,但没有everyone权限,不可访问

请教大家,谢谢了 2008可以实现吗?
...全文
187 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复

4,008

社区成员

发帖
与我相关
我的任务
社区描述
它是一种微软环境下的轻量级的解释型语言,它使用COM组件、WMI、WSH、ADSI访问系统中的元素,对系统进行管理。
社区管理员
  • vbScript社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧