以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  vars变量值赋给单元格  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119116)
--  作者：nxqtxwz
--  发布时间：2018/5/18 8:40:00
--  vars变量值赋给单元格

请问老师，要想将VARS变量“AAA”的值赋给表的指定列，如下面的代码怎么改写呢？

 

DataTables("打印审批表_Table1").ReplaceFor("采购表名称",e.form.controls("TextBox1").text, "采购申报表打印 = true")
--  作者：有点甜
--  发布时间：2018/5/18 8:51:00
--  

DataTables("打印审批表_Table1").ReplaceFor("采购表名称", vars("aaa"), "采购申报表打印 = true")

 

http://www.foxtable.com/webhelp/scr/1532.htm

 
--  作者：nxqtxwz
--  发布时间：2018/5/18 9:31:00
--  
请问老师，能用VARS变量命名EXCEL报表文件名吗？在EXCEL报表中如何自动保存报表到设定的目录中。
--  作者：有点甜
--  发布时间：2018/5/18 9:35:00
--  

参考

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls")
Dim fl As String = "d:\\test\\出库单.xls"

\'Dim fl As String = "d:\\test\\出库单" & vars("aaa") & ".xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
--  作者：nxqtxwz
--  发布时间：2018/5/18 11:16:00
--  

Dim fl As String = ProjectPath & "Reports\\" & "vars("aaa")" & ".xlsx"

提示编译错误：应为语句的结束。什么原因呢？
--  作者：有点甜
--  发布时间：2018/5/18 11:16:00
--  
Dim fl As String = ProjectPath & "Reports\\" & vars("aaa") & ".xlsx"