colegas, o script abaixo inseri o servidor para quando o usuario de rede efetuasse o logon que aparece a mensagem de bom dia, boa tarde ou boa noite.....
eu gostaria de retirar o botao OK e inserir um temporizador de 5 segundos para que o usuario não tivesse que clicar no botao ok para a mensagem sair, como poderia fazer isso???
Set objUser = WScript.CreateObject("WScript.Network")
wuser=objUser.UserName
If Time <= "12:00:00" Then
MsgBox ("Bom Dia Jose da silva Seja Bem Vindo a Rede Corporativa!!")
ElseIf Time >= "12:00:01" And Time <= "18:00:00" Then
MsgBox ("Boa Tarde Jose da silva Seja Bem Vindo a Rede Corporativa!!")
Else
MsgBox ("Boa Noite Jose da silva Seja Bem Vindo a Rede Corporativa!!")
End If
Set wshell = WScript.CreateObject("wscript.shell")
Pergunta
Guest - Analista -
colegas, o script abaixo inseri o servidor para quando o usuario de rede efetuasse o logon que aparece a mensagem de bom dia, boa tarde ou boa noite.....
eu gostaria de retirar o botao OK e inserir um temporizador de 5 segundos para que o usuario não tivesse que clicar no botao ok para a mensagem sair, como poderia fazer isso???
Set objUser = WScript.CreateObject("WScript.Network")
wuser=objUser.UserName
If Time <= "12:00:00" Then
MsgBox ("Bom Dia Jose da silva Seja Bem Vindo a Rede Corporativa!!")
ElseIf Time >= "12:00:01" And Time <= "18:00:00" Then
MsgBox ("Boa Tarde Jose da silva Seja Bem Vindo a Rede Corporativa!!")
Else
MsgBox ("Boa Noite Jose da silva Seja Bem Vindo a Rede Corporativa!!")
End If
Set wshell = WScript.CreateObject("wscript.shell")
wshell.Run "net time /RSTDOMAIN:......"
Set wshell=Nothing
Link para o comentário
Compartilhar em outros sites
1 resposta 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.