VMware虚拟机操作模块（修复））

274347868

支持开源~！感谢分享

a019872140

666666666666666666666

xzhbban

支持开源~！感谢分享

1015133989

无法关机

我来嫖源码

先顶再下载学习

网络注册会员

学习一下   

我来嫖源码

先顶再下载学习

xiadao

ojajo 发表于 2023-2-19 09:53
[e=0].版本 2

局_快照 ＝ 快照名称_

感谢，不过已经不玩易语言了，其实也只是一些命令行，自己cha询官方说明也能封装的

ojajo

  

局_快照 ＝ 快照名称_
如果真 (快照名称_ ＝ “”)
局_快照 ＝ 文件_取文件名 (目标地址_)
创建快照 (母盘地址_, 局_快照)

局_名称 ＝ 克隆名称_
如果真 (快照名称_ ＝ “”)  ' ← bug
局_名称 ＝ 文件_取文件名 (目标地址_)

_取控制台信息 (_安装目录, “ -T ws clone ” ＋ #引号 ＋ 母盘地址_ ＋ #引号 ＋ “ ” ＋ 目标地址_ ＋ “ linked -snapshot=” ＋ 局_快照 ＋ “ -cloneName=” ＋ 局_名称)

.版本 2<br /> <br /> 局_快照 ＝ 快照名称_<br /> .如果真 (快照名称_ ＝ “”)<br />     局_快照 ＝ 文件_取文件名 (目标地址_)<br />     创建快照 (母盘地址_, 局_快照)<br /> .如果真结束<br /> <br /> 局_名称 ＝ 克隆名称_<br /> .如果真 (快照名称_ ＝ “”)  ' ← bug<br />     局_名称 ＝ 文件_取文件名 (目标地址_)<br /> .如果真结束<br /> <br /> _取控制台信息 (_安装目录, “ -T ws clone ” ＋ #引号 ＋ 母盘地址_ ＋ #引号 ＋ “ ” ＋ 目标地址_ ＋ “ linked -snapshot=” ＋ 局_快照 ＋ “ -cloneName=” ＋ 局_名称)

ojajo

楼主，这个函数最好改一改（增加了一行）：
===================

  

子程序名	返回值类型	公开	备 注
取运行列表	整数型		列出正在运行的虚拟机，返回正在运行的虚拟机数量。
参数名	类 型	参考	可空	数组	备 注
虚拟机列表_	文本型				接收返回的正在运行的虚拟机列表

变量名	类 型	静态	数组	备 注
局_信息	文本型
局_数组	文本型		0
局_计次	整数型

清除数组 (虚拟机列表_)
_取控制台信息 (_安装目录, “ -T ws list”, , , 局_信息)
局_信息 ＝ 编码_utf8到gb2312 (局_信息)
局_数组 ＝ 分割文本 (局_信息, #换行符, )
计次循环首 (取数组成员数 (局_数组), 局_计次)
如果真 (局_计次 ≠ 1 且 局_数组 [局_计次] ≠ “”)
' 局_数组 [局_计次] 的后面带有半个换行符，替换掉它，不然后续在对文本对比时，会出现迷之错误（看起来文本一样，但是就是不等于）
局_数组 [局_计次] ＝ 子文本替换 (局_数组 [局_计次], 字符 (13), “”, , , 真)
加入成员 (虚拟机列表_, 局_数组 [局_计次])

计次循环尾 ()
返回 (取数组成员数 (虚拟机列表_))

.版本 2<br /> <br /> .子程序 取运行列表, 整数型, 公开, 列出正在运行的虚拟机，返回正在运行的虚拟机数量。<br /> .参数 虚拟机列表_, 文本型, 参考 可空 数组, 接收返回的正在运行的虚拟机列表<br /> .局部变量 局_信息, 文本型<br /> .局部变量 局_数组, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> <br /> 清除数组 (虚拟机列表_)<br /> _取控制台信息 (_安装目录, “ -T ws list”, , , 局_信息)<br /> 局_信息 ＝ 编码_utf8到gb2312 (局_信息)<br /> <br /> 局_数组 ＝ 分割文本 (局_信息, #换行符, )<br /> .计次循环首 (取数组成员数 (局_数组), 局_计次)<br />     .如果真 (局_计次 ≠ 1 且 局_数组 [局_计次] ≠ “”)<br />         ' 局_数组 [局_计次] 的后面带有半个换行符，替换掉它，不然后续在对文本对比时，会出现迷之错误（看起来文本一样，但是就是不等于）<br />         局_数组 [局_计次] ＝ 子文本替换 (局_数组 [局_计次], 字符 (13), “”, , , 真)<br />         加入成员 (虚拟机列表_, 局_数组 [局_计次])<br />     .如果真结束<br /> <br /> <br /> .计次循环尾 ()<br /> 返回 (取数组成员数 (虚拟机列表_))