如何拷贝一个文件到桌面

xilaianzxsc 2011-11-17 02:16:15
vfp 9.0

copy file aaa.dbf to 桌面\aaa.dbf

问:由于各台机,桌面的路径是不同的,如何设置"桌面"的路径,让上述命令,在每台机上,都能运行?
...全文
102 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
taohua300 2011-11-17
  • 打赏
  • 举报
回复
 lcPath = Getenv("ALLUSERSPROFILE") + '桌面\' && 中文系统
* lcPath = Getenv("ALLUSERSPROFILE") + 'DeskTop\' && 英文系统
Copy File aaa.dbf To (lcPath + 'aaa.dbf')
xilaianzxsc 2011-11-17
  • 打赏
  • 举报
回复
谢谢夜猫老师的指导
xilaianzxsc 2011-11-17
  • 打赏
  • 举报
回复
谢谢十豆三老师的指导
都市夜猫 2011-11-17
  • 打赏
  • 举报
回复
如果确定都是中文版,可以直接取 Windows 的环境变量:
messagebox( addbs(getenv('USERPROFILE'))+'桌面' )

否则可以用 shell api 来取
十豆三 2011-11-17
  • 打赏
  • 举报
回复
loShell=Createobject('wscript.shell')
lcMyPath=loShell.SpecialFolders('AllUsersDesktop') && 所有用户
*lcMyPath=loShell.SpecialFolders('Desktop') && 当前用户
Copy File aaa.Dbf To '&lcMyPath.\aaa.Dbf'

2,723

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧