نوشتن Batch File تغییر تنظیمات پروکسی سرور IE و فایرفاکس
با سلام خدمت شما دوستان عزیز من می خوام با استفاده از یک Bat فایل روی IE پروکسی تنظیم کنم ، همون طور که داخل عکس معلم هست می خوام که گزینه Bypass proxy Server for local address هم فعال شود. در ضمن اگر راه کاری برای ایجاد Bat فایل روی Fire fox هم هست ممنون می شوم راهنمایی کنید.
8 پاسخ
خسته نباشید.
امکانش نیست برای فایرفاکس کد جدا بزنیم چون من میخوام فقط فایرفاکس از پروکسی استفاده کنه و ویندوز نه
سلام،
میبایست در ابتدا یک فایل رجیستری مربوط به تنظیمات پروکسی ایجاد نمایید و سپس با استفاده از دستور های REG آنها را توسط یک فایل bat. به رجیستری اضافه نمایید.
برای ایجاد یک فایل رجیستری و تنظیمات آن به لینک زیر مراجعه فرمایید:
برای آشنایی با دستورات REG به لین زیر مراجعه بفرمایید:
پیرو توضیحاتی که smile فرمودند، برای تنظیم Proxy بر روی IE میتونید کد زیر رو با پسوند vbs ذخیره کنید و هر جا خواستید اجرا کنید:
'Here is the Proxy code
Set ShellObj = WScript.CreateObject("WScript.Shell")
'Set Proxy
ShellObj.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", "192.168.0.156:8080", "REG_SZ"
ShellObj.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
ShellObj.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", "192.168.*;<local>", "REG_SZ"
همچنین برای تنظیم پروکسی در فایرفاکس پیشنهاد میکنم بدلیل اینکه فایرفاکس تنظیم پیش فرضش بر روی Use System Proxy هست کاری به تنظیماتش نداشته باشید و بذارید از System Proxy تیعیت بکنه. طبیعتا زمانی که برای IE پروکسی تعریف بشه Firefox هم ازون Proxy استفاده خواهد کرد.
با تشکر و سپاس فراوان از شما goli.mh
کد به درستی کار میکنه.
ممنون.
شما خط 11 رو بدین شکل ویرایش کنید:
WshShell.RegWrite sHKCUProxyOverride,"127.0.0.1;<local>","REG_SZ"
با سپاس از شما goli.mh عزیز برای راهنمایی مفیدتون...
کد بالا پروکسی رو تنظیم میکنه و به درستی کار میکنه فقط یک مشکل کوچیک دارم،
این که من میخوام گزینه Bypass proxy Server for local address هم فعال شود.
به نظر شما راه کاری وجود داره ؟؟
با سپاس از شما smile و goli.mh عزیز برای راهنمایی هایتان.
دوست عزیر goli.mh، من کدی رو که گفتین با پسوند vbs. توی notepad ساختم ولی وقتی روش کلیک میکنم Error زیر رو میده.
خواهشمندم راهنمایی کنید.
با تشکر
دوست عزیز همین کد بر روی ویندوز 8.1 جواب میده شاید کامپایلر‌ها با هم فرق داشته باشند ببینید از لحاظ املایی مشکلی در کد نباشه کد زیر رو هم میتونید تست کنید فقط دقت داشته باشید خط 10 برای هر شبکه‌ای متفاوت و قابل ویرایش خواهد بود:
' Set variables
Dim sHKCUProxyServer, sHKCUProxyOverride, sHKCUProxyEnable, WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
sHKCUProxyEnable = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable"
sHKCUProxyServer = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer"
sHKCUProxyOverride = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride"
WshShell.RegWrite sHKCUProxyEnable,"1","REG_DWORD"
WshShell.RegWrite sHKCUProxyServer,"proxy-server:3328","REG_SZ"
WshShell.RegWrite sHKCUProxyOverride,"http://intranet;http://local-server;","REG_SZ"