• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Tắt, khởi động máy

Các thủ thuật về hệ thống, thư mục, tập tin và mạng

Điều hành viên: tungcan5diop, QUANITGROBEST

Hình đại diện của người dùng
NoBi
Quản trị
Quản trị
Bài viết: 948
Ngày tham gia: T.Ba 18/03/2008 1:22 pm
Đến từ: Sài Gòn
Has thanked: 50 time
Been thanked: 66 time
Liên hệ:

Tắt, khởi động máy

Gửi bàigửi bởi NoBi » T.Sáu 28/03/2008 3:08 pm

Thủ thuật: Tắt, khởi động máy
Tác giả: Sưu tầm
Mô tả: Giới thiệu với bạn 2 cách để Shutdown và Restart máy.

Ghi chú:
Nhớ Add Reference thư viện System.Management khi sử dụng cách 2.

Ví dụ:

Mã: Chọn hết

  1. 'Cần thêm vào form 2 button
  2. Imports System.Management
  3.  
  4. Public Class Form1
  5.     Public Enum ShutDown
  6.         LogOff = 0
  7.  
  8.         Shutdown = 1
  9.  
  10.         Reboot = 2
  11.  
  12.         ForcedLogOff = 4
  13.  
  14.         ForcedShutdown = 5
  15.  
  16.         ForcedReboot = 6
  17.  
  18.         PowerOff = 8
  19.  
  20.         ForcedPowerOff = 12
  21.     End Enum
  22.  
  23.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  24.         System.Diagnostics.Process.Start("Shutdown", "-s -t 10")
  25.     End Sub
  26.  
  27.     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  28.  
  29.         Dim W32_OS As New ManagementClass("Win32_OperatingSystem")
  30.  
  31.         Dim inParams, outParams As ManagementBaseObject
  32.  
  33.         Dim result As Integer
  34.  
  35.         W32_OS.Scope.Options.EnablePrivileges = True
  36.         Dim obj As ManagementObject
  37.         For Each obj In W32_OS.GetInstances()
  38.  
  39.             inParams = obj.GetMethodParameters("Win32Shutdown")
  40.  
  41.             inParams("Flags") = ShutDown.ForcedShutdown
  42.  
  43.             inParams("Reserved") = 0
  44.  
  45.             outParams = obj.InvokeMethod("Win32Shutdown", inParams, Nothing)
  46.  
  47.             result = Convert.ToInt32(outParams("returnValue"))
  48.  
  49.             If result  0 Then Throw New System.ComponentModel.Win32Exception(result)
  50.  
  51.         Next
  52.  
  53.     End Sub
  54. End Class


:>

devper94
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 58
Ngày tham gia: T.Bảy 17/05/2008 4:23 pm
Đến từ: +∞
Has thanked: 1 time
Been thanked: 1 time

Re: Tắt, khởi động máy

Gửi bàigửi bởi devper94 » T.Bảy 22/08/2009 9:32 pm

thế không có cách nào dùng managed code hả anh
14A1 860C 5761 3549 13BD 87D6 EEC7 C162 9745 5550

Hình đại diện của người dùng
hagiang01
Bài viết: 8
Ngày tham gia: T.Bảy 20/02/2010 8:54 pm
Đến từ: TX-Ha Giang
Liên hệ:

Re: Tắt, khởi động máy

Gửi bàigửi bởi hagiang01 » T.Tư 24/02/2010 12:44 am

bác còn cái hẹn giờ tắt máy không
cho lên nốt đi bác


Quay về “[.NET] Hệ thống - Tập tin - Thư mục và Mạng”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.1 khách