Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

ISA 2001/VBScript help: View port range (and disable some ports)

Posted on 2008-10-20
4
Medium Priority
?
308 Views
Last Modified: 2012-05-05
Hi All,

I've been asked to run the script below by a vendor.  But before i run it i would like to know if these ports are availible for these protocols, and how i could remove the changes if it doesn't fix the issue we are experiencing.

Found this on the net, but not sure how to get the current ports or delete existing ones.
http://msdn.microsoft.com/en-us/library/aa491817.aspx


many thanks
set isa=CreateObject("FPC.Root")
set tprange=isa.Arrays.GetContainingArray.ArrayPolicy.WebProxy.TunnelPortRanges
set tmp=tprange.AddRange("ICA 1494", 1494, 1494)
set tmp=tprange.AddRange("CGP 2598", 2598, 2598)
tprange.Save
MsgBox("Done")

Open in new window

0
Comment
Question by:detox1978
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2
4 Comments
 
LVL 51

Accepted Solution

by:
Keith Alabaster earned 2000 total points
ID: 22764735
easy enough.

The script you have there is only a part of it though. There is no such thing as ISA2001 - there is isa2000, 2004 and 2006 as fas as the outside world is concerned.

Use the site www.isatools.org (courtesy jim Harrison) and look in the tools sections of the version of ISA you actually have.
You will see the ISA tunnel port extender software. Use the tool with no parameters and it will show you the ports already allowed. read the syntax and it will show you how to add additional ports, a port range and how to delete existing ones.

Keith
0
 
LVL 2

Author Comment

by:detox1978
ID: 22766008
Sorry my mistake.  It's ISA 2000.

Will download it now.
0
 
LVL 2

Author Comment

by:detox1978
ID: 22766074
Thanks, have run the script and it doesn't return any details for ICA and CGP.

If i run my script would the below script undo my changes?


set isa=CreateObject("FPC.Root")
set tprange=isa.Arrays.GetContainingArray.ArrayPolicy.WebProxy.TunnelPortRanges
set tmp=tprange.DelRange("ICA 1494", 1494, 1494)
set tmp=tprange.DelRange("CGP 2598", 2598, 2598)
tprange.Save
MsgBox("Done")

Open in new window

0
 
LVL 51

Expert Comment

by:Keith Alabaster
ID: 22769432
No, the script will be fine
0

Featured Post

Manage your data center from practically anywhere

The KN8164V features HD resolution of 1920 x 1200, FIPS 140-2 with level 1 security standards and virtual media transmissions at twice the speed. Built for reliability, the KN series provides local console and remote over IP access, ensuring 24/7 availability to all servers.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Deploying a Microsoft Access application in a Citrix environment is not difficult but takes a few steps. However, Citrix system people are often of little help, as they typically know next to nothing about Access. The script provided here will take …
This article offers some helpful and general tips for safe browsing and online shopping. It offers simple and manageable procedures that help to ensure the safety of one's personal information and the security of any devices.
Michael from AdRem Software explains how to view the most utilized and worst performing nodes in your network, by accessing the Top Charts view in NetCrunch network monitor (https://www.adremsoft.com/). Top Charts is a view in which you can set seve…
In this video, Percona Solution Engineer Dimitri Vanoverbeke discusses why you want to use at least three nodes in a database cluster. To discuss how Percona Consulting can help with your design and architecture needs for your database and infras…

715 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question