以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  狐表编程,能否实现设置开机启动功能  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=73350)

--  作者:ycli368
--  发布时间:2015/8/17 18:55:00
--  狐表编程,能否实现设置开机启动功能
狐表编程,能否实现设置开机启动功能
--  作者:大红袍
--  发布时间:2015/8/17 19:27: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()


--  作者:ycli368
--  发布时间:2015/8/17 20:15:00
--  
谢,红袍大哥
--  作者:倪惠明
--  发布时间:2016/5/10 10:31:00
--  
该代码在何处设置
--  作者:大红袍
--  发布时间:2016/5/10 10:33:00
--  
以下是引用倪惠明在2016/5/10 10:31:00的发言:
该代码在何处设置

 

可以写在任意一个地方,比如afterOpenProject就可以


--  作者:nothing
--  发布时间:2016/8/8 16:31:00
--  
没登录会启动吗?像服务器一般是只开电源,没有输入用户和密码的
--  作者:大红袍
--  发布时间:2016/8/8 16:43:00
--  
以下是引用nothing在2016/8/8 16:31:00的发言:
没登录会启动吗?像服务器一般是只开电源,没有输入用户和密码的

 

不会。试试这个

 

http://jingyan.baidu.com/article/59703552fee38f8fc107405c.html

 


--  作者:L88919138
--  发布时间:2016/8/9 6:33:00
--  

学习

 


--  作者:fubblyc
--  发布时间:2016/12/25 12:41:00
--  

用这个,实测有效:

注册表中添加就可以了。在开始--运行中输入regedit,展开HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run。在右边框中新建一个字符串的键,把名字命令为你可添加程序的名字(可以随便取),把它的键值设置这个程序的完整路径。如"G:\\应用程序\\360安全卫士\\360safe\\safemon\\360Tray.exe"