Foxtable(狐表)用户栏目专家坐堂 → 请教老师,为什么发布前可以生成word文档,发布后就不能生成了,一直卡在那儿,急求解答。


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

主题:请教老师,为什么发布前可以生成word文档,发布后就不能生成了,一直卡在那儿,急求解答。

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


加好友 发短信
等级:一尾狐 帖子:429 积分:3483 威望:0 精华:0 注册:2019/1/4 23:39:00
请教老师,为什么发布前可以生成word文档,发布后就不能生成了,一直卡在那儿,急求解答。  发帖心情 Post By:2019/12/19 1:32:00 [只看该作者]

如题

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


加好友 发短信
等级:超级版主 帖子:113660 积分:578843 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/19 9:34:00 [只看该作者]

是在同一台电脑测试吗?怎么生成的word文档?写了什么代码?



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


加好友 发短信
等级:一尾狐 帖子:429 积分:3483 威望:0 精华:0 注册:2019/1/4 23:39:00
  发帖心情 Post By:2019/12/19 20:42:00 [只看该作者]

是同一台电脑,代码如下:

    Dim r As Row = Tables("人员基本信息表").Current
    Dim tm As String  = ProjectPath & "Attachments\干部任免表.doc" '指定模板文件
    Dim fl As String = SpecialFolder.DesktopDirectory & "\" & r("姓名") & "干部任免审批表.doc" '指定目标文件
    Dim wrt As New WordReport(Tables("干部任免审批表"),tm,fl) '定义一个WordReport
    wrt.Build() '这一行出的问题,但不知道如何解决
    wrt.quit()


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


加好友 发短信
等级:超级版主 帖子:113660 积分:578843 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/20 8:42:00 [只看该作者]

1、如果有安装wps,卸载掉
2、把保存的路径改改,不要放到桌面,我的文档,C盘等系统目录。把程序设置为“使用管理员身份运行”

 回到顶部