Frage : Internet Explorer „Automobil ermitteln Einstellungen“

Hallo, haben

We die Anforderung, den „automatisch Einstellungsermitteln zu lassen“ Wert überprüfte innen den Explorer-Anschluss Tab. Wir haben überprüft und fanden, ob der Registerwert, der für die selben verantwortlich ist, als below.
HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ die Internet Einstellungs- \ Anschluss- \ DefaultConnectionSettings

The 9. Wertkontrollen „ermitteln automatisch Einstellungen " als 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 ist,3b, 3c, 6c, 6f, 63,61, 6c, 3e, 6f, 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, 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, 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, \
Columbium, 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, 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, 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, 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 Wert muss OB für das Halten es sein tickte und 03 für uncheck.

We Notwendigkeit ein Index, nur den 9. Wert und nicht alle Werte zu ändern, da die die anderen Einstellungen Internet Explorer. im

I ändern, haben versucht zu den below Index benutzen, um den Wert aber nicht happening.
Dim zu holen byteArray () als Byte

keyValue = „Software \ Microsoft \ Windows \ CurrentVersion \ Internet Einstellungen \ Anschlüsse "/>regVersion = Registry.CurrentUser.OpenSubKey (keyValue, zutreffend)
byteArray = regVersion.GetValue
ltConnectionSettings“, zutreffend)
regVersion.Close ()
MsgBox (byteArray (0) u.“ „u. byteArray (1) u.“ „u. byteArray (2) u.“ „u. byteArray (3) u.“ „u. byteArray (4) u.“ „u. byteArray (5))

Antwort : Internet Explorer „Automobil ermitteln Einstellungen“

Leider kann ich Ihnen nicht helfen, mehr…, das es scheint, dass diese Subroutine die Arbeit erledigt (genommen vom gleichen Gewinde):

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

'Beispielgebrauch IEautomaticallydetect
 IEautomaticallydetect  "OFF"
 IEautomaticallydetect  „Erscheinen“
 IEautomaticallydetect  "ON"
 IEautomaticallydetect  „Erscheinen“
 wscript.quit
 
 VORIEautomaticallydetect (Status)
 
 'howeasyisthat.com
 'Das Parameter shold eingestellt auf "OFF", "ON" oder „Erscheinen“.
 'Dieses liest und schreibt  HKCU \ der Software \ Microsoft \ Windows \ CurrentVersion \ Internet-Einstellungen \ Anschlüsse \ DefaultConnectionSettings zwecks
 'Internet Explorer einstellen oder lesen ermitteln automatisch Anlage. Wenn eine Vollmacht eingestellt, sollte diese normalerweise aus sein. Wenn keine Vollmachteinstellungen eingestellt,
 'es ist normalerweise am besten, diese Einstellung einschalten zu lassen. [/size]
 
 SCHWACHES sKey, sValue, binaryVal
 Schwaches oReg
 oReg=GetObject einstellen („winmgmts: {impersonationLevel=impersonate}! \ \. \ Wurzel \ Rückstellung: StdRegProv“)    'für Registerbetriebe througout
 
 Const HKCU=&H80000001
 
 sKey = „Software \ Microsoft \ Windows \ CurrentVersion \ Internet-Einstellungen \ Anschlüsse“
 sValue = „DefaultConnectionSettings“
 
 oReg.GetBinaryValue HKCU, sKey, sValue, binaryVal
 
 Fall lcase (Status) vorwählen
   "ON" umkleiden, das    binaryVal ist (8) = binaryVal ('Kraft 8)        ODER 8 auto-detect an
   "OFF" umkleiden, das    binaryVal ist (8) = binaryVal (8) XOR auto-detect        8 'Kraft weg
   Fall „Erscheinen“    wscript.echo „ermitteln automatisch eingestellt auf“ u. ((binaryVal (8) und 8) = 8)
   sonst wscript.echo    „unzulässigen Parameter an, weg  umkleiden - IEautomaticallydetect oder Erscheinen“
 auserwähltes beenden
 
 wenn lcase (Status) = "ON" oder lcase (Status) = "OFF" dann oReg.SetBinaryValue HKCU, sKey, sValue, binaryVal
 
 Endenunterseeboot
Weitere Lösungen  
 
programming4us programming4us