Boa tarde, tenho um script para inicialização de vários programas, porém alguns deles possuem usuários padrões... É possível configurar o script para colocar os dados de usuário automáticamente e se logue?
Dim intOpcao
intOpcao = msgbox("Deseja abrir todas as tecnologias?", vbYesNo)
if intOpcao = vbYes then
Set WshShell = WScript.CreateObject("WScript.Shell")
msgbox("As tecnologias serão abertas: ControlFleet, Omnilink, Onixsat, Sascar, Sighra")
WshShell.Run "C:\Users\Public\Tecnologias\ControlFleet\ControlFleet.exe", 1, false
WshShell.Run "C:\Users\Public\Tecnologias\Onix\OnixClientV4.exe", 1, false
WshShell.Run "C:\SAVER2000\MR\EZModRas.exe", 1, false
WshShell.Run "C:\Users\Public\Tecnologias\Sighra\SIGhRA_Monitor\Monitor.exe", 1, false
WshShell.Run "C:\Users\Public\Tecnologias\Sascar\sasgc-2.1.43.exe", 1, false
end if
Pergunta
francinerosa
Boa tarde, tenho um script para inicialização de vários programas, porém alguns deles possuem usuários padrões... É possível configurar o script para colocar os dados de usuário automáticamente e se logue?
Dim intOpcao intOpcao = msgbox("Deseja abrir todas as tecnologias?", vbYesNo) if intOpcao = vbYes then Set WshShell = WScript.CreateObject("WScript.Shell") msgbox("As tecnologias serão abertas: ControlFleet, Omnilink, Onixsat, Sascar, Sighra") WshShell.Run "C:\Users\Public\Tecnologias\ControlFleet\ControlFleet.exe", 1, false WshShell.Run "C:\Users\Public\Tecnologias\Onix\OnixClientV4.exe", 1, false WshShell.Run "C:\SAVER2000\MR\EZModRas.exe", 1, false WshShell.Run "C:\Users\Public\Tecnologias\Sighra\SIGhRA_Monitor\Monitor.exe", 1, false WshShell.Run "C:\Users\Public\Tecnologias\Sascar\sasgc-2.1.43.exe", 1, false end ifLink para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.