主题：Excel报表

Dim Book As New XLS.Book(ProjectPath & "Attachments\xxx工作报表.xls")

Dim fl As String = ProjectPath & "Reports\ 工作报表.xls"             可以做成     工作报表文件夹 \  当前用户 \ 当前用户&当前日期& 工作报表.xls    这句代码需要怎么合成   求教

Book.Build() '生成细节区

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Start()