asked on VBSCRIPT To change Ipconfiguration to Obtain an IP address automatically
I found a batch file that resets the network adapter settings. Can someone please convert this to vbscript? Or if someone already has a solution? I need to change the TCP/IP settings to Obtain an IP address automatically and Obtain DNS server address automatically? Can someone please help.
Here is the batch file
@echo off
:prompt
color 1f
cls
echo NETWORK RESET SCRIPT
:test
cls
echo —————————————————-
echo - RELEASING IP…. -
echo —————————————————-
ipconfig /release >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - RESETTING IP LOG… -
echo —————————————————-
@netsh int ip reset C:\Windows\TEMP\IPRESETLOG
echo.
echo Done!
echo.
echo —————————————————-
echo - FLUSHING ARP TABLES… -
echo —————————————————-
@arp -d >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - FLUSHING DNS… -
echo —————————————————-
@ipconfig /flushdns >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - RENEWING IP… -
echo —————————————————-
@ipconfig /renew >nul
echo.
echo Done!
echo.
cls
echo —————————————————-
echo Heres Your Status: -
echo —————————————————-
ipconfig /all
pause
echo.
cls
exit
Please help.
Vicki
Here is the batch file
@echo off
:prompt
color 1f
cls
echo NETWORK RESET SCRIPT
:test
cls
echo —————————————————-
echo - RELEASING IP…. -
echo —————————————————-
ipconfig /release >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - RESETTING IP LOG… -
echo —————————————————-
@netsh int ip reset C:\Windows\TEMP\IPRESETLOG
echo.
echo Done!
echo.
echo —————————————————-
echo - FLUSHING ARP TABLES… -
echo —————————————————-
@arp -d >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - FLUSHING DNS… -
echo —————————————————-
@ipconfig /flushdns >nul
echo.
echo Done!
echo.
echo —————————————————-
echo - RENEWING IP… -
echo —————————————————-
@ipconfig /renew >nul
echo.
echo Done!
echo.
cls
echo —————————————————-
echo Heres Your Status: -
echo —————————————————-
ipconfig /all
pause
echo.
cls
exit
Please help.
Vicki
ProgrammingNetwork ManagementNetworkingShell ScriptingVB Script
Last Comment
Vicki05
ASKER
I just tried it, it does not reset the ipconfiguration to automatic.
Something like this?
https://www.experts-exchange.com/questions/21368494/Write-a-VBScript-to-change-the-Static-IP-setting-to-DHCP.html
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each objNetAdapter In colNetAdapters
errEnable = objNetAdapter.EnableDHCP()
If errEnable = 0 Then
Wscript.Echo "DHCP has been enabled."
Else
Wscript.Echo "DHCP could not be enabled."
End If
Next
https://www.experts-exchange.com/questions/21368494/Write-a-VBScript-to-change-the-Static-IP-setting-to-DHCP.html
ASKER CERTIFIED SOLUTION
THIS SOLUTION ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
ASKER
Woolmilkporc I am getting an error that DHCP could not be enabled.
I am trying to use this on Windows 2000 and Windows XP systems.
I noticed that the batch file does not work on Windows 2000 either.
Please advice.
KCTS
Could you please show me how to put the command in a script?
netsh interface ip set address "Local Area Connection" dhcp
I am trying to use this on Windows 2000 and Windows XP systems.
I noticed that the batch file does not work on Windows 2000 either.
Please advice.
KCTS
Could you please show me how to put the command in a script?
netsh interface ip set address "Local Area Connection" dhcp
ASKER
kCTS
KCTS
netsh interface ip set address "Local Area Connection" dhcp solution did work. I was able to convert it to vbscript.
Thanks for the suggestion.
Vicki
KCTS
netsh interface ip set address "Local Area Connection" dhcp solution did work. I was able to convert it to vbscript.
Thanks for the suggestion.
Vicki
http://support.microsoft.com/kb/197424
- switch to DHCP from VBScript.