使用ISA的話，有可能就需要限制or允許訪問一大堆網站。
如果手工一條條在URL集裏面輸入，如果是幾百條，那一定是一個噩夢。
還好，很多事情都有腳本，都有批處理。
以下內容，保存爲vbs文件即可。
===========複製以下============
Dim ISA_Urls
Dim UrlFile
ISA_Urls=InputBox("請輸入你已經在ISA服務器URL對象集裏面建立的URL集名稱。"&vbCr&"此對象必須已經建立。","")
UrlFile=InputBox("請輸入已經整理好的URL文件名，必須包含擴展名。"&vbCr&"該txt文件必須放到vbs的同一個目錄下。"&vbCr&"必須每行一個URL，且URL不能重複。","")
WScript.Echo "單擊確定，開始運行批處理。"
Set Isa = CreateObject("FPC.Root")
Set CurArray = Isa.GetContainingArray
Set RuleElements = CurArray.RuleElements
Set URLSets = RuleElements.URLSets
Set URLSet = URLSets.Item(ISA_Urls)
Set FileSys = CreateObject("Scripting.FileSystemObject")
Set UrlsFile = FileSys.OpenTextFile(UrlFile, 1)
For i = 1 to URLSet.Count
URLSet.Remove 1
Next
Do While UrlsFile.AtEndOfStream <> True
URLSet.Add UrlsFile.ReadLine
Loop
CurArray.Save
WScript.Echo "全部網址已經添加，請刷新ISA控制檯察看。"
'===================================
'原腳本由ISA中文站風間子製作
'飛翔文苑修改增加InputBox提示
'2010-04-05
'===================================
===========複製以上============