VIsual Basic 2008 + Vista + Windows Shutdown

[xVIKINGx]

Нужна реализация выключения компьютера. Прешел с VB6+XP. Там все отлично работало, а вот в VB2008 завершение windows vista не работает.
Помогите разобраться, как реализовать выключение компьютера.
В этом деле практически новичок, так что буду благодарен, если распишите все подробно.


P.S.
→ По форуму искал, но не нашел подобного вопроса.

[Williams]

Код: Выделить всё

Private Sub ShutDownRestart(ByVal bRestart As Boolean)

        Dim shutdownProcessInfo As New ProcessStartInfo
        shutdownProcessInfo.FileName = "ShutDown"

        shutdownProcessInfo.CreateNoWindow = True

        Dim shutdownProcess As New Process



        If bRestart Then

            '#Reboot computer option
            shutdownProcessInfo.Arguments = "-r -f" '/force

        Else

            '#Shutdown computer option
            shutdownProcessInfo.Arguments = "-s -f" '/force

        End If

        shutdownProcess.StartInfo = shutdownProcessInfo

        shutdownProcess.Start()
        shutdownProcess.WaitForExit()



        shutdownProcess.Close()
        shutdownProcessInfo = Nothing

        Application.Exit()



    End Sub


Фрагмент одного из моих проектов. ЗЫ: под Вистой не проверял. Но должно работать.

[xVIKINGx]

Спасибо, работает!

[Денис]

Хех, создает консольку без окна, посылает ей команду "shutdown -r -f" и капут.

[Sebas]

вот-вот) причём нет гарантии, что комп выключился))))

кстати, shutdown RC возвращает?