'set globals Set oshell = CreateObject("Wscript.shell") Set ofso = CreateObject("Scripting.FileSystemObject") Set env = oshell.Environment("process") strFileName = env("systemroot") & "\system32\drivers\etc\hosts" Dim WSHShell,strRegKey 'ask for route info strgw =InputBox ("Please enter IP for Pix-ASA", "Gateway IP") 'check if strgw is blank If strgw = "" Then WScript.quit End If 'add static routes oshell.run "route -p add 10.26.90.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.12.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.13.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.14.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.15.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.16.0 mask 255.255.254.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.20.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.45.0 mask 255.255.255.128 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.45.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.71.65.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.190.0.55 mask 255.255.255.255 " & strgw & " metric 1",1,True oshell.run "route -p add 10.194.27.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.198.65.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.199.60.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.199.232.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.199.233.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.32.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.34.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.38.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.54.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.96.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.112.0 mask 255.255.240.0 " & strgw & " metric 1",1,True oshell.run "route -p add 10.223.228.0 mask 255.255.252.0 " & strgw & " metric 1",1,True oshell.run "route -p add 170.1.53.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 170.150.224.202 mask 255.255.255.255 " & strgw & " metric 1",1,True oshell.run "route -p add 199.107.238.205 mask 255.255.255.255 " & strgw & " metric 1",1,True oshell.run "route -p add 205.132.211.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 205.132.212.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 205.132.213.0 mask 255.255.255.0 " & strgw & " metric 1",1,True oshell.run "route -p add 205.132.214.0 mask 255.255.255.0 " & strgw & " metric 1",1,True MsgBox("Thanks for updating this PC!")