本地文件下载 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 本地文件下载

共有3041人关注过本帖树形打印复制链接主题：本地文件下载

wangnovel

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：201 积分：2133 威望：0 精华：0 注册：2012/10/6 17:19:00

本地文件下载 发帖心情

Post By：2020/4/8 9:58:00 [只看该作者]

我准备将一个excel模板放到attachments文件夹中，让用户去下载，请问下载的代码如何写？

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：107304 积分：545781 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/8 9:59:00 [只看该作者]

放到哪里的attachments文件夹？共享的？还是ftp？http？

wangnovel

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：201 积分：2133 威望：0 精华：0 注册：2012/10/6 17:19:00

Post By：2020/4/8 11:14:00 [只看该作者]

就是本机上，不共享、也不是ftp、http，设置一个按钮，用户一点击，就可以下载到用户指定的位置

[此贴子已经被作者于2020/4/8 11:15:13编辑过]

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：107304 积分：545781 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/8 11:55:00 [只看该作者]

这就不叫下载了。应该说是复制到用户指定的地方。

如：

Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter= "execl文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮

FileSys.CopyFile(projectpath & "attachments\test.xls", dlg.FileName)
End If

wangnovel

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：201 积分：2133 威望：0 精华：0 注册：2012/10/6 17:19:00

Post By：2020/4/8 15:49:00 [只看该作者]

OK，谢谢

主题：本地文件下载