- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 请教：练习 e.Write Book 命令未见报表产生。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109434)
-- 发布时间：2017/11/11 22:52:00
-- 请教：练习 e.Write Book 命令未见报表产生。
在学习到本页地址：http://www.foxtable.com/mobilehelp/scr/0151.htm 未产生相关报表。
\'主档语句 -------- 生成Excel格式订单
With wb.AddButtonGroup("form1","btg2",False)
.add("btn4","生成Excel 格式订单","button","po_order.xls?oid=" & pr("po_id"))
End With
\'\'子程序语句 --------函数名称：po_Create XLS 生成Excel格式订单
Dim e As RequestEventArgs = args(0)
Dim oid As String
If e.Get Values.Contains Key("oid") Then
oid = e.Get Values("oid")
msgbox("订单号:" & oid) ’显示有收到订单号码
Else
Return ""
End If
Dim Book As New X LS.Book(Pro ject Path & "Attach ments\\po_purchase.xls")
Dim fl As String = ProjectPath & "Reports\\po_purchase.xls"
msgbox("FL:" & fl) ‘这里显示：c:\\jy-app\\reports\\po_purchase.xls , 我确定这里有文件：po_purchase.xls文件存在
book.AddData Table("采购主档","jyapp","Sel ect * fr om {poOrderMaster} where po_id= \'" & oid & "\'") \'添加父表
book.AddData Table("采购明细","jyapp","Sel ect *,po_isl * po_idj As po_ijr from {poOrderLine} where po_id= \'" & oid & "\'") \'添加子表
book.Add Relation("采购主档","po_id","采购明细","po_id") \'建立关联
e.Write Book(book,"采购订单" & oid & ".xls",True) ’这个参数我true,false 已经变化过。
测试环境：Google Chrome，版本 62.0.3202.75（正式版本） （64 位）
测试结果是：桌面一片空白，什么也没有，c:\\jy-app\\reports\\ 没有多出任何文件。（未见："采购订单" & oid & ".xls" 相关文件）
请教专家看看，我什么地方出错了？
在本例中，没有看到什么地方使用 fl 变量
谢谢你！
[此贴子已经被作者于2017/11/11 23:25:00编辑过]
-- 发布时间：2017/11/11 23:25:00
-- e.writebook在前面的贴子中找到答案了，谢谢！
在前面的贴子中找到答案了，谢谢！
------以下是之前 专家回复的类似答案，用来一测试就生效。。
-----------------------
Post By：2017/7/17 12:24:00 [只看该作者] 代码这样写
Functions.Execute("order1",e) ------------------------- |