Foxtable(狐表)用户栏目专家坐堂 → [求助]XLS模板引用问题


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

主题:[求助]XLS模板引用问题

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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/2/12 17:24:00 [显示全部帖子]

是的,就是模版文件不存在,出问题的代码是这样

 

Dim  Book As New XLS.Book(ProjectPath & "Attachments\模板.xls")  '打开模板

 

你可以在命令窗口执行下面的代码判断:

 

If filesys.FileExists(ProjectPath & "Attachments\模板.xls") Then
   messagebox.show("存在")
Else
   messagebox.show("不存在")
End If

 

 


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


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/2/12 18:02:00 [显示全部帖子]

这个地方有问题:

 

Dim fl As  String =  ProjectPath &  "f:\报告1.xls"

 

改为

 

Dim fl As  String =  ProjectPath &  "报告1.xls"


 回到顶部