|
I`m new to kixtart and am having troubles with a script i`m writing, every time i run it on a win98 machine it tells me there is an error in the parameters on the delvalue command though using the same command on a win2k works properly. Is there something obvious i'm missing or what? Anyway here's the code and thanks for any help.
$index=0
$key=0
$currip=0
$err=0
If @INWIN <> 1 ; check windows version
$key=EnumKey(hkey_local_machine\system\currentcontrolset\services\class\nettrans,$index)
$err=@ERROR
$currip=ReadValue('hkey_local_machine\system\currentcontrolset\services\class\nettrans\$key','ipaddress')
If $err=0 AND $currip<>'0.0.0.0'; check it needs changing and perform changes
WriteValue('hkey_local_machine\system\currentcontrolset\services\class\nettrans\$key','ipaddress','0.0.0.0','reg_sz')
WriteValue('hkey_local_machine\system\currentcontrolset\services\class\nettrans\$key','ipmask','0.0.0.0','reg_sz')
WriteValue('hkey_local_machine\system\currentcontrolset\services\vxd\mstcp','enabledns','0','reg_sz'
DelValue('hkey_local_machine\system\currentcontrolset\services\vxd\mstcp','nameserver')
EndIf
EndIf
Exit
| 
