| Line 399... |
Line 399... |
| 399 |
|
399 |
|
| 400 |
Dim PkgNameSTR, PkgVersionSTR
|
400 |
Dim PkgNameSTR, PkgVersionSTR
|
| 401 |
PkgNameSTR = ""
|
401 |
PkgNameSTR = ""
|
| 402 |
PkgVersionSTR = ""
|
402 |
PkgVersionSTR = ""
|
| 403 |
If IsObject(pkgInfoHash) Then
|
403 |
If IsObject(pkgInfoHash) Then
|
| - |
|
404 |
If pkgInfoHash.Item("pkg_name") <> "" Then
|
| 404 |
PkgNameSTR = " > <a class=mmItem href='view_by_version.asp?pkg_id="& pkgInfoHash.Item("pkg_id") &"&listby=1'>"& pkgInfoHash.Item("pkg_name")& "</a>"
|
405 |
PkgNameSTR = " > <a class=mmItem href='view_by_version.asp?pkg_id="& pkgInfoHash.Item("pkg_id") &"&listby=1'>"& pkgInfoHash.Item("pkg_name")& "</a>"
|
| 405 |
PkgVersionSTR = " > <a class=mmItem href='#'>"& pkgInfoHash.Item("pkg_version") &"</a>"
|
406 |
PkgVersionSTR = " > <a class=mmItem href='#'>"& pkgInfoHash.Item("pkg_version") &"</a>"
|
| - |
|
407 |
End If
|
| 406 |
End IF
|
408 |
End IF
|
| 407 |
|
409 |
|
| 408 |
'-- Render Menu --
|
410 |
'-- Render Menu --
|
| 409 |
Response.write "<table width='100%' border='0' cellspacing='0' cellpadding='0'>"
|
411 |
Response.write "<table width='100%' border='0' cellspacing='0' cellpadding='0'>"
|
| 410 |
Response.write " <tr>"
|
412 |
Response.write " <tr>"
|
| 411 |
Response.write " <td width='1%'><img src='images/h_trsp_dot.gif' width='30' height='35'></td>"
|
413 |
Response.write " <td width='1%'><img src='images/h_trsp_dot.gif' width='30' height='35'></td>"
|
| 412 |
Response.write " <td nowrap width='100%' class=mmItem>"& HomeSTR & ProjSTR & ActionSTR & RtagSTR & ModeSTR & PkgNameSTR & PkgVersionSTR & "</td>"
|
414 |
Response.write " <td nowrap width='100%' class='mmItem'>"& HomeSTR & ProjSTR & ActionSTR & RtagSTR & ModeSTR & PkgNameSTR & PkgVersionSTR & "</td>"
|
| 413 |
Response.write " </tr>"
|
415 |
Response.write " </tr>"
|
| 414 |
Response.write "</table>"
|
416 |
Response.write "</table>"
|
| 415 |
|
417 |
|
| 416 |
rsTemp.Close()
|
418 |
rsTemp.Close()
|
| 417 |
Set rsTemp = nothing
|
419 |
Set rsTemp = nothing
|