Bilgisayarinizin ag ayarlariniza WINS sunucusu veya sunuculari eklemek istiyorsaniz asagidaki scripti kullanarak bunu rahatca yapabilirsiniz. strPrimaryServer ve strSecondaryServer degiskenlerini WINS sunucunuzun veya sunucularin IP adres bilgileri ile guncelleyiniz, sadece bir adet sunucunuz var ise strSecondaryServer server degiskenini ve SetWINSServer dan strSecondaryServer i kaldirabilirsiniz.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colNetCards = objWMIService.ExecQuery _ ("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True") For Each objNetCard in colNetCards strPrimaryServer = "192.168.1.100" strSecondaryServer = "192.168.1.200" objNetCard.SetWINSServer strPrimaryServer, strSecondaryServer Next
www.infralib.com
Yeni sitemiz http://www.infralib.com 'u ziyaret ediniz. Yeni yazılarım başka yazarlarında katkılarıyla artık bu adreste. Ayrıca çok yakında forum, video, webcast gibi bölümlerde yayında olacak.
