Foxtable(狐表)用户栏目专家坐堂 → 关于e.WriteBookAsHTML报错的求助


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

主题:关于e.WriteBookAsHTML报错的求助

帅哥,在线噢!
yshiren
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:86 积分:1014 威望:0 精华:0 注册:2018/9/27 14:01:00
关于e.WriteBookAsHTML报错的求助  发帖心情 Post By:2025/1/9 16:16:00 [只看该作者]

老师好:
我在使用e.WriteBookAsHTML(Book,false)时提示如下错误:
索引和长度必须引用该字符串内的位置。
参数名: length
经调试,在Reports中正常生成了简历表.xls,就是在执行e.WriteBookAsHTML(Book,false)时报错了。源代码在附件中
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:源代码.txt

,请老师指点,谢谢!
[此贴子已经被作者于2025/1/9 16:26:58编辑过]

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


加好友 发短信
等级:超级版主 帖子:111691 积分:568585 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/1/9 16:56:00 [只看该作者]

如果使用WriteBookAsHTML,不需要build,如果是模板也不应该使用false参数:http://www.foxtable.com/mobilehelp/topics/0288.htm

……
                jb.Filter = "[求职编号] = '" & qzbh & "'"
                'jb.Build(True)
                e.Resp
                Dim Book As New XLS.Book(ProjectPath & "Attachments\简历表.xls")
                Book.AddDataTable("简历表",jb.Build(True))
                e.WriteBookAsHTML(Book)
……

另外下面这些代码,如果e.Path字符串没有这么长就会出现【索引和长度必须引用该字符串内的位置。】的错误

Dim n1 As Integer = e.Path.LastIndexOf("\")
    Dim n2 As Integer = e.Path.LastIndexOf(".")
    Dim str As String = e.Path.SubString(n1+1,30)
    Dim dlkl As String = str.SubString(0,10)
    Dim grbh As String = str.SubString(10,10)
    Dim qzbh As String = str.SubString(20,10)

点.之后如果没有31的长度,这种代码肯定会出错:e.Path.SubString(n1+1,30)

 回到顶部