主题：Hublider打包app下载不起excel

提示是肯定有的，打包后的下载的文件，在手机系统的信息栏那里有提示。请认真测试。

点击下载，会在【在手机系统的信息栏那里有提示】，类似有人给你微信发信息，手机系统顶部出现的那种提示。

 

 

我这样写代码测试没问题（请ctrl+r重新生成app后测试）

 

Select Case e.Path
    Case "test.htm", ""
        Dim wb As New weui
        With wb.AddButtonGroup("","btg1",True)
            .Add("btn1", "下载", "button", "abc.xls")
        End With
        e.WriteString(wb.Build) '生成网页
    Case "abc.xls"
        Dim Book As New XLS.Book("d:\test.xls")
        e.WriteBook(book,"abc.xls",False)
End Select

 

 

请，单独测试6楼。我测试没问题。