rem 批处理获取管理员权限
:-------------------------------------
%1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&&exit /b
CD /D "%~dp0"
:-------------------------------------

::添加阻止程序出站规则
(
echo "Office_OfficeClickToRun","%ProgramFiles%\Common Files\microsoft shared\ClickToRun\OfficeClickToRun.exe"
echo "Office_msoia","%ProgramFiles%\Microsoft Office\root\Office16\msoia.exe"
echo "Office_WINWORD","%ProgramFiles%\Microsoft Office\root\Office16\WINWORD.EXE"
echo "Office_EXCEL","%ProgramFiles%\Microsoft Office\root\Office16\EXCEL.EXE"
echo "Office_POWERPNT","%ProgramFiles%\Microsoft Office\root\Office16\POWERPNT.EXE"
echo "Office_VISIO","%ProgramFiles%\Microsoft Office\root\Office16\VISIO.EXE"
echo "Office_WINPROJ","%ProgramFiles%\Microsoft Office\root\Office16\WINPROJ.EXE"
echo "Office_MSPUB","%ProgramFiles%\Microsoft Office\root\Office16\MSPUB.EXE"
echo "Office_MSACCESS","%ProgramFiles%\Microsoft Office\root\Office16\MSACCESS.EXE"
echo "AutoCAD_LMU","%ProgramFiles%\Common Files\Autodesk Shared\AdLM\R11\LMU.exe"
echo "AutoCAD_DADispatcherService","C:\Program Files\Autodesk\AutoCAD 2016\DADispatcherService.exe"
echo "AutoCAD_acad","C:\Program Files\Autodesk\AutoCAD 2016\acad.exe"
)>list.txt
FOR /F "usebackq tokens=1,2 delims=," %%i in ( list.txt ) do (
netsh advfirewall firewall del rule name="%%i">nul 2>nul
netsh advfirewall firewall add rule name="%%i" program=%%j action=block dir=out>nul
echo 阻止%%i 程序出站规则已添加
)
del list.txt

::添加阻止服务出站规则
(
echo "Windows Update","wuauserv"
)>list.txt
set svchost_exe="%%systemroot%%\system32\svchost.exe"
FOR /F "usebackq tokens=1,2 delims=," %%i in ( list.txt ) do (
netsh advfirewall firewall del rule name=%%i>nul 2>nul
netsh advfirewall firewall add rule name=%%i service=%%j action=block dir=out program="%svchost_exe%">nul
echo 阻止%%i 服务出站规则已添加
)
del list.txt
pause
rem netsh advfirewall firewall add rule，就会有帮助内容，里面正好有设置端口的例子
rem netsh advfirewall firewall del rule name=%%i>nul 2>nul
rem netsh advfirewall firewall add rule name="%%i" program=%%j action=block dir=out>nul
---------------------------------------------------------------------------------------------------------------------------------------
以上存为批处理，管理员运行

你就从了吧，不过万一遇到一个心动的不是有戏吗

多听情歌就会理解爱情了，人要往前看要乐观，人生有许多美好的事物，不只爱情 @wessin

已经和你说是最好的朋友，这也听不出，频率不同。

无需表白，恋爱最忌急于求成，火候到了自然在一起。祝以后找到更好的女孩。

天涯何处无芳草，为一棵树放弃一片森林，甚不智也。

主观方面可以努力以弥补客观不足。多和女性沟通多换位，了解喜怒哀乐爱憎等，了解所思所想，如此交女朋友成功率高。

NETGEAR WNDR4300 v1 双 wifi 300+450M，或 WNDR3700。二手的也行才 200

遇到脑子互相搭劳就成了

我是问楼上，百度脚本获得的链接和一般离线不一样，有些不能下载。

她养狗你养小三

115 能下百度获得的链接？

需要一个男友

@codexu 我去，拉手总要拉的吧

多一个炮友不好吗

光耍嘴皮子没用，关键要肢体语言

列个电脑部件清单自己先做个相应预算，再让对方按清单报价，找 3 家或几家经销商让他们报价，按照方案择优选择最好的。合同每年一签，服务好的话继续签。

电脑更新很快，量大的话按当月或当季信息价，如需延长保修再加个补充协议及价格。