更改脚本，
在生成的WeeklyDefects.xls中加入日期，
把脚本中的这一行
newBook.SaveAs("C:\WeeklyDefects.xls")
改成
Dim MyDate
MyDate = Date
newBook.SaveAs("C:\WeeklyDefects_" & DatePart("m",MyDate) & "_" & DatePart("d",MyDate) & "_" & DatePart("yyyy",MyDate) & ".xls")
就可以了

楼主，
在xls文件上加时间
这样改有点问题哟
提示如下

没问题
刚才出现的这个错误提示，
是我把vb和perl搞混了
把注释用#表示的

这个文件上加上时间是没问题的

我刚才也测试了一遍，的确是没有问题的:D

使用这个脚本这个功能确实很实用,可以清楚的了解一周以来的工作,

不错!!!!!!!

请问楼主:
把查询到的某一些值进行修改后,再导入到CQ中,如何写代码?谢谢.
能否举例说明,谢谢.

我已经在你的这个帖子中，给你的这个问题做了答复，遍历的过程中就对记录进行修改，
http://bbs.scmlife.com/thread-6779-1-1.html

引用:

原帖由 yunshan 于 2007-1-29 16:45 发表
客户端中只能定义一个固定的查询，如2007-1-22到2007-1-27，但是如果到了下周，这个查询时间必须手动更改，就是因为目前CQ还没有提供适当的查询常量。

错误。
可以在 SQL 中取本周的第一天，然后 + 7 即为本周时间范围，无需一直修改。如：
between dateadd(wk,datediff(wk,0,getutcdate()-7),0) and (dateadd(wk,datediff(wk,0,getutcdate()),0))

这是查上周的时间范围。

nowo，
你可能没有仔细看吧，我在脚本中写的是不论一周中哪天运行脚本都可以导出本周缺陷记录的。

为什么我导出的数据是空的？我运行脚本前还新建了一个defect