允许分享文件
2022/5/4 6:25:02
本文主要是介绍允许分享文件,对大家解决编程问题具有一定的参考价值,需要的程序猿们随着小编来一起学习吧!
控制面板的网络连接设置里,有个选项,是否允许文件和打印机共享,不知什么原因,我的机器每次启动后,这个选项都没选中。因为需要在另一台电脑上访问机器上的资源,所以需要点选这个选项。每次手工操作太繁,就打算用程序来实现。查到一条命令行:
netsh advfirewall firewall set rule group="File and Printer Sharing" new enable=Yes
但我的机器上,因为装了诺顿,所以把windows firewall服务禁了,所以这个命令行不通。查了下,也没有找到注册表里的键值,只好又用autoIt脚本实现:
Run("cmd /c ncpa.cpl") ;打开网络连接窗口 _WinWaitActivate("Network Connections","") WinMove("Network Connections","", 1, 0) ;打开连接属性窗口 MouseClick("right", 111, 264) For $i = 1 to 8 Send("{DOWN}") Sleep(200) Next Send("{ENTER}") Sleep(1000) ControlClick("[CLASS:SysListView32]","",15007) ;选中选项列表 Sleep(200) For $i = 1 To 4 Send("{DOWN}") Sleep(200) Next Send("{SPACE}") ;选中文件分享的checkbox Sleep(200) ControlClick("", "OK", 1) Sleep(1000) Send("{ALTDOWN}{F4}{ALTUP}") ;关闭网络连接窗口 Func _WinWaitActivate($title,$text,$timeout=0) WinWait($title,$text,$timeout) If Not WinActive($title,$text) Then WinActivate($title,$text) WinWaitActive($title,$text,$timeout) EndFunc
调试通过后将au3转成exe,放个快捷方式到桌面。
autoIt包装了一些windows api,操作起来比较方便。
这篇关于允许分享文件的文章就介绍到这儿,希望我们推荐的文章对大家有所帮助,也希望大家多多支持为之网!
- 2024-05-15鸿蒙生态设备数量超8亿台
- 2024-05-13TiDB + ES:转转业财系统亿级数据存储优化实践
- 2024-05-09“2024鸿蒙零基础快速实战-仿抖音App开发(ArkTS版)”实战课程已上线
- 2024-05-09聊聊如何通过arthas-tunnel-server来远程管理所有需要arthas监控的应用
- 2024-05-09log4j2这么配就对了
- 2024-05-09nginx修改Content-Type
- 2024-05-09Redis多数据源,看这篇就够了
- 2024-05-09Google Chrome驱动程序 124.0.6367.62(正式版本)去哪下载?
- 2024-05-09有没有大佬知道这种数据应该怎么抓取呀?
- 2024-05-09这种运行结果里的10.100000001,怎么能最快改成10.1?