| Line 18... |
Line 18... |
| 18 |
End If
|
18 |
End If
|
| 19 |
'[1] Tab Image
|
19 |
'[1] Tab Image
|
| 20 |
'[2] Tab Name
|
20 |
'[2] Tab Name
|
| 21 |
'[3] Tab Link
|
21 |
'[3] Tab Link
|
| 22 |
strURL = objPMod.ComposeURL()
|
22 |
strURL = objPMod.ComposeURL()
|
| 23 |
If Request("keyword") <> "" Then strURL = strURL + "&keyword="& Request("keyword")
|
- |
|
| 24 |
If Request("searchtype") <> "" Then strURL = strURL + "&searchtype="& Request("searchtype")
|
- |
|
| 25 |
|
23 |
|
| 26 |
arrEnv = Array ( _
|
24 |
arrEnv = Array ( _
|
| 27 |
Array("","Work In Progress",LScriptName &"?envtab="& enumENVTAB_WORK_IN_PROGRESS &"&"& strURL),_
|
25 |
Array("","Work In Progress","onmouseover=""EnvDynaTabLink(this,'" & LScriptName & "','" &"?envtab=" & enumENVTAB_WORK_IN_PROGRESS & "&" & strURL & "');"""),_
|
| 28 |
Array("","Pending",LScriptName &"?envtab="& enumENVTAB_PLANNED &"&"& strURL),_
|
26 |
Array("","Pending","onmouseover=""EnvDynaTabLink(this,'" & LScriptName & "','" &"?envtab=" & enumENVTAB_PLANNED & "&" & strURL & "');"""),_
|
| 29 |
Array("","Released",LScriptName &"?envtab="& enumENVTAB_RELEASED &"&"& strURL),_
|
27 |
Array("","Released","onmouseover=""EnvDynaTabLink(this,'" & LScriptName & "','" &"?envtab=" & enumENVTAB_RELEASED & "&" & strURL & "');"""),_
|
| 30 |
Array(""," All",LScriptName &"?envtab="& enumENVTAB_ALL &"&"& strURL))
|
28 |
Array(""," All","onmouseover=""EnvDynaTabLink(this,'" & LScriptName & "','" &"?envtab=" & enumENVTAB_ALL & "&" & strURL & "');"""))
|
| 31 |
|
29 |
|
| 32 |
arrProductEnv = Array ( _
|
30 |
arrProductEnv = Array ( _
|
| 33 |
Array("","Release",LScriptName &"?envtab="& enumENVTAB_PRODRELEASE &"&"& strURL),_
|
31 |
Array("","Release",LScriptName &"?envtab="& enumENVTAB_PRODRELEASE &"&"& strURL),_
|
| 34 |
Array("","Integrate",LScriptName &"?envtab="& enumENVTAB_INTEGRATE &"&"& strURL),_
|
32 |
Array("","Integrate",LScriptName &"?envtab="& enumENVTAB_INTEGRATE &"&"& strURL),_
|
| 35 |
Array("","Test",LScriptName &"?envtab="& enumENVTAB_TEST &"&"& strURL),_
|
33 |
Array("","Test",LScriptName &"?envtab="& enumENVTAB_TEST &"&"& strURL),_
|