Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

rafaeloliveira83

Avisar que comando Shell foi encerrado?

Recommended Posts

Estou utilizando o comando Shell para atualizar as diretivas, porem não gostaria que aparecesse o prompt para o usuário então estou tentando mostrar com uma mensagem que o processo foi finalizado, mas está gerando erro no negrito VB.net:

 

Dim gpupdate As Process = Process.Start(shell, "")

 

    Sub Main()      
        Dim shell As String = _
            "Shell(gpupdate /force, vbNormalFocus)"
Dim gpupdate As Process = Process.Start(shell, "")
        AddHandler gpupdate.Exited, AddressOf Process_Exited
        gpupdate.EnableRaisingEvents = True

        Do
            Threading.Thread.Sleep(100)
        Loop Until exited
        RemoveHandler gpupdate.Exited, AddressOf Process_Exited
    End Sub

 

 

    Private Sub Process_Exited(ByVal sender As Object, ByVal e As EventArgs)
        MsgBox("Encerrado")
        exited = True
    End Sub

 

Ocorreu uma exceção sem tratamento do tipo 'System.ComponentModel.Win32Exception' em System.dll

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.