IP Sıkıntısı

çok teşekkür ederim savaş bey ilgi ve alakanızdan dolayı ..

benim sadece subnet mask değiştirmek için bulduğum vbs komutunun windows 7 de çalışmama sebebi hakkında bir fikriniz var mı acaba?

http://www.cozumpark.com/forums/permalink/332859/334521/ShowThread.aspx#334521

çok teşekkür ederim savaş bey ilgi ve alakanızdan dolayı ..

benim sadece subnet mask değiştirmek için bulduğum vbs komutunun windows 7 de çalışmama sebebi hakkında bir fikriniz var mı acaba?

http://www.cozumpark.com/forums/permalink/332859/334521/ShowThread.aspx#334521

'strIPAddress tanımlı değil.

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

strSubnetMask = Array("255.255.252.0")
strIPAddress = Array("ip adresi") 

For Each objNetAdapter in colNetAdapters

    errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)

    If errEnable = 0 Then
        WScript.Echo "The IP address has been changed."
    Else
        WScript.Echo "The IP address could not be changed."
    End If
Next

strIPAddress olmadan çalışıyor komut XP de ama Windows 7 de çalışmıyor savaş bey ..

strIPAddress olmadan çalışıyor komut XP de ama Windows 7 de çalışmıyor savaş bey ..

Hayır Ahmet Bey strIPAdress eksik olduğunda her iki sistemde de çalışmaz. Scriptin ilk halinde

strIPAddress = objNetAdapter.IPAddress

şeklinde tanımlı bir satır var. Buradaki komut strIPAddress'e bilgisayarın ip adresinin atamasını yapıyor; ancak

errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)

 komutu Windows 7'de çalışmıyor, Xp'de çalışması çokta olağan dışı bir durum değil. Syntax ile ilgili sıkıntı var. Grameri Windows 7'ye uyarlamak gerekiyor. Birde şu var

strSubnetMask = Array("255.255.252.0")

strSubnetMask içindeki veri neden array dizisine atılmış hâlâ çözebilmiş değilim. Bununla birlikte

strSubnetMask = Array("255.255.252.0")
strIPAddress = Array("192.168.1.100")
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)

şeklinde ayarlayınca windows 7'de çalışıyor. Windows ortamında nerden baksan 2 yıldır hiç scirpt yazmadığım için olayın halledilebilir başka bir mevzuatı var mı yok mu hatırlayamıyor/bilemiyorum maalesef.

Bu arada subnet'i neden değiştirmek istiyorsunuz? DHCP kullanacaksanız, bunlarla uğraşmak gerekmiyor.