vb6写得alist自动启动面板和win自带服务挂载小工具2.8

暗夜硝烟 · 发表于 2024-6-20 16:01

本帖最后由暗夜硝烟于 2024-6-24 22:48 编辑

之前的帖子(vb6写得alist启动面板和win挂载小工具)超过60天无法编辑，新开一个哈。

不废话，直接上图。

上连接，源码也在其中。提取码:52pj
123盘：https://www.123pan.com/s/klfbVv-dNNIh.html
有些精简版或家庭版系统可能挂载不成。

程序和源码还在上面链接里，源码感兴趣的可自由修改哈。
更新是下载alist的，自行下载放在同一个文件夹哈。

magiclyan · 发表于 2024-6-21 12:15

本帖最后由 magiclyan 于 2024-6-21 12:20 编辑

不错，之前都用的代码行实现服务的启停与自启

挂载命令

[Asm] 纯文本查看 复制代码

Dim ws
Set ws = Wscript.CreateObject("Wscript.Shell")
ws.run "alist.exe server",vbhide
msgbox "Ailst已挂载"
Wscript.quit

卸载命令

[Asm] 纯文本查看 复制代码

Dim ws
Set ws = Wscript.CreateObject("Wscript.Shell")
ws.run "taskkill /f /im alist.exe",0
msgbox "Ailst已卸载"
Wscript.quit

byfly · 发表于 2024-6-20 18:54

居然没有回复的都买私有云了？

月清晖 · 发表于 2024-6-20 19:13

看起来很强大，感谢分享

sczjlq · 发表于 2024-6-20 19:17

用不上也回一个，用NAS

a1067709136 · 发表于 2024-6-20 20:13

可以的,跟官方的桌面版形成良性竞争

pojie1655 · 发表于 2024-6-20 21:32

感谢分享，已评分！请多点分享精品VB6源码。

luguo126 · 发表于 2024-6-20 23:42

感谢分享

YWNNJB22 · 发表于 2024-6-21 00:08

不知道怎么用

baitoje1235 · 发表于 2024-6-21 03:43

感谢分享

sunflash · 发表于 2024-6-21 06:28

不错，感谢分享

帐号		自动登录	找回密码
密码			注册[Register]

[Windows] vb6写得alist自动启动面板和win自带服务挂载小工具2.8