定制QC工作流,限制上传附件大小
2010-01-24 21:33
567 查看
为了防止某些测试人员上传过大的附件到QC中,可以采用下面脚本来定制QC的工作流:
参考:
http://www.jds.net.au/tech-tips/quality-center-attachments/
Sub Attachment_New(Attachment)
'Use ActiveModule and ActiveDialogName to get the current context.
On Error Resume Next
'Remove new attachment if file size is too big
If Attachment.Type = 1 then 'Attachment is of type TDATT_FILE - a file.
MaxFileSize = 3145728 'Set the maximum attachment size in Bytes <<- 3mb is our limit!
If Attachment.FileSize > MaxFileSize then
Select Case Attachment.Field("CR_ENTITY")
'Requirement
Case "REQ"
Set attRec = ReqFactory.Item(Attachment.Field("CR_KEY_1"))
'TestPlan
Case "ALL_LISTS" 'Folder
Set attRec = TreeManager.NodeByID(Attachment.Field("CR_KEY_1"))
msgbox attRec.ID
Case "TEST" ' Test
Set attRec = TestFactory.Item(Attachment.Field("CR_KEY_1"))
Case "DESSTEPS" 'Test step
Set attTest = TestFactory.Item(Test_Fields("DS_TEST_ID").Value)
Set attRec = attTest.DesignStepFactory.Item(Attachment.Field("CR_KEY_1"))
'TestLab
Case "CYCL_FOLD" 'Folder
Set attRec = TestSetTreeManager.NodeById(Attachment.Field("CR_KEY_1"))
Case "CYCLE" 'Test Set
Set attRec = TestSetFactory.Item(Attachment.Field("CR_KEY_1"))
Case "TESTCYCL" 'TestInstance
Set attRec = TSTestFactory.Item(Attachment.Field("CR_KEY_1"))
Case "RUN" 'Run
Set attRec = RunFactory.Item(Attachment.Field("CR_KEY_1"))
Case "STEP" 'Run Step
Set attRun = RunFactory.Item(Step_Fields("ST_RUN_ID").Value)
Set attRec = attRun.StepFactory.Item(Attachment.Field("CR_KEY_1"))
'Defects
Case "BUG"
Set attRec = BugFactory.Item(Attachment.Field("CR_KEY_1"))
End Select
set AttFac = attRec.Attachments
Msgbox "Please exit this record and refresh the QC page. The file: " & vbLF & _
Attachment.Name & vbLf & " has been removed as it exceeds the required file size of 3mb."
AttFac.RemoveItem(Attachment.ID)
End If
End If
On Error GoTo 0
End Sub
参考:
http://www.jds.net.au/tech-tips/quality-center-attachments/
相关文章推荐
- .net附件文件上传大小限制的问题
- .NET附件上传大小限制控制
- 修改IIS6上传文件限制,下载附件大小限制
- 附件上传大小限制-拦截器方法
- asp.net 表单上传 限制附件大小
- ASP.NET FileUpload上传附件的大小限制
- 禅道附件大小的限制、PHP上传文件大小限制
- 修改WordPress中附件上传大小限制
- CRM4.0 上传附件大小限制
- 修改WordPress中上传附件2M大小限制的方法/php+iis上传附件默认大小修改方法
- 设置IIS6.0的上传文件和下载附件的大小限制(验证过确实有效)
- wordpress 上传附件大小限制
- 如何正确调整PHP.INI上传附件大小限制
- .net附件文件上传大小限制的问题
- 如何正确调整PHP上传附件大小限制
- 设置IIS6.0的上传文件和下载附件的大小限制
- IIS7下设置上传附件大小的限制,下载附件限制问题
- 设置IIS6.0的上传文件和下载附件的大小限制
- c# 上传附件大小限制的问题
- 修改Bugfree上传附件大小限制