以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 开机启动项目  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108238)
--  作者：zcgmxf
--  发布时间：2017/10/18 20:37:00
--  [求助] 开机启动项目

老师，开启或取消开机启动项目的代码放在哪个事件里面？谢谢！

Dim starupPath = ProjectPath & "xxx.exe"
Dim loca = Microsoft.Win32.Registry.LocalMachine
Dim run = loca.CreateSubKey("SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run")
\'run.SetValue("我的项目", False) \'取消开机运行
run.SetValue("我的项目", starupPath) \'设置开机运行
loca.Close()
--  作者：有点甜
--  发布时间：2017/10/18 21:01:00
--  

 

afterOpenProject或者beforeCloseProject 事件，都可以。