2010-07-16 20:49

/* Displays information about all the Indexing Service scopes found on the local computer. */
objadminis = createcomobject("Microsoft.ISAdm")
IF objadminis~findfirstcatalog() = 0 THEN DO
    objcatadm = objadminis~getcatalog()
    objscopeadm = objcatadm~getscope()
    SAY "Alias:" objscopeadm~alias
    SAY "Exclude scope:" objscopeadm~excludescope
    SAY "Logon:" objscopeadm~logon
    SAY "Path:" objscopeadm~path
    SAY "Virtual scope:" objscopeadm~virtualscope

    DO WHILE objadminis~findnextcatalog() = 0
        objcatadm = objadminis.getcatalog()
        objscopeadm = objcatadm~getscope()
        SAY "Alias:" objscopeadm~alias
        SAY "Exclude scope:" objscopeadm~excludescope
        SAY "Logon:" objscopeadm~logon
        SAY "Path:" objscopeadm~path
        SAY "Virtual scope:" objscopeadm~virtualscope
    END
END

2010-07-16 20:49