
CODE: [Copy to clipboard]Dim fso,fileto
Set wshs=WScript.CreateObject("wscript.shell")
Set fileto=wshs.CreateShortcut("C:\Documents and Settings\Administrator\桌面\Maxthon.lnk")
MsgBox fileto.targetpath
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |