rclone : https://rclone.org/downloads/
winfsp : http://www.secfs.net/winfsp/download/
Rclone GUI : https://github.com/mmozeiko/RcloneBrowser
winfsp : http://www.secfs.net/winfsp/download/
Rclone GUI : https://github.com/mmozeiko/RcloneBrowser
保存为 RECLONE.VBS 运行
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 mount GDrive:/ x: --cache-dir F:\Temp --vfs-cache-mode writes", 0
end if
博主,如果想要挂载多个,请问该如何操作呢?
WS.Run “rclone mount GDrive:/ x: –cache-dir F:\Temp –vfs-cache-mode writes”, 0
再添加一行修改