
Chapter 13: Understanding WMI Security 285
WScript.Echo "Trustee" & objItem.Trustee
Wscript.Echo "Type: " & objItem.Type
Wscript.Echo "Inheritance : " & objItem.Inheritance
Wscript.Echo "GuidObjectType:"&objItem.GuidObjectType & vbcrlf
Next
'##### Functions are
below ###
Function funShare(inMask)
Dim strPerm
If inMask AND 0 Then strPerm = strPerm & "FILE_LIST_DIRECTORY, "
If inMask AND 1 Then strPerm = strPerm & "FILE_ADD_FILE, "
If inMask AND 2 Then strPerm = strPerm & "FILE_ADD_SUBDIRECTORY, "
If inMask AND 3 Then strPerm = strPerm & "FILE_READ_EA, "
If inMask AND 4 Then strPerm = strPerm & "FILE_WRITE_EA, "
If inMask AND 5 Then ...