Potongan kode bagaimana cara mendeteksi apakah Internet Explorer menggunakan Proxy:
Private
Function
MenggunakanProxy()
As
Boolean
Dim
key
As
RegistryKey = Registry.CurrentUser.OpenSubKey(
"Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings"
)
Dim
keys()
As
String
= key.GetValueNames()
Dim
hasil
As
Boolean
= (
CInt
(key.GetValue(
"ProxyEnable"
, 0)) <> 0)
key.Close()
Return
hasil
End
Function
Secara programming kita dapat mengetahui apakah Internet Explorer menggunakan proxy atau tidak dengan mengakses Windows Registry, yang akan kita cek dengan pembuatan sebuah fungsi yang mengembalikan nilai True bila benar menggunakan proxy dan False bila sebaliknya.
No comments:
Post a Comment