dim answer
answer=MsgBox("Start Nginx && php-cgi?",65,"Start Web Service")
if answer=vbOK then
    set ws=wscript.createobject("wscript.shell")
    ws.run "start-web-services.bat /start",0
end if

定义和用法
MsgBox 函数可显示一个消息框，等待用户点击某个按钮，然后返回指示被点击按钮的值。
MsgBox 函数可返回下面的值：
1 = vbOK – 确定按钮被单击。
2 = vbCancel – 取消按钮被单击。
3 = vbAbort – 终止按钮被单击。
4 = vbRetry – 重试按钮被单击。
5 = vbIgnore – 忽略按钮被单击。
6 = vbYes – 是按钮被单击。
7 = vbNo – 否按钮被单击。