请问：在WINDOWS2000或XP下，如何获取当前用户的桌面路径？谢谢！

你把编译好的EXE文件发到桌面上运行不就可以了吗
text1.text=app.path

难得你想出这个臭办法。

用 FSO 问题就简单了。
还有访问注册表或使用API获取也行。

牛的话就把方法表达出来，不要只说抽象的。大概的谁都会说。

首先在工程的引用中选中Windows Scripting Host Object Model
Private Sub Form_Load()
Dim desk As New WshShell
MsgBox desk.SpecialFolders("desktop")
End Sub

呵呵，串错门儿了，不小心闻到火药味了

呵呵，串错门儿了，不小心闻到火药味了

楼主也可以用api直接取得桌面文件夹路径的。

FSO方法：
用FSO的GetSpecialFolder方法可以获取

注册表：
SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\EXPLORER\SHELL FOLDERS

API：
SHGetSpecialFolderLocation 与 SHGetPathFromIDList 两个函数即可获取

在网吧。。。

VB爱上我 斑竹好象对我不太满意了。
真不好意思了，我也是个初学者，说话如果有过分的地方，别跟我一般见识，我没恶意的。

学习学习