以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  这个代码有问题么?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30166)

--  作者:jinzhengbe
--  发布时间:2013/3/22 9:48:00
--  这个代码有问题么?
Dim ex As New Exporter
ex.SourceTableName = "quhuojilu"
ex.FilePath = "\\\\PC-server\\取货\\gd.mdb"
ex.Filter = "剩余数量 > \'0\'"
If FileSys.FileExists(ex.FilePath) Then\'如果目标文件已经存在
   FileSys.DeleteFile(ex.FilePath) \'则删除之
End If
ex.Export()

--  作者:狐狸爸爸
--  发布时间:2013/3/22 11:56:00
--  

代码看不出问题,看看路径、文件名、表名正确否


--  作者:lihe60
--  发布时间:2013/3/22 12:41:00
--  
ex.Filter = "剩余数量 > \'0\'"
剩余数量是什么类型字段?