A Windows XP help forum. PCbanter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » PCbanter forum » Microsoft Windows XP » Windows Service Pack 2
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

SP2 Firewall exception for all ports against an IP



 
 
Thread Tools Display Modes
  #1  
Old January 21st 05, 04:57 PM
Dstrider
external usenet poster
 
Posts: n/a
Default SP2 Firewall exception for all ports against an IP

How is it possible set to an exception that allows access to all ports on an
XP SP2 machine from a specific IP (or range of IPs)?
Ads
  #2  
Old January 21st 05, 07:29 PM
Matija Hrovat
external usenet poster
 
Posts: n/a
Default SP2 Firewall exception for all ports against an IP

Hi,
I quite honestly don't know why would you do that ?
Just open the ports that you need and set the right scope to them.
With that said, here you have an example of a code that you could use

open notepad and copy the following text in and save as .vbs
To open a range of ports:
---------------------------------------------
Dim WSHShell, PortStart, PortStop
Set WSHShell = WScript.CreateObject("WScript.Shell")

PortStart = inputbox("The first port you want to open" , "Open a range of
ports")
PortStop = inputbox("The last port you want to open" , "Open a range of
ports")
for i = PortStart to PortStop

WSHShell.run ("netsh firewall add portopening protocol = all port = " & i &
" name = BLA" & i & " mode = enable scope = CUSTOM addresses = 1.1.1.1")
next
---------------------------------------------

To delete a range of ports:
---------------------------------------------
Dim WSHShell, PortStart, PortStop
Set WSHShell = WScript.CreateObject("WScript.Shell")

PortStart = inputbox("The first port you want to delete" , "Delete a range
of ports")
PortStop = inputbox("The last port you want to delete" , "Delete a range of
ports")
for i = PortStart to PortStop

WSHShell.run "netsh firewall delete portopening protocol = all port = " & i


next
---------------------------------------------
Not a pretty one but it will do the job :-)

You can get additional help on opening ports in command prompt by typing:
netsh firewall add portopening /?

!!!!!!!!!!!!!!!!!Once again rather than opening ALL the ports open those you
need:!!!!!!!!!!!!!!!!!!!!
http://docs.hp.com/en/5990-7252/ch01s01.html

Hope this helps.

--

------------------------------------------------------------
For direct e-mailing remove "-spam" from my e-mail address
--
Best Regards,
Matija Hrovat


"Dstrider" wrote in message
...
How is it possible set to an exception that allows access to all ports on
an
XP SP2 machine from a specific IP (or range of IPs)?



 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Similar Threads
Thread Thread Starter Forum Replies Last Post
SP2 and Firewall Scott Micale Windows Service Pack 2 1 September 14th 04 10:36 PM
WinXP SP2 and ZoneAlarm Firewall Steve Windows Service Pack 2 2 September 5th 04 12:27 AM
WinXP SP2 and ZoneAlarm Firewall Steve Windows Service Pack 2 3 September 5th 04 12:27 AM
SP2 Firewall Exceptions - Range of Ports Anon Windows Service Pack 2 1 September 3rd 04 04:30 PM
Turing of SP2 Firewall via registry entry? Sean B Windows Service Pack 2 10 August 29th 04 03:29 AM






All times are GMT +1. The time now is 04:10 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 PCbanter.
The comments are property of their posters.