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

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

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

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 1309 人关注过本帖

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

取消只看楼主加入收藏

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

快速回复：[求助]如何写入启动服务