i := 0 Loop, Reg, HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges, K { ti := RegExReplace(A_LoopRegName,"Range","") if (ti>i) i := ti } list = ( 192.168.9.1 192.168.9.2 192.168.9.3 192.168.9.4 192.168.9.5 ) Loop, Parse, list, `n, `r { if A_LoopField { i++ RegWrite, REG_SZ, HKCU, % "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges\Range" i, :Range, % A_LoopField RegWrite, REG_DWORD, HKCU, % "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\ZoneMap\Ranges\Range" i, http, 0x2 } }
60 queries in 2.091 seconds |