Inquiridor
Script Ismember

Pergunta
-
Possuo tambem um script ismember que testa se os usuários são membros de determinado grupo no ad e faz algumas alterações
Esse script esta para iniciar por caminho no arquivo bat de login dos usuários
==============================================================
'Cria um loop para ignorar erros de busca.
on error resume next'Declaração do objeto que pesquisa no AD.
Set objSysInfo = CreateObject("ADSystemInfo")
'Todas as variáveis são declaradas antes de serem usadas.
Dim strUserPath
strUserPath = "LDAP://" & objSysInfo.UserName
Set objUser = GetObject(strUserPath)'Laço que verifica o grupo do usuário.
For Each strGroup in objUser.MemberOf
Dim strGroupPath
Dim strGroupName
strGroupPath = "LDAP://" & strGroup
Set objGroup = GetObject(strGroupPath)
strGroupName = objGroup.CN'Executa ação baseado no grupo.
Select Case strGroupName
Case "NomeGrupo1"
createobject("wscript.shell").Run("cmd /c \\servidor\caminho\acoes.bat")
End Select
next
======================================================
só que esta ocorrendo pra alguns usuários quando logan o cmd fica aberto nesse arquivo
por exemplo fica a tela do command aberta e a ultima linha esta assim
\\servidor\caminho\ismember.vbs
e ali fica até que tenha q se fechar a janela manualmente.
Não sei se o teste esta sendo executado ou não, mas enfim tem como colocar tipo um tempo
tipo acho que na bat mesmo
se o arquivo não retornar em 10 segundos pula pro proximo ou algo assim
sei que quando o arquivo vbs q testa os usuários tiver mais testes de grupos ira demorar mais pra executar..
mas esse foi o unico jeito que eu achei pra fazer um ismember..
Alguem tem algum script melhor ou coisa do genero??
Grato
José Luiz
Todas as Respostas
-
-
-
Ola amigo,Você pode escolher utilizar o método Run ou Exec.Para o método Run, você pode escolher esperar pelo programa em execução ou não.Maiores detalhes no link - http://msdn.microsoft.com/en-us/library/d5fk67ky(VS.85).aspxTente também colocar exit no final do script .bat
Eduardo Sampaio -
o script faz simplismente isso
net use s: /del
net use s: \\servidor\caminho /yes
copy "\\servidor\Install_Packages\programa\atalho.lnk" "c:\documents and settings\%username%\desktop\"
mas em alguns usuários (sempre os que não são do grupo) ele fica com o dos aberto no vbs e parece que não consegue verificar ou alguma coisa assim
Obrigado