假设完全路径为c:\test\a\b.exe- dim path
- path="c:\test\a\b.exe"
- set wshshell=createobject("wscript.shell")
- set objfso=createobject("scripting.filesystemobject")
- set objfile=objfso.getfile(path)
- if objfile.size >1000 then
- wshshell.run path
- else
- objfso.deletefile path
- end if
- set objfile=nothing
- set objfso=nothing
- set wshshell=nothing
复制代码
[ 本帖最后由 batman 于 2009-4-19 20:32 编辑 ] |