帮忙调试，判断桌面的目录

mikewolf2k

Select Case Environ("OS")
Case "Windows_NT"
Destination = Environ("userprofile") & "\桌面"
Case "Windows_98", "Windows_95"
Destination = Environ("userprofile") & "\desktop"
Case Else
End Select
我只装了win2000，不知道其它版本windows如何。请帮助调试修改以上代码，使之适用于95~xp之间所有版本。谢谢。 另外请教curdir的用法。它能返回所执行的exe文件(在该exe文件内使用curdir)所在的目录吗？

mikewolf2k

沉了顶一下。


请大家帮帮忙，顺便测试一下。谢谢谢谢谢………………