Easily Repair a Corrupt Internet Connection

in XP/2003 you can also do this from the command-line

“netsh int ip reset c:resetlog.txt”

documented here: http://support.microsoft.com/kb/299357

thanks

The website in the above post popped up as a virus (trojan) in Avast:
megaupload.com/?d=HJDU7Y9M

Here is the original script used to create the application from megaupload.com/?d=HJDU7Y9M
I have posted the code because the application was being reported as a virus.
I know it was never a virus and hope you accept my apologies.

Nostrals :o)

copy and paste the following into notepad and save as Auto Repair Network Connection.vbs

MsgBox(“This application is provided without any warranty, either expressed or implied. * You run this application at your own risk! *”)
vB = MsgBox(“You are about to run ipconfig /renew (once) & then netsh int ip reset vLog.log (every 60 second’s) in the background”,1)
Dim vS , vF
Set vS = WScript.CreateObject(“WScript.Shell”)
Set vF = CreateObject(“Scripting.FileSystemObject”)
If vB 1 Then
Set vF = Nothing
Set vS = Nothing
WScript.Quit(0)
Else
vS.Run “%Comspec% /c ipconfig /renew”, 0
WScript.Sleep 3000
Do
vS.Run “%Comspec% /c netsh int ip reset vLog.log”, 0
WScript.Sleep 60000
If vF.FileExists(“vLog.log”) then
vF.DeleteFile “vLog.log”
End if
Loop
end if

heres a cut down version

Dim vS , vF
Set vS = WScript.CreateObject(“WScript.Shell”)
Set vF = CreateObject(“Scripting.FileSystemObject”)
vS.Run “%Comspec% /c ipconfig /renew”, 0
WScript.Sleep 3000
Do
vS.Run “%Comspec% /c netsh int ip reset vLog.log”, 0
WScript.Sleep 60000
If vF.FileExists(“vLog.log”) then
vF.DeleteFile “vLog.log”
End if