惯性聚合 高效追踪和阅读你感兴趣的博客、新闻、科技资讯
阅读原文 在惯性聚合中打开

推荐订阅源

小众软件
小众软件
Cloudbric
Cloudbric
G
Google Developers Blog
博客园_首页
博客园 - 司徒正美
N
Netflix TechBlog - Medium
Recorded Future
Recorded Future
博客园 - 叶小钗
C
Check Point Blog
L
LangChain Blog
CTFtime.org: upcoming CTF events
CTFtime.org: upcoming CTF events
酷 壳 – CoolShell
酷 壳 – CoolShell
freeCodeCamp Programming Tutorials: Python, JavaScript, Git & More
Stack Overflow Blog
Stack Overflow Blog
大猫的无限游戏
大猫的无限游戏
Cyberwarzone
Cyberwarzone
Project Zero
Project Zero
V
Vulnerabilities – Threatpost
C
Cisco Blogs
Scott Helme
Scott Helme
Last Week in AI
Last Week in AI
博客园 - 聂微东
T
Threat Research - Cisco Blogs
www.infosecurity-magazine.com
www.infosecurity-magazine.com
B
Blog RSS Feed
Microsoft Security Blog
Microsoft Security Blog
D
Darknet – Hacking Tools, Hacker News & Cyber Security
The Hacker News
The Hacker News
Forbes - Security
Forbes - Security
Simon Willison's Weblog
Simon Willison's Weblog
I
Intezer
Cisco Talos Blog
Cisco Talos Blog
S
Schneier on Security
T
The Exploit Database - CXSecurity.com
阮一峰的网络日志
阮一峰的网络日志
爱范儿
爱范儿
AWS News Blog
AWS News Blog
C
CERT Recently Published Vulnerability Notes
Google DeepMind News
Google DeepMind News
N
News | PayPal Newsroom
Help Net Security
Help Net Security
B
Blog
Exploit-DB.com RSS Feed
Exploit-DB.com RSS Feed
T
Tenable Blog
I
InfoQ
S
Securelist
V
Visual Studio Blog
U
Unit 42
博客园 - 【当耐特】
S
Security @ Cisco Blogs

博客园 - 愚公

Bridges 虚拟化浪潮 MAGEUI的Hash问题 Lingoes的划词翻译功能极有可能泄露隐私 VSTO SaveCopyAs方法在Excel 2007下必须注意的一个问题 Vista Folders Always Shown In Details View - 让Vista文件夹总是使用详细资料视图 用7zip制作自动解压安装程序 安装新的Oracle Instant Client后重新配置PL/SQL Developer和环境: Certificates registry key name to MMC friendly name mapping A review of the CVS SCC PLUGIN IE8.0 TAB行为悄然改善: WSS 3.0 List WebService使用点滴 Set a password textbox for Visual Studio .NET setup project 在WinForm中控制GIF动画的启停的一种方法 foobar2000绿色版在vista下的Unhandled exception: Bad allocation NTFS文件及目录日期值行为 installState is missing ! .Net Framework 2.0配置工具Stopped Working VISTA BITS POLICY DESCRIPTION'S MISTAKE
Virtual Server启动时自动启动每个虚机
愚公 · 2007-03-20 · via 博客园 - 愚公

On Error Resume Next

Set virtualServer = CreateObject("VirtualServer.Application")
set vmCollection = virtualServer.VirtualMachines
For Each vm in vmCollection
    Wscript.Echo 
"=============================="
    Wscript.Echo 
"Name: " & vm.Name
    Wscript.Echo 
"Notes: " & vm.Notes
    Wscript.Echo
    Wscript.Echo 
"Configuration File: " & vm.File
    Wscript.Echo
    Wscript.Echo 
"Memory: " & vm.Memory & "M"
    Wscript.Echo
    WScript.Echo 
"State: " & VM.State
    
If vm.State=1 or vm.State=2 Then 'Off and saved
       Wscript.Echo "Auto Startup "
       vm.Startup
       WScript.Sleep WScript.Arguments(
0& "000"
       WScript.Echo 
"New State: " & VM.State
    
End If
    Wscript.Echo 
"=============================="
Next

在Virtual Server的Server Properties中Enable scripts attached to this server

并在Command-line action when Virtual Server starts:中填入:
cscript AutoStart.vbs 15

这个15是每个虚机启动的延时秒数,因为如果不延时,就会发生N个虚机一窝蜂同时启动,给主机的带来巨大的负担。

另外,在每个虚机的General properties配置里,应该选中Run virtual machine under the following user account:,并指定一个可以在本地登录的用户账户名及口令,这个账户建议使用最小权限的账户,一般能够读写和执行虚机定义及虚拟盘文件即可(详细权限要求请查阅Virtual Server Administrator's Guide),不指定这个账户将无法运行脚本。
虽然,就在这个地方我们可以设置自动启动及启动的延时,但每次增减虚机时时还要查看现有的设置情况,以决定错开启动的延迟时间,比较麻烦,有了这个脚本你可以一劳永逸,稍作修改还可以实现更复杂的逻辑。