易表在线答疑技术与交流用户社区 → [求助]使用ExportDBFile这个命令时,导出动态的文件名


  共有5036人关注过本帖树形打印复制链接

主题:[求助]使用ExportDBFile这个命令时,导出动态的文件名

帅哥哟,离线,有人找我吗?
jackslowfuck
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:107 积分:0 威望:0 精华:0 注册:2008/3/11 15:48:00
[求助]使用ExportDBFile这个命令时,导出动态的文件名  发帖心情 Post By:2009/3/23 11:40:00 [只看该作者]

我在使用ExportDBFile这个命令时,我想在每次导出的时候询问我将要输出的文件名,而不是像公式里那样固定的文件名,可以吗?

 回到顶部
帅哥哟,离线,有人找我吗?
lyang70
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5115 积分:862 威望:0 精华:0 注册:2006/8/15 16:57:00
  发帖心情 Post By:2009/3/23 11:47:00 [只看该作者]

用Do(5)即可!

 回到顶部
帅哥哟,离线,有人找我吗?
还不错
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
  发帖心情 Post By:2009/3/23 12:51:00 [只看该作者]

参考;
If(Exist(docdir+"产品成本计算单("+text(year(today()))+"."+[月份]+").xls") = True ,if(msgbox(docdir+"产品成本计算单("+text(year(today()))+"."+[月份]+").xls"+char(10)+char(13)+char(13)+"文件已存在!是否复盖?",2)= True ,ExportDBFile(docdir+"产品成本计算单("+text(year(today()))+"."+[月份]+").xls",6,"产品实际成本") And msgbox("产品成本计算单("+text(year(today()))+"."+[月份]+").xls"+char(10)+char(13)+char(13)+"文件导出成功!",0),msgbox("已取消数据导出!",0)),ExportDBFile(docdir+"产品成本计算单("+text(year(today()))+"."+[月份]+").xls",6,"产品实际成本") And msgbox("产品成本计算单("+text(year(today()))+"."+[月份]+").xls"+char(10)+char(13)+char(13)+"文件导出成功!",0))

 回到顶部
帅哥哟,离线,有人找我吗?
yangming
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:2062 积分:20 威望:0 精华:0 注册:2006/8/11 10:51:00
  发帖心情 Post By:2009/3/23 13:19:00 [只看该作者]

http://bbs.egrid2000.com/cgi-bin/topic.cgi?forum=8&topic=37
这是通用导入导出的样表,应该能达到你的要求

 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/3/23 13:39:00 [只看该作者]

用2楼的或者用函数:

GetFileName()

利用文件对话框获得一个文件名。

语法:

GetFileName(Filter, Title, Mode)

Filter
过滤器,指定在对话框的文件列表框中显示的文件的类型。
过滤器由description和fifter组成,中间使用使用符号“|”隔开。例如,选择过滤器为Text Files|*.txt,就显示所有的文本文件,前面的Text Files是description,后面的*.txt是fifter,fifter可以有多个文件类型组成,不同的文件类型用分号(;)隔开。
可以同时提供多个过滤器,这样话框显示时将出现一个过滤器列表,用它可以进行选择文件类型,过滤器之间同样使用符号“|”隔开。下列代码给出一个过滤器的例子,该过滤器允许选择文本文件或含有位图和图标的图形文件:
Text Files|*.txt|Pictures Files|*.bmp;*.ico

Tiltle   对话框标题

Mode     对话框类型,0为打开方式,1为保存方式

例子:
1、备份当前文件,备份文件的名称和位置由用户自己确定,可以增加一个按钮或菜单项,将其公式设为:
Save() And BackupFile(GetFileName("易表文件|*.egd","备份",1))

2、假定有一个照片列,希望由用户通过对话框选择照片填入到照片列,公式为:
SetCellText(GridName,Row,"照片",GetFileName("图形文件|*.jpg;*.bmp","选择照片",0))


 回到顶部