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 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:\"...
Nội dung trích xuất từ tài liệu:
Quản lý các mạng Windows dùng script - Phần 6: Những bước đầu tiên về scripting remoteQuản lý các mạng Windows dùng script - Phần 6: Những bước đầu tiênvề scripting remoteTì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 đã đượcgiớ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ầntrước để thay đổi địa chỉ IP của một bộ điều hợp mạng:Option ExplicitDim objWMIServiceDim objNetAdapterDim strComputerDim strAddressDim arrIPAddressDim arrSubnetMaskDim colNetAdaptersDim errEnableStaticIf WScript.Arguments.Count = 0 Then Wscript.Echo Usage: ChangeIPAddress.vbsnew_IP_address WScript.QuitEnd IfstrComputer = .strAddress = Wscript.Arguments.Item(0)arrIPAddress = Array(strAddress)arrSubnetMask = Array(255.255.255.0)Set objWMIService = GetObject(winmgmts:\ &strComputer & ootcimv2)Set colNetAdapters =objWMIService.ExecQuery(Select * fromWin32_NetworkAdapterConfiguration whereIPEnabled=TRUE)For Each objNetAdapter in colNetAdapters errEnableStatic =objNetAdapter.EnableStatic(arrIPAddress,arrSubnetMask)NextChú ý 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 rootcimv2 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áyWindows XP có địa chỉ IP tĩnh là 172.16.11.43. Sau đó, mở của sổ dònglệ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>ipconfigWindows IP ConfigurationEthernet 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.1C:locatest>ChangeIPAddress.vbs 172.16.11.54Microsoft (R) Windows Script Host Version 5.6Copyright (C) Microsoft Corporation 1996-2001. Allrights reserved.C:locatest>ipconfigWindows IP ConfigurationEthernet adapter Local Area Connection: Connection-specific DNS Suffix . : IP Address. . . . . . . . . . . . :172.16.11.54 Subnet Mask . . . . . . . . . . . :255.255.255.0 Default Gateway . . . . . . . . . :172.16.11.1C:locatest>Chú ý 1: Nên nhớ rằng, để thay đổi địa chỉ IP trên máy Windows XP đòi hỏiphải sử dụng đặc quyền quản trị cục bộ. Do đó, nếu bạn hiện đang đăngnhập vào máy với vai trò người dùng miền bình thường, cần phải mở cửa sổCommand Prompt, sau đó gõ lệnh: runas /user:administrator cmd.exe đểmở một cửa sổ Command Prompt thứ hai chạy trong ngữ cảnh của vai tròquản trị cục bộ và cuối cùng là chạy script từ cửa sổ Command Prompt thứhai này.Nhưng nếu muốn chạy script trên một máy và sử dụng nó để thay đổi địa chỉIP của một máy khác thì sao? Nói cách khác, chúng ta muốn chạy script từxa trên một máy Windows XP ở xa thì phải làm như thế nào?Cố gắng đầu tiênChúng ta hãy bắt đầu bằng việc đăng nhập vào một trạm làm việc adminxp.contoso.com, sử dụng thông tin thẩm định của một tài khoản admin cótên là Mary Jones. Chúng ta cần thực hiện điều này vì các admin miền cóđặc quyền quản trị cục bộ trên tất cả các máy trong miền. Do đó, khi chạyscript từ trạm admin trên một máy từ xa, script sẽ hoạt động.Bây giờ chúng ta đã có script ChangeIPAddress.vbs trong thư mục C: oolsở trạm admin xp.contoso.com. Mở cửa sổ lệnh Command Prompt trên máynày và gõ vào hai dòng sau:C:Documents and Settingsmjones>cd oolsC: ools>notepad ChangeIPAddress.vbsScript được mở trong Notepad, thay đổi dòng bên dưới:strComputer = .thành:strComputer = xp2 Sau đó vào File/Save để ghi lại thay đổi và đóng Notepad. Bây giờ, chạyscript:C: ools>ChangeIPAddress.vbs 172.16.11.65Microsoft (R) Windows Script Host Version 5.6Copyright (C) Microsoft Corporation 1996-2001. Allrights reserved.C: oolsChangeIPAddress.vbs(20, 1) MicrosoftVBScript runtime error: The remote server machinedoes not exist or is unavailable: GetObjectC: ools>Chú ý là sẽ phải mất một lúc trước khi thông báo lỗi ở trên xuất hiện. Nhưngnhư vậy script có làm việc không? Nếu đăng nhập vào máy từ xaxp2.contoso.com, mở cửa sổ Command Prompt và gõ ipconfig, kết quả thuđược sẽ là:C:locatest>ipconfigWindows IP ConfigurationEthernet adapter Local Area Connection: Connection-specific DNS Suffix . : IP Address. . . . . . . . . . . . :172.16.11.43 Subnet Mask . . . . . . . . . . . :255.255.255.0 ...