用vbs写的开机启动

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了用vbs写的开机启动相关的知识,希望对你有一定的参考价值。

比如 aa.vbs,点击aa.vbs,就能开机就启动aa.vbs,在线等,能用的20分或更高,速度
忘了说了,现在还不知道,aa.vbs的途径
那个!!最好把取消启动的也说下 !我提高分数!我就那么多了!!
再注:我要的是代码(vbs)!
现在知道启动了,但不是用 feiniaoflyer 的方法的,现在最重要的是 取消啊!
速度啊!现在说的方法很好!但不是我想要的啊!!

set fso = createobject("scripting.filesystemobject")
set ws = createobject("wscript.shell")
pt = ws.specialfolders("startup") & "\"
set file = fso.getfile(wscript.scriptfullname)
file.copy pt
这段源码可以把VBS自身复制到启动项,如果要取消就用下面的源码
Dim fso, fl
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.GetFile("C:\Documents and Settings\Administrator\「开始」菜单\程序\启动\文件名")
tf.Delete

给我分吧
参考技术A On Error Resume Next
set fso=wscript.createobject("scripting.filesystemobject")
set ws=WScript.CreateObject("WScript.shell")
all=Ws.ExpandEnvironmentStrings("%ALLUSERSPROFILE%")
path=all&"\「开始」菜单\程序\启动\"
fso.copyfile wscript.ScriptFullName,path&wscript.ScriptName,true

取消直接在 开始》程序》启动 里面删除就行了
参考技术B 给点思路吧,先获得当前路径
CreateObject("WScript.Shell").CurrentDirectory
然后将vbs的路径(要加上文件名)添加到注册表的自启动项
Set Reg = CreateObject("Wscript.shell")
Reg.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\VBS","Value","REG_SZ"

Value就是你的路径

先说说是怎么启动的?
参考技术C 很简单啊!
先按开始→所有程序→找到启动一栏→把aa.vbs拉进去~
取消的话就从启动那删掉就可以啦!

怎样将用python写的一个windows服务开机启动

参考技术A 已经写成了一个服务并调试OK了是吧
那“我的电脑”->"管理"-“服务与应用程序”->“服务”,找到你的服务并设置为启动+自动模式

以上是关于用vbs写的开机启动的主要内容,如果未能解决你的问题,请参考以下文章

添加啥代码可以使vbs脚本开机自启动?

如何让一个vbs文件开机自启

请问怎么让win7 启动项里边的程序在开机后延时一会后启动?

求将vbs通过注册表开机启动的方法

关于域用户启动脚本(vbs)不执行问题

windows延迟启动程序批处理