Forum
Merhabalar;
domaine dahil olan pc lerin isimlerini değiştiren script arıyorum. Tabii isim değişiceği için AD üzerinde de değişiklikler yapması gerekiyor. 2 ayrı script ile olabilir ama bunu 1 script'te yapabilme imkanımız var mı?
Teşekkürler
Rahmi Demir
Merhaba
aşağıdakiscript i deneyebilirsiniz
Name = InputBox("Enter the new computer name below and click OK to
continue","Rename: Step 1")
Password = "techlab"
Username = "wgmanager"
Set objWMIService = GetObject("Winmgmts:root\cimv2")
' Call always gets only one Win32_ComputerSystem object.
For Each objComputer in _
objWMIService.InstancesOf("Win32_ComputerSystem")
Return = objComputer.rename(Name,Password,User)
If Return <> 0 Then
WScript.Echo "Rename failed. Error = " & Err.Number
Else
WScript.Echo "Rename succeeded." & " Reboot for new name
to go into effect"
End If
Next
DomainName = InputBox("Enter the Domain to join this computer to and
click OK to continue","Rename: Step 1")
DomainPassword = "password"
DomainUsername = "username"
Set objWMIService = GetObject("Winmgmts:root\cimv2")
' Call always gets only one Win32_ComputerSystem object.
For Each objComputer in _
objWMIService.InstancesOf("Win32_ComputerSystem")
Return =
objComputer.JoinDomainOrWorkgroup(DomainName,DomainPassword,DomainUsername)
If Return <> 0 Then
WScript.Echo "Rename failed. Error = " & Err.Number
Else
WScript.Echo "Rename succeeded." & " Reboot for new name
to go into effect"
End If
Next
Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************
maalesef bu script ile wrkgrp name değişiyor.
Bu scripte FQDN yazınca olmuyor mu?
http://gallery.technet.microsoft.com/ScriptCenter/en-us/1647bfaa-0feb-4e53-bd90-0fcccbfe2887
Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************