直接贴我自己的启动脚本,安装很简单,参考下面两个文章即可
Option Explicit
Dim WMIService, Process, Processes, Flag, WS
Set WMIService = GetObject("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2")
Set Processes = WMIService.ExecQuery("select * from win32_process")
Flag = true
for each Process in Processes
if strcomp(Process.name, "rclone.exe") = 0 then
Flag = false
exit for
end if
next
Set WMIService = nothing
if Flag then
Set WS = Wscript.CreateObject("Wscript.Shell")
WS.Run "rclone.exe mount Google:/ G: --cache-dir C:\temp\cache --vfs-cache-mode writes", 0
WS.Run "rclone.exe mount Media:/ H: --cache-dir C:\temp\cache --vfs-cache-mode writes", 0
WS.Run "rclone.exe mount WorkBak:/ I: --cache-dir C:\temp\cache --vfs-cache-mode writes", 0
WS.Run "rclone.exe mount OneDrive:/ M: --cache-dir C:\temp\cache --vfs-cache-mode writes", 0
end if
这个是介绍如何安装
https://www.mr-technos.com/thread-3337-1-1.html
下面这个有个启动配置VBS有用
https://blog.rhilip.info/archives/874/
