@echo off
REM Comment: Tested on Windows 2000 Server English Version.If you want use this script, please replace the Interface name with mine.
setlocal
set IPAddress=%1
set NetMask=%2
set GateWay=%3
if not [%GateWay%]==[] goto :ipwithgw
if [%IPAddress%]==[] goto :usage
if [%NetMask%]==[] goto :c
if %NetMask:~0,3%==255 goto :setall
:setall
netsh interface ip set address name = "Local Area Connection" source = static addr = %IPAddress% mask = %NetMask%
goto end
:C
netsh interface ip set address name = "Local Area Connection" source = static addr = %IPAddress% mask = 255.255.255.0
goto end
:ipwithgw
netsh interface ip set address name = "Local Area Connection" source = static addr = %IPAddress% mask = %NetMask%
netsh interface ip set address name = "Local Area Connection" gateway = %GateWay% gwmetric = 1
goto end
'=====================================================
'FileName: envar.vbs
'Usage: cscript envar.vbs
'Author: joyadam@myrealbox.com
'HomePage: www.sometips.com
'Date: 2001-04-28
'Comment: This Script will query the environments on your machine.
'=====================================================
Set shellobj = CreateObject("WScript.Shell")
WScript.Echo "System environments variables..."
Wscript.Echo "=================================================="
For Each envvar In shellobj.Environment("SYSTEM")
WScript.Echo envvar
Next
WScript.Echo vbCrLf & "Process environments variables..."
Wscript.Echo "=================================================="
For Each envvar In shellobj.Environment("PROCESS")
WScript.Echo envvar
Next
WScript.Echo vbCrLf & "USER environments variables..."
Wscript.Echo "=================================================="
For Each envvar In shellobj.Environment("USER")
WScript.Echo envvar
Next
WScript.Echo vbCrLf & "VOLATILE environments variables..."
Wscript.Echo "=================================================="
For Each envvar In shellobj.Environment("VOLATILE")
WScript.Echo envvar
Next