



| Quote: | |
|
CODE: [Copy to clipboard][ Last edited by baomaboy on 2007-4-24 at 11:32 AM ]msgbox WScript.CreateObject("WScript.Shell").SpecialFolders("Desktop")
CODE: [Copy to clipboard]Set wsh=WScript.CreateObject("Wscript.Shell")
Set a=wsh.SpecialFolders("DeskTop")
MsgBox a
| Quote: | |
|
| Quote: | |
|
CODE: [Copy to clipboard]Dim wsh
Set wsh=WScript.CreateObject("Wscript.Shell")
a=wsh.SpecialFolders("DeskTop")
MsgBox a
| Quote: | |
|
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |