S
Sean
Please can anyone help me apply the script below. I don't know how to do it
or even where to start.
The problem I have is that in Windows 2003 Standard, I receive an error
message when I try to enable Routing and Remote Access from Start > All
programs > Admin Tools > Routing and Remote Access > Right click Server and
then click "Configure and Enable Routing and Remote Access". At this point
an error occurs saying: "ICF is currently enabled on SERVER. To configure
RRAS, please disable ICF and try again."
I found in Google the following link:
http://www.mcse.ms/archive46-2004-3-5951.html
It describes the same problem and gives the following suggestion to try:
within a vb script file called: enumconnection
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.InstancesOf("HNet_ConnectionProperties")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
within a vb script file called: listsicfistrue
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsFi
rewalled = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsIc
sPublic = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsIc
sPublic = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
within a vb script file called: disableicfall
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.InstancesOf("HNet_ConnectionProperties")
for each obj in objs
obj.IsFirewalled = FALSE
obj.Put_
next
Can anyone help me as to how I can apply it ? I have no idea how to start.
Thanks a lot.
or even where to start.
The problem I have is that in Windows 2003 Standard, I receive an error
message when I try to enable Routing and Remote Access from Start > All
programs > Admin Tools > Routing and Remote Access > Right click Server and
then click "Configure and Enable Routing and Remote Access". At this point
an error occurs saying: "ICF is currently enabled on SERVER. To configure
RRAS, please disable ICF and try again."
I found in Google the following link:
http://www.mcse.ms/archive46-2004-3-5951.html
It describes the same problem and gives the following suggestion to try:
within a vb script file called: enumconnection
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.InstancesOf("HNet_ConnectionProperties")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
within a vb script file called: listsicfistrue
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsFi
rewalled = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsIc
sPublic = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.ExecQuery("SELECT * FROM HNet_ConnectionProperties WHERE IsIc
sPublic = TRUE")
for each obj in objs
WScript.Echo obj.GetObjectText_
next
within a vb script file called: disableicfall
set WMI = GetObject("WinMgmts:\root\Microsoft\HomeNet")
set objs = WMI.InstancesOf("HNet_ConnectionProperties")
for each obj in objs
obj.IsFirewalled = FALSE
obj.Put_
next
Can anyone help me as to how I can apply it ? I have no idea how to start.
Thanks a lot.