Fråga : Internet Explorer ”automatisk avkänner inställningar”,

Hi

We har det kravet att ha ”automatiskt att avkänna inställningar” för att värdera kontrollerat in fliken för internetutforskareanslutning. Vi har kontrollerat och grundar att registreringen värderar som är ansvariga för samma är som below.
HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Internet inställningar \ anslutningar \ DefaultConnectionSettings

The 9th värderar kontrollerar ”avkänner automatiskt inställningar " som below
46,00,00,00, c5,0c, 00,00,0b, 00.00.00, 0f, 00.00, \
00,31,30,2e, 31,33,2e, 30,2e, 35,36,3a, 38,30,38,30,1a, 00,00, 00.31.30, 2e, 2a, 3b, \
2a, 2e, 2a, 2e, 69,74,63,3b, 6f, 72.61.63, 2a,3b 3c, 6c, 6f, 63,61, 6c, 3e, 6f, för 00,00,00 \
66,69,6c, 65,3a, 2f, 2f, 43,3a, 5c, 44,6f, 63,75,6d, 65,6e, 74,73, 20,61,6e, för 64,20,53 \
65,74,74,69,6e, 67,73,5c, 39, 35.34.39, 36,5c, 41,70,70,6c, 69, 63.61.74, 69,6f, 6e, \
20,44,61,74,61,5c, 4a, 75,6e, 69.70.65, 72,20,4e, 65,74,77,6f, 72,6b, 73, 5c, 4e, 65, \
74,77,6f,72,6b 20,43,6f, 6e, 6e, 65.63, 74,20,36,2e, 35,2e, 30, 5c, 69,6e, för 73,74,61 \
6e, 74,70,72,6f, 78,79,2e, 70, 61.63.05, 00,00,00,00,00,00,00, 20,0d, dc, 4e, 67,1e, \ cb för
, 01,00,00,00,00,00,00,00, 00.00.00, 00,00,01,00,00,00,02, 00.00.00, 0a, 0a, 04, \
09,00,00,00,00,00,00,00,00, 03.00.00, 00, f8,20, e0,08, c8,27, 38,0c, 00, för 00,00,00 \
00,00,00,00,01,00,00,00,6b, 00.00.00, 1d,00,00,00,24,0d, 2e, 0c, 00.00, för 00,00,00 \
00,00,00,00,00,00,00,00,00, 00.00.00, 00,00,00,01,00,00,00, 6b, 00.00, 00,1d, 00, \
00,00,03,00,00,00,00,00,00, 00.00.00, 00,00,6b, 00,00,00,1a, 00.00.00, för 00,00,00 \
00,00,00,00,00,00,00,00,00, 00.00.00, 00,00,00,80,3f, 50,01, 00,00

The värderar behov att vara OB för att hålla den tickad, och 03 för behov för uncheck.

We en skriva att ändra endast 9th värderar, och inte alla värderar, som de ska ändring som de andra inbrottinternet explorer.

I har försökt till använd det nedanfört skrivar för att hämta värdera men inte happening.
Dim som är byteArray () som Byte

keyValue = ”programvara \ Microsoft \ Windows \ CurrentVersion \ Internet inställnings- \ anslutnings"/>regVersion =
ubKey (keyValue som, är riktig) byteArray,
MsgBox för
regVersion.Close för/>byteArray = för regVersion.GetValue
ltConnectionSettings” som, är riktig) () (som är byteArray (0) &” ”& som är byteArray (1) &” ”& som är byteArray (2) &” ”& som är byteArray (3) &” ”& som är byteArray (4) &” ”& (5))
" klar "

Svar : Internet Explorer ”automatisk avkänner inställningar”,

Tyvärr jag kan inte hjälpa dig, mer… som det verkar att denna subroutine gör jobbet (som tas från den samma tråden):

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: 36:

'Exempelbruk av IEautomaticallydetect IEautomaticallydetect "OFF" IEautomaticallydetect ”show”, IEautomaticallydetect "ON" IEautomaticallydetect ”show”, wscript.quit UNDERIEautomaticallydetect (status) 'howeasyisthat.com 'Parametersholden är fastställd till "OFF", "ON" eller ”showen”. 'Detta läser och skriver till HKCU \ programvara \ Microsoft \ Windows \ CurrentVersion \ internetinställningar \ anslutningar \ DefaultConnectionSettings för att 'uppsättningen eller läst Internet Explorer avkänner automatiskt lättheten. När en närstående är fastställd, denna bör normalt vara av. När inga närståendeinställningar är fastställda, 'den är vanligt bäst att ha denna inställning att vändas på. [/size] DUNKEL sKey, sValue som är binaryVal Dunkel oReg Fastställd oReg=GetObject (”winmgmts: {impersonationLevel=impersonate}! \ \. \ rota \ standard: StdRegProv”) 'för registreringsfunktionsthrougout Const HKCU=&H80000001 sKey = ”programvara \ Microsoft \ Windows \ CurrentVersion \ internetinställningar \ anslutningar”, sValue = ”DefaultConnectionSettings”, oReg.GetBinaryValue HKCU, sKey, sValue som är binaryVal välj falllcasen (status) case binaryVal "ON" (8) = binaryVal (8), ELLER ' styrka 8 Autodetect på det binaryVal fallet "OFF" (8) = styrka för binaryVal (8) XOR 8 'Autodetect av fallet ”showen” wscript.echo ”avkänner automatiskt är fastställdt” & ((binaryVal (8) och 8) = 8), case på , av annan wscript.echo ”den ogiltiga parametern - IEautomaticallydetect eller show”, avsluta valt om lcase (status) = "ON" eller lcase (status) = "OFF" därefter oReg.SetBinaryValue HKCU, sKey, sValue som är binaryVal avsluta suben