Как проверить, установлен ли объект?

Question

у меня есть:

'Set logFileObj = fso.CreateTextFile("cit.log",True)  
if logFileObj = "" then 
    WScript.StdOut.WriteLine "logFileObj not set" 
else 
    WScript.StdOut.WriteLine "logFileObj set" 
end if 

Это работает. Тогда я стараюсь:

Set logFileObj = fso.CreateTextFile("cit.log",True)  
if logFileObj = nothing then 
    WScript.StdOut.WriteLine "logFileObj not set" 
else 
    WScript.StdOut.WriteLine "logFileObj set" 
end if 

и я получаю Microsoft VBScript runtime error: Object doesn't support this property or method

Я заменил if logFileObj = "" then с if logFileObj = nothing then

Answer 1

Чтобы сравнивать что-то Nothing, вам необходимо использовать Is, а не =:

Set logFileObj = fso.CreateTextFile("cit.log", True) 
If logFileObj Is Nothing Then 
    WScript.StdOut.WriteLine "logFileObj not set" 
Else 
    WScript.StdOut.WriteLine "logFileObj set" 
End If 

Это потому, что = не может быть использована для сравнения ссылок на объекты в VBScript, и Nothing является ссылка на пустой объект.

Смотрите документацию по Nothing для получения дополнительной информации: https://msdn.microsoft.com/en-us/library/f8tbc79x(v=vs.84).aspx

Answer 2

Вы можете использовать IsObject для этого, как показано в коде ниже: -

if isobject(logFileObj) then 
    WScript.StdOut.WriteLine "logFileObj not set" 
else  
    WScript.StdOut.WriteLine "logFileObj set" 
end if