VBS脚本使用userprofile环境变量是有问题，哪位高手帮忙解决下，谢谢
我想复制一些文件到用户桌面上面，在command下面可以用引号就正常运行了，但是脚本中不行，如果换成"C:\Documents and Settings\%username%\desktop\"也不行（包括引号的）。
脚本如下：
Sub ExcuteCopy()
Set RunDos = WScript.CreateObject("WScript.Shell")
RunDos.Run "%comspec% /c Xcopy C:\downloads\*.* %userprofile%\desktop\ /Y"
End Sub
我对脚本不熟，希望高手写下。
你可以先获取userprofile环境变量，
R = Environ("userprofile")+"\桌面\"，再写其他代码。
R = Environ("userprofile")+"\桌面\"，再写其他代码。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2008-05-12
copy C:\downloads\*.* C:\Documents and Settings\%username%\desktop\
能行吗? 没有引号当然不行!!!
改成
RunDos.Run "%comspec% /c Xcopy " & chr(34) & "C:\downloads\*.* %userprofile%\desktop\" & chr(34) & "/Y"
能行吗? 没有引号当然不行!!!
改成
RunDos.Run "%comspec% /c Xcopy " & chr(34) & "C:\downloads\*.* %userprofile%\desktop\" & chr(34) & "/Y"
