检查共享是否存在 - 如果存在则继续答案

【问题标题】：Check if share exists - if so then continue检查共享是否存在 - 如果存在则继续
【发布时间】：2011-11-02 12:22:07
【问题描述】：

我有以下代码，我想做的就是检查服务器上是否存在名为“temp”的共享。如果是这样，那么它需要继续做一些我将添加的更多代码。

如果没有，那么我希望它运行 WDS 将创建共享的其他一些代码。

我知道我在这方面出了问题，因此我们将不胜感激！目前，当我在具有“临时”共享的计算机上运行它时，它说共享不存在......什么时候存在！？

 strComputer = "." 
 Set objWMIService = GetObject("winmgmts:" _
     & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

 strShareName = "temp" 
  Set colShares = objWMIService.ExecQuery("Select * from Win32_Share Where Name = '" & strShareName & "'")

 For each objShare in colShares 
 If (Err.Number <> 0) Then 
 WScript.Echo "Share Exists" 
 Else 
 Wscript.Echo "Share Does not exists" 
 End If 
 Next

【问题讨论】：

标签： vbscript

【解决方案1】：

你的“如果存在”逻辑是错误的。变化：

If (Err.Number <> 0) Then

到

If (Err.Number = 0) Then

在这种情况下，Err.Number 为 0（即没有错误）表示共享存在。

【讨论】：