' QQ 助手 —— 项目根目录双击启动（同 desktop\launch.vbs 的效果，二选一）
' 源码模板（UTF-8）-> node desktop\encode-assets.js -> QQ助手.vbs (UTF-16LE+BOM)
Option Explicit
Dim fso, sh, root, vbs, wscriptExe
Set fso = CreateObject("Scripting.FileSystemObject")
Set sh  = CreateObject("WScript.Shell")
root = fso.GetParentFolderName(WScript.ScriptFullName)
vbs  = fso.BuildPath(root, "desktop\launch.vbs")
If Not fso.FileExists(vbs) Then
  MsgBox "找不到 desktop\launch.vbs（先跑 node desktop\encode-assets.js 生成）", 16, "QQ 助手"
  WScript.Quit 1
End If
wscriptExe = fso.BuildPath(sh.ExpandEnvironmentStrings("%SystemRoot%"), "System32\wscript.exe")
sh.Run """" & wscriptExe & """ //nologo """ & vbs & """", 0, False
