vbs显示桌面或切换桌面

想用VBS作一个定时切找到桌面的。。

On Error Resume Next
set wshshell=createobject ("wscript.shell")
set oshell= createobject("wscript.shell")
set wshnetwork = wscript.createobject("wscript.network")
wscript.sleep 10000
oShell.Run "%HOMEPATH%\Application Data\Microsoft\Internet Explorer\Quick Launch\显示桌面.scf"

大概代码是这样的，但好象不好使，想请高手指点一下。。

但是当我把 显示桌面.scf 复制到C盘用这样的路径：C：\显示桌面.scf

却好使。。

我想是不是我的路径不对。。

VBS 不支持%HOMEPATH%这个变量吧

可以这样：

oShell.Run "cmd /c "+chr(34)+"%APPDATA%\Microsoft\Internet Explorer\Quick Launch\显示桌面.scf"+chr(34)+"",0