以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]FoxTable如何将某表的数据转换成DBF格式的文件?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1484)

--  作者:tzszw
--  发布时间:2008/12/23 14:22:00
--  可以自己定义登陆界面吗?

在“项目管理”的“高速导出”中可以将“表1”内容导出成DBF格式的,但不知用命令按钮如何导出?(易表中导出成FOXPRO的DBF格式有时数据不正确)
另外,如何用命令按钮来读取DBF格式的文件数据呢?
--  作者:czy
--  发布时间:2008/12/23 14:41:00
--  

将订单表的数据导出为dbf格式:

Dim ex as New Exporter
ex
.SourceTableName = "订单" \'指定导出表
ex.FilePath = "c:\\Data\\" \'指定目标文件路径
ex.Format = "dbase"
\'导出格式为dBASE

ex.NewTableName = "订单数据" \'指定文件名,注意无须扩展名
ex.Export() \'开始导出


--  作者:lxl
--  发布时间:2008/12/23 14:42:00
--  
Dim ex as New Exporter
ex
.SourceTableName = "表A"
ex.FilePath = "c:\\"
ex.Format = "dBASE"

ex.Export()
--  作者:czy
--  发布时间:2008/12/23 14:42:00
--  

导入DBF文件:

Dim ip as New Importer
ip
.SourcePath = "c:\\Data\\" \'指定目录
ip
.SourceTableName = "订单" \'指定要导入的文件订单.DBF
ip
.NewTableName ="订单" \'导入后的表名
ip
.Format = "dbase" \'指定导入格式
ip
.Import()


--  作者:tzszw
--  发布时间:2008/12/23 14:57:00
--  
呵呵,好,谢谢!图片点击可在新窗口打开查看
先去试试!

不知导入或导出文件目录是否可动态指定或指定为当前目录(易表下可用的目录至少有4个呢:sysdir、windir、appdir、docdir)?
--  作者:smileboy
--  发布时间:2008/12/23 15:01:00
--  
以下是引用tzszw在2008-12-23 14:57:00的发言:
呵呵,好,谢谢!图片点击可在新窗口打开查看
先去试试!

不知导入或导出文件目录是否可动态指定或指定为当前目录(易表下可用的目录至少有4个呢:sysdir、windir、appdir、docdir)?

参考ProjectPath


--  作者:tzszw
--  发布时间:2008/12/23 15:31:00
--  
ProjectPath没找着啊!
--  作者:lxl
--  发布时间:2008/12/23 15:44:00
--  

系统变量

系统变量是无需定义的,它们是由系统提供、能够直接使用的变量。

最常用的三个系统变量为:

  • ProjectFile
    字符型,返回已经打开的项目文件名
     
  • ProjectPath
    字符型,返回项目文件所在目录
     
  • ApplicationPath
    返回FoxTable主程序所在目录,通常就是Foxtable的安装目录:

--  作者:tzszw
--  发布时间:2008/12/23 16:02:00
--  
Dim ex as New Exporter
ex.SourceTableName = "表A" \'指定导出表
ex.FilePath = ProjectPath \'指定目标文件路径
ex.Format = "dbase" \'导出格式为dBASE
ex.NewTableName = "订单数据aaa" \'指定文件名,注意无须扩展名
ex.Export() \'开始导出


改成这样的行了,只是"订单数据aaa"生成过后,再点按钮就提示了,好象是提示文件已经存在了,



能否不提示呢?
图片点击可在新窗口打开查看此主题相关图片如下:dd.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2008-12-23 16:03:14编辑过]

--  作者:ybil
--  发布时间:2008/12/23 16:08:00
--  
if... then
      ...
else
     ...
end if
[此贴子已经被作者于2008-12-23 16:17:33编辑过]