老师  如下代码  这个项目发布后模板应该怎么处理？

我们发布后publish文件夹里有这个模板   但是具体到每台电脑安装路径也不相同  请问老师应该如何解决

Dim Book As New  XLS.Book("D:\\新料导入系统\\新料导入系统\\Attachments\\陶瓷电容模板.xls")
 Dim fl As  String ="D:\\新料导入系统\\新料导入系统\\Reports\\新料.xls"
 Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As  New  Process  \'打开工作簿
Proc.File = fl
 Proc.Start()

Dim Book As New  XLS.Book(projectpath & "Attachments\\陶瓷电容模板.xls")
 Dim fl As  String = projectpath & "Reports\\新料.xls"
 Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As  New  Process  \'打开工作簿
Proc.File = fl
 Proc.Start()

老师  这个好了  我想再请教下  这个模板是把表里的文件全都导出来了  怎样才能做到有选择性的导出  例如以时间（表中有一列已设置为填表时间）或者选定行导出

生成之前，先把table筛选一下，再导出就行了。

Dim Book As New  XLS.Book(projectpath & "Attachments\\陶瓷电容模板.xls")
 Dim fl As  String = projectpath & "Reports\\新料.xls"
 Dim Sheet As XLS.Sheet = Book.Sheets(0)
 Sheet(1,247).Value = "<jiean = # False #>"  \'写入打印条件
 Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As  New  Process  \'打开工作簿
Proc.File = fl
 Proc.Start()

老师  上述代码没有按照预想的执行 还是全部都打印了

方法一：把表筛选一下啊

Tables("表A").Filter = "jiean = false"

方法二： 位置一定要写对。

Dim Book As New  XLS.Book(projectpath & "Attachments\\陶瓷电容模板.xls")
Dim fl As  String = projectpath & "Reports\\新料.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(1,247).Value = "<jiean = False>"  \'写入打印条件
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As  New  Process  \'打开工作簿
Proc.File = fl
Proc.Start()

6楼的代码没问题

多条件，就用 and 连接，如 条件1=true and 条件2=12345

上述条件2=12345   条件2您的意思是文本的吗？  不用写成“12345”是吗？

结合上述的例子我写了，但是没有出来结果，我们的条件2就是一个文本的条件。