[求助]如何写入启动服务 - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → [求助]如何写入启动服务

标题：[求助]如何写入启动服务

取消只看楼主

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9
结帖率：100%

楼主

问题点数：0 回复次数：7

[求助]如何写入启动服务

写开机启动程序但是不想写入注册表
想写入启动里面的服务里面请指点

搜索更多相关主题的帖子: 服务　注册表　开机　

2007-05-25 13:08

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 2 楼

得分:0

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-25 15:21

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 3 楼

得分:0

请教如何将一个指定文件写入开机自动启动注册表比如在D:\abc.exe

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-25 19:25

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 4 楼

得分:0

那代码怎么写呢？

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-27 12:30

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 5 楼

得分:0

不懂得怎么写入呀。。。

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-27 13:06

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 6 楼

得分:0

就一段代码？
Call fCreateShellLink("\启动"（原样？中文？）, "记事本"（记事本？）, GetWindowsPath & "\Notepad.exe", "", True, "$(Programs)")

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-27 14:17

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 7 楼

得分:0

测试.exe

对，就如下面这样就可创建成快捷方式
Private Sub Command1_Click()
Call fCreateShellLink("\启动", "测试", GetWindowsPath & "\Notepad.exe", "", True, "$(Programs)")
End Sub

这样就可以了？

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-27 15:51

b13690976754

等　级：新手上路
威　望：2
帖　子：835
专家分：7
注　册：2006-11-9

第 8 楼

得分:0

If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If

2007-05-28 09:51

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-142486-1-1.html