| Line 1... |
Line 1... |
| 1 |
<%@LANGUAGE="VBSCRIPT"%>
|
1 |
<%@LANGUAGE="VBSCRIPT"%>
|
| 2 |
<%
|
2 |
<%
|
| 3 |
'=====================================================
|
3 |
'=====================================================
|
| 4 |
' JSON test and play
|
4 |
' build_release_log_json.asp
|
| 5 |
'=====================================================
|
5 |
'=====================================================
|
| 6 |
%>
|
6 |
%>
|
| 7 |
<%
|
7 |
<%
|
| 8 |
Option explicit
|
8 |
Option explicit
|
| 9 |
' Essential to get UTF through all the hoops. ie: VÄSTTRAFIK (VTK)
|
9 |
' Essential to get UTF through all the hoops. ie: VÄSTTRAFIK (VTK)
|
| Line 191... |
Line 191... |
| 191 |
Dim tcount : tcount = fields(16)
|
191 |
Dim tcount : tcount = fields(16)
|
| 192 |
|
192 |
|
| 193 |
Set fields = nothing
|
193 |
Set fields = nothing
|
| 194 |
|
194 |
|
| 195 |
newitem(0) = "<a href='rtree.asp?proj_id=" & proj_id & "'>" & proj_name & "</a>"
|
195 |
newitem(0) = "<a href='rtree.asp?proj_id=" & proj_id & "'>" & proj_name & "</a>"
|
| 196 |
newitem(1) = rtag_name
|
196 |
newitem(1) = "<a href='dependencies.asp?rtag_id=" & rtag_id & "'>" & rtag_name & "</a>"
|
| 197 |
newitem(2) = "<a href=view_by_version.asp?pkg_id=" & pkg_id & "&fpkgversion=*" & v_ext & " title=""" & description & """>" & pkg_name & "</a>"
|
197 |
newitem(2) = "<a href=view_by_version.asp?pkg_id=" & pkg_id & "&fpkgversion=*" & v_ext & " title=""" & description & """>" & pkg_name & "</a>"
|
| 198 |
newitem(3) = "<a href='dependencies.asp?pv_id=" & pv_id & "&rtag_id=" & rtag_id &"' title=""" & comments & """>" & pkg_version & "</a>"
|
198 |
newitem(3) = "<a href='dependencies.asp?pv_id=" & pv_id & "&rtag_id=" & rtag_id &"' title=""" & comments & """>" & pkg_version & "</a>"
|
| 199 |
newitem(4) = timestamp
|
199 |
newitem(4) = timestamp
|
| 200 |
newitem(5) = reason
|
200 |
newitem(5) = reason
|
| 201 |
newitem(6) = state
|
201 |
newitem(6) = "<a href='unit_test_log.asp?rtag_id=" & rtag_id & "&pv_id=" & pv_id & "'>" & state & "</a>"
|
| 202 |
If tcount <= 0 Then tcount = ""
|
202 |
If tcount <= 0 Then tcount = ""
|
| 203 |
newitem(7) = tcount
|
203 |
newitem(7) = tcount
|
| 204 |
|
204 |
|
| 205 |
rsQry.MoveNext
|
205 |
rsQry.MoveNext
|
| 206 |
Wend
|
206 |
Wend
|