Question

求制作一个vbs脚本

此vbs不能有弹窗。
此vbs启动后自动判断星期，如果是星期一，则启动C:\Program Files\Wangotech\Monday.vbs，如果是星期二，则启动C:\Program Files\Wangotech\Tuesday.vbs。以此类推，如果是周一或周五，启动Monday到Friday这五个代码，如果是周六或周日，则打开C:\Program Files\Wangotech\monitoring.vbs之后进入休眠状态

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏80（财富值+成长值）

Answer 1

wk_day=datepart("w",now())
Set WshShell = WScript.CreateObject("WScript.Shell")

select case wk_day
case 2 WshShell.run """C:\Program Files\Wangotech\Monday.vbs"""
case 3 WshShell.run """C:\Program Files\Wangotech\Tuesday.vbs"""
case 4 WshShell.run """C:\Program Files\Wangotech\Wednesday.vbs"""
case 5 WshShell.run """C:\Program Files\Wangotech\Thursday.vbs"""
case 6 WshShell.run """C:\Program Files\Wangotech\Friday.vbs"""
case else WshShell.run """C:\Program Files\Wangotech\monitoring.vbs"""
end select

Set WshShell = nothing