问题描述
我用vb.net生成了一个excel表格，我想把它保存到桌面，一开始程序里路径直接用的是我的电脑里桌面的路径，后来发现由于用户名不一样，程序到其他电脑上就用不了了。我在网上找到了获取桌面路径的语句path=System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)但是用什么类型的对象可以保存这个路径？DimswAsFileStream=File.Create("C:UsersxiaoqiDesktop有限元计算结果.xlsx",FileMode.Create)OutPbook.Write(sw)sw.Close()这是我原来写的代码，应该怎么改才能在任何电脑上都能保存到桌面。
解决方案
解决方案二：
获取桌面就是你说的那个啊，返回的字符串
解决方案三：
path&"excel.xls"
解决方案四：
PublicDesktopPathAsString=OpenRegistryPath(Registry.CurrentUser,"/Software/Microsoft/Windows/CurrentVersion/Explorer/ShellFolders").GetValue("Desktop").ToString()PublicFunctionOpenRegistryPath(rootAsRegistryKey,sAsString)AsRegistryKeys=s.Remove(0,1)&"/"Whiles.IndexOf("/")<>-1root=root.OpenSubKey(s.Substring(0,s.IndexOf("/")))s=s.Remove(0,s.IndexOf("/")+1)EndWhileReturnrootEndFunction
解决方案五：
'后面要用到System.IO.Path，所以不要取容易引起歧义的命名'DimdesktopPathAsString=System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)DimswAsFileStream=File.Create(Path.Combine(desktopPath,"有限元计算结果.xlsx"),FileMode.Create)OutPbook.Write(sw)sw.Close()
解决方案六：
解决方案七：
FILENAME=Environment.GetFolderPath(Environment.SpecialFolder.Desktop)&""&E&"TOP100.xls"
解决方案八：
为什么不用SaveFileDialog
解决方案九：
引用7楼gghhvva的回复:
为什么不用SaveFileDialog
这个可以自己选择默认保存路径!
解决方案十：
保存到C盘，存在权限问题，放在其它盘试试或者更改权限设置
解决方案十一：
DimMyDesktopAsString=Environment.GetEnvironmentVariable("Desktop")