以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]导出文件名称异常 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136885) |
|
-- 作者:lgj716330 -- 发布时间:2019/6/23 20:19:00 -- [求助]导出文件名称异常 Dim s As String = FileSys.ReadAllText("\\mgsyf\\Project\\sjip.txt") Dim ex As New Exporter ex.SourceTableName = "会计凭证导入" ex.FilePath = s & "凭证.xls" ex.Format = "Excel" ex.Export() 导出后存在两个问题 1、名称前出现很长的空格,如下图 2、报表做了修改后,再次导出,没显示不成功,但也没有替换掉前次导出的文件(要求替换掉) 如何解决?
|
|
-- 作者:lgj716330 -- 发布时间:2019/6/23 20:29:00 -- 偿试着用下面这方式,没提示异常,但结果没导出来
|
|
-- 作者:有点甜 -- 发布时间:2019/6/24 11:12:00 -- 弹出值看一下
Dim s As String = FileSys.ReadAllText("\\mgsyf\\Project\\sjip.txt") msgbox(1234 & s & 456) |
|
-- 作者:lgj716330 -- 发布时间:2019/6/24 16:21:00 -- 显示异常 这个原因已找到,是文本文档里的IP后面有空格 但奇怪的是,把IP后面的空格去掉后,导出来还是这样子
[此贴子已经被作者于2019/6/24 16:35:52编辑过]
|
|
-- 作者:lgj716330 -- 发布时间:2019/6/24 16:50:00 -- 用客户端试了下,名称是正常了,但修改报表后重新导出还是替换不了原来的文件 是不是要写个代码重新导出前先删除原来的文件
[此贴子已经被作者于2019/6/24 16:51:26编辑过]
|
|
-- 作者:lgj716330 -- 发布时间:2019/6/24 16:59:00 -- 嗯,搞定了,但在系统菜单状态下导出的文件名称就是异常,客户端正常,不知怎么回事 Dim s As String = FileSys.ReadAllText("\\mgsyf\\Project\\sjip.txt") Dim ex As New Exporter ex.SourceTableName = "会计凭证导入" ex.FilePath = s & "凭证.xls" ex.Format = "Excel" If FileSys.FileExists(s & "凭证.xls") Then FileSys.DeleteFile(s & "凭证.xls",2,2) End If ex.Export() \'开始导出
|
|
-- 作者:有点甜 -- 发布时间:2019/6/24 17:03:00 -- 这个exporter导出不能覆盖原来文件的,可以尝试另一种方法,如
http://www.foxtable.com/webhelp/topics/0559.htm
|
|
-- 作者:lgj716330 -- 发布时间:2019/6/28 16:41:00 -- Dim s As String = FileSys.ReadAllText("\\mgsyf\\Project\\sjip.txt") Dim ex As New Exporter ex.SourceTableName = "会计凭证导入" ex.FilePath = s & "凭证.xls" ex.Format = "Excel" ex.Export() 这种导出会以新的工作表形式,我想实现导出到某个已存在的工作表(模板)中,且不破坏模板的格式 换个说法就是把数据填充到服务器上的某个有固定格式的excel模板中,要如何实现
|
|
-- 作者:有点甜 -- 发布时间:2019/6/28 17:14:00 -- 1、生成新的sheet,参考 http://www.foxtable.com/webhelp/topics/0559.htm
2、如果是模板,参考 http://www.foxtable.com/webhelp/topics/1145.htm
3、如果直接赋值,参考 http://www.foxtable.com/webhelp/topics/1148.htm
|