Đang chuẩn bị liên kết để tải về tài liệu:
Script - Những bước đầu tiên về scripting

Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ

Tìm hiểu kỹ thuật scripting remote (viết kịch bản chạy trên các máy từ xa) sử dụng lớp WMI Win32_NetworkAdapterConfiguration đã được giới thiệu ở phần trước. Trở lại với script ChangeIPAddress.vbs mà chúng ta đã phát triển ở các phần trước để thay đổi địa chỉ IP của một bộ điều hợp mạng: Option Explicit Dim objWMIService Dim objNetAdapter Dim strComputer Dim strAddress Dim arrIPAddress Dim arrSubnetMask Dim colNetAdapters Dim errEnableStatic If WScript.Arguments.Count = 0 Then Wscript.Echo "Usage: ChangeIPAddress.vbs new_IP_address" WScript.Quit End If strComputer = "." strAddress = Wscript.Arguments.Item(0) arrIPAddress = Array(strAddress) arrSubnetMask = Array("255.255.255.0") Set objWMIService = GetObject("winmgmts:\\" &. | Quản lý các mạng Windows dùng script - Phần 6 Những bước đầu tiên về scripting remote Tìm hiểu kỹ thuật scripting remote viết kịch bản chạy trên các máy từ xa sử dụng lớp WMI Win32_NetworkAdapterConfiguration đã được giới thiệu ở phần trước. Trở lại với script ChangelPAddress.vbs mà chúng ta đã phát triển ở các phần trước để thay đổi địa chỉ IP của một bộ điều hợp mạng Option Explicit Dim objWMIService Dim objNetAdapter Dim strComputer Dim strAddress Dim arrIPAddress Dim arrSubnetMask Dim colNetAdapters Dim errEnableStatic If WScript.Arguments.Count 0 Then Wscript.Echo Usage ChangeIPAddress.vbs new_IP_address WScript.Quit End If strComputer . strAddress Wscript.Arguments.Item O arrIPAddress Array strAddress arrSubnetMask Array 255.255.255.0 Set objWMIService GetObject winmgmts strComputer root cimv2 Set colNetAdapters objWMIService.ExecQuery Select from Win32_NetworkAdapterConfiguration where IPEnabled TRUE For Each objNetAdapter in colNetAdapters errEnableStatic objNetAdapter.EnableStatic arrIPAddress arrSubnetMask Next Chú ý là các chú thích đã được loại bỏ và phần mã ở cuối hiển thị kết quả. Điểm qua lại một chút về hoạt động của script này 1. Kết nối tới namespace root cimv2 trên máy cục bộ. 2. Sử dụng một lệnh SELECT để trả về tập hợp các cấu hình bộ điều hợp mạng có đường bao TCP IP và được phép sử dụng. 3. Thay đổi địa chỉ IP của bộ điều hợp thành giá trị được mô tả trong tham số dòng lệnh. Chúng ta đã ghi lại script này trong thư mục C localtest trên một máy Windows XP có địa chỉ IP tĩnh là 172.16.11.43. Sau đó mở của sổ dòng lệnh Command Prompt với vai trò admin trên máy và sử dụng script này để thay đổi địa chỉ IP của máy thành 172.16.11.54 C locatest ipconfig Windows IP Configuration Ethernet adapter Local Area Connection Connection-specific DNS Suffix . IP Address. 172.16.11.43 Subnet Mask. 255.255.255.0 Default Gateway. 172.16.11.1 C locatest ChangeIPAddress.vbs 172.16.11.54 Microsoft R Windows Script Host Version 5.6 Copyright C Microsoft Corporation