Pytanie : Sprawdzać używać maszyna the notować na użytkownik IE położenie na który konfiguracja używać.

Cześć,

Check używać maszyna the notować na użytkownik IE położenie na który konfiguracja używać.

ISA lub the auto config script.

Regards
Sharath
Attachments:

Odpowiedź : Sprawdzać używać maszyna the notować na użytkownik IE położenie na który konfiguracja używać.

sprawdzać ono ono:
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
Const HKEY_CURRENT_USER = &H80000001
strComputer = "."
const ALL_ENABLED = 15
const AUTO_DETECT_AUTO_CONFIG_SCRIPT = 13
const AUTO_DETECT_PROXY_SERVER = 11
const PROXY_SERVER = 3
const AUTO_DETECT = 9
const AUTO_CONFIG_SCRIPT_PROXY_SERVER = 7
const AUTO_CONFIG_SCRIPT = 5
const MSG_PROXY_SERVER = "Prokurent Serwer umożliwiać"
const MSG_AUTO_CONFIG_SCRIPT = "Auto config pismo umożliwiać"
const MSG_AUTO_DETECT_SETTINGS = "Samochód wykrywać położenie umożliwiać"

Ustalony objRegistry = GetObject ("winmgmts: {impersonationLevel=impersonate}! \ \" & strComputer & "\ korzeń \ brak: StdRegProv")
 
strKeyPath = "OPROGRAMOWANIE \ Microsoft \ Windows \ CurrentVersion \ Internetowy Położenie \ Związek"
strValueName = "DefaultConnectionSettings"
 
rtn = objRegistry.GetBinaryValue (HKEY_CURRENT_USER, strKeyPath, strValueName, binValue)

ciemnawy msg
Jeżeli rtn = (0) wtedy
	wybrany skrzynka binValue (8)
		skrzynka 3: msg = MSG_PROXY_SERVER
		skrzynka 5: msg = MSG_AUTO_CONFIG_SCRIPT
		skrzynka 7: msg = MSG_AUTO_CONFIG_SCRIPT & "i" & MSG_PROXY_SERVER
		skrzynka 9: msg = MSG_AUTO_DETECT_SETTINGS
		skrzynka 11: msg = MSG_PROXY_SERVER & "i" & MSG_AUTO_DETECT_SETTINGS
		skrzynka 13: msg = MSG_AUTO_DETECT_SETTINGS & "i" & MSG_AUTO_CONFIG_SCRIPT
		skrzynka 15: msg = MSG_PROXY_SERVER & "i" & MSG_AUTO_CONFIG_SCRIPT & "i" & MSG_AUTO_DETECT_SETTINGS
	końcówka wybiórka 
  wscript.echo msg
Inny
  wscript.echo "Błąd retreving archiwum wartość dla gospodarz" & strcomputer
Kończyć jeżeli
Inne rozwiązania  
 
programming4us programming4us