VBS创建系统服务

标签： , , , ,

标题: VBS创建系统服务
作者: Demon
链接: https://demon.tw/copy-paste/vbs-create-service.html
版权: 本博客的所有文章，都遵守“署名-非商业性使用-相同方式共享 2.5 中国大陆”协议条款。

需要注意的是启动模式，应为“Automatic”，而不是“Auto”。

Const OWN_PROCESS = &H10
Const ERR_CONTROL = &H2
Const INTERACTIVE = False

ServiceName = "TestService"
DisplayName = "This is a test service."
InstallPath = "c:\windows\system32\Test.exe"

Set ObjWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate, (Security)}!\\.\root\cimv2")

Set ObjSvr = ObjWMI.Get("Win32_Service")
Return = ObjSvr.Create(ServiceName, DisplayName, InstallPath, OWN_PROCESS, ERR_CONTROL, "Automatic", INTERACTIVE, "LocalSystem", "")
If (Return = 0) Then
    Wscript.Echo "Service create success."
    Wscript.Echo "ServiceName: " & ServiceName
    Wscript.Echo "DisplayName: " & DisplayName
    Wscript.Echo "InstallPath: " & InstallPath
    Wscript.Echo ""
Else
    Wscript.Echo "Service create failure(" & Return & ")."
    Wscript.Quit(Return)
End If
Wscript.Quit

原文链接：http://www.enun.net/?p=950

赞赏

微信赞赏支付宝赞赏

相关文章:

  1. VBS获取文件的SDDL字符串
  2. VBS监控网络流量
  3. VBS图片处理之用VBS转化图片格式
  4. VBS获取系统本次及上次开关机时间
  5. VBS列出进程加载的DLL的完整路径

随机文章:

  1. 中兴F607ZA查看超级管理员密码
  2. 魔兽无法全屏的解决方法
  3. 用Tiny C Compiler编译Lua
  4. OpenWrt路由器WIFI开启13信道
  5. 用VBS压缩ZIP文件

这篇文章发布于 2012年11月30日，星期五，10:56，归类于 复制粘贴。 您可以跟踪这篇文章的评论通过 RSS 2.0 feed。 您可以留下评论，或者从您的站点trackback。

留下回复