Dim Book As New XLS.Book(ProjectPath & "Attachments\工资单.xls")
Dim fl As String = ProjectPath & "Reports\工资单.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
dim Copyfl as string = "D:\工资表\format(e.DataRow("工资月份"),"yyyy")\format(e.DataRow("工资月份"),"MM") " & e.DataRow("姓名") & format(e.DataRow("工资月份"),"yyyyMM") & ".xls"
Book.Save(Copyfl ) '保存工作簿副本
另存为副本这样写可以吗?存到d盘工资表下,并按年、月生成文件夹,然后生成名称+年月为名称的.xls文件!
dim Copyfl as string = "D:\工资表\format(e.DataRow("工资月份"),"yyyy")\format(e.DataRow("工资月份"),"MM") " & e.DataRow("姓名") & format(e.DataRow("工资月份"),"yyyyMM") & ".xls"
求版主帮忙!