此主题相关图片如下:tim截图20200703044655.png
2020年3月31日更新:
1、可以直接用Excel设计网页了,再也无需为复杂的呈现需求而头疼了,下面是一个示例:
1、首先打开CaseStudy目录下的示例文件"Excel报表.foxdb"文件。
2、将HttpRequest事件代码设置为:
If e.Path.StartsWith("Reports\")
e.ResponseEncoding = "gb2312"
Select Case e.Path
Case "Reports\ckd.htm"
Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
e.WriteBookAsHTML(Book)
Case "Reports\jianli.htm"
Dim Book As New XLS.Book(ProjectPath & "Attachments\资料卡.xls")
e.WriteBookAsHTML(Book)
Case Else
e.AsReportServer("Reports\")
End Select
End If
3、在命令窗口执行:
HttpServer.Prefixes.Add("http://127.0.0.1/")
HttpServer.Start()
现在在浏览器输入网址:
http://127.0.0.1/Reports/ckd.htm
即可得到网页:
[此贴子已经被作者于2020/7/3 4:54:49编辑过]