| Artem_Buero |
Дата: Четверг, 25.09.2014, 18:14 | Сообщение # 1
|
Сообщений: 4223
Статус: Offline
|
Нашёл код на иностранном форуме:
Код setproxy(address = "",state = ""){
if (address = "") and (state = "")
state = TOGGLE
if address
regwrite,REG_SZ,HKCU,Software\Microsoft\Windows\CurrentVersion\Internet Settings,ProxyServer,%address%
if (state ="ON")
regwrite,REG_DWORD,HKCU,Software\Microsoft\Windows\CurrentVersion\Internet Settings,Proxyenable,1
else if (state="OFF")
regwrite,REG_DWORD,HKCU,Software\Microsoft\Windows\CurrentVersion\Internet Settings,Proxyenable,0
else if (state = "TOGGLE")
{
if regread("HKCU","Software\Microsoft\Windows\CurrentVersion\Internet Settings","Proxyenable") = 1
regwrite,REG_DWORD,HKCU,Software\Microsoft\Windows\CurrentVersion\Internet Settings,Proxyenable,0
else if regread("HKCU","Software\Microsoft\Windows\CurrentVersion\Internet Settings","Proxyenable") = 0
regwrite,REG_DWORD,HKCU,Software\Microsoft\Windows\CurrentVersion\Internet Settings,Proxyenable,1
}
dllcall("wininet\InternetSetOptionW","int","0","int","39","int","0","int","0")
dllcall("wininet\InternetSetOptionW","int","0","int","37","int","0","int","0")
Return
}
RegRead(RootKey, SubKey, ValueName = "") {
RegRead, v, %RootKey%, %SubKey%, %ValueName%
Return, v
}
Что-бы включить:
Что-бы выключить:
МОЙ ВК - https://vk.com/gospodin_buero
|
|
|
|
|
| Sergo_bro2 |
Дата: Пятница, 26.09.2014, 12:30 | Сообщение # 2
|
Coder
Сообщений: 892
Статус: Offline
|
Код wininet\InternetSetOptionW
Лучше заменить на Код wininet\InternetSetOption
CS:GO RANK: SUPREME*Клац*
[b][+]Skype: sergeiplugatyr
|
|
|
|
|
| Artem_Buero |
Дата: Пятница, 26.09.2014, 16:50 | Сообщение # 3
|
Сообщений: 4223
Статус: Offline
|
Sergo_bro2, У меня вроде и на анси работал 
МОЙ ВК - https://vk.com/gospodin_buero
|
|
|
|
|
| [CM]DAGON[CM] |
Дата: Четверг, 23.10.2014, 22:05 | Сообщение # 4
|
Боец
Сообщений: 83
Статус: Offline
|
Artem_Buero, все отлично на анси работает
https://vk.com/razda4a_samp_mods
Раздачи | Розыгрыши аккаунтов SA:MP, моды, музыка для каптов!
|
|
|
|
|
