| Line 516... |
Line 516... |
| 516 |
GetFollowing = GetFollowing & "<img class='image12 vixIframeDialog' href='_iframe_pkgs_followed.asp?proj_id=" & pkgInfoHash.Item ("proj_id") & "&pkg_id=" & pkgInfoHash.Item ("pkg_id") & "' title='Follow: " & pkgInfoHash.Item ("pkg_name") &"' src='images/i_follow.gif'>"
|
516 |
GetFollowing = GetFollowing & "<img class='image12 vixIframeDialog' href='_iframe_pkgs_followed.asp?proj_id=" & pkgInfoHash.Item ("proj_id") & "&pkg_id=" & pkgInfoHash.Item ("pkg_id") & "' title='Follow: " & pkgInfoHash.Item ("pkg_name") &"' src='images/i_follow.gif'>"
|
| 517 |
End If
|
517 |
End If
|
| 518 |
|
518 |
|
| 519 |
End If
|
519 |
End If
|
| 520 |
End Function
|
520 |
End Function
|
| 521 |
'-------------------------------------------------
|
521 |
'---------------------------------------------------------------
|
| 522 |
' Description: Return a string displaying licence information
|
522 |
' Description: Return a string displaying licence information
|
| 523 |
'----------------------------------------------------------------------------------------------------------------------------------------
|
523 |
'---------------------------------------------------------------
|
| 524 |
Function getLicence
|
524 |
Function getLicence
|
| 525 |
Dim rsQry, rsSql, lName
|
525 |
Dim rsQry, rsSql, lName
|
| 526 |
Dim licenceList
|
526 |
Dim licenceList
|
| 527 |
Dim joiner : joiner = ""
|
527 |
Dim joiner : joiner = ""
|
| 528 |
Dim otherVersions : otherVersions = ""
|
528 |
Dim otherVersions : otherVersions = ""
|
| Line 715... |
Line 715... |
| 715 |
<%=NewLine_To_BR ( To_HTML( rsQry("pv_overview") ) )%>
|
715 |
<%=NewLine_To_BR ( To_HTML( rsQry("pv_overview") ) )%>
|
| 716 |
<%End If%>
|
716 |
<%End If%>
|
| 717 |
</td>
|
717 |
</td>
|
| 718 |
</tr>
|
718 |
</tr>
|
| 719 |
<!-- Package Licence information -->
|
719 |
<!-- Package Licence information -->
|
| - |
|
720 |
<%
|
| - |
|
721 |
Dim sonclick
|
| - |
|
722 |
sonclick="MM_openVixIFrame('_wform_change_licence.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change License')"
|
| - |
|
723 |
%>
|
| 720 |
<tr>
|
724 |
<tr>
|
| 721 |
<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Package Licence:</b> </td>
|
725 |
<td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">
|
| - |
|
726 |
<%If canActionControlInProject ("EditPackageLicence") OR canActionControl("MSMaintainer") Then%>
|
| - |
|
727 |
<a href='javascript:;' onClick="<%=sonclick%>" class='body_txt'>
|
| - |
|
728 |
<b>Package Licence:</b>
|
| - |
|
729 |
<img src='images/i_edit.gif' width='12' height='12' border='0'>
|
| - |
|
730 |
</a>
|
| - |
|
731 |
<%Else%>
|
| - |
|
732 |
<b>Package Licence:</b>
|
| - |
|
733 |
<img src='images/i_edit_disable.gif' width='12' height='12' border='0'>
|
| - |
|
734 |
<%End If%>
|
| - |
|
735 |
</td>
|
| 722 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
736 |
<td bgcolor=#f5f5f5 class="sublbox_txt">
|
| 723 |
<%=getLicence()%>
|
737 |
<%=getLicence()%>
|
| 724 |
</td>
|
738 |
</td>
|
| 725 |
</tr>
|
739 |
</tr>
|
| 726 |
<%
|
740 |
<%
|
| 727 |
Dim shref
|
741 |
Dim shref
|
| 728 |
Dim smail
|
742 |
Dim smail
|
| 729 |
Dim sonclick
|
- |
|
| 730 |
|
743 |
|
| 731 |
' Owner:
|
744 |
' Owner:
|
| 732 |
sonclick="MM_openVixIFrame('_wform_change_owner.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Owner')"
|
745 |
sonclick="MM_openVixIFrame('_wform_change_owner.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Owner')"
|
| 733 |
smail = pkgInfoHash.Item ("owner_email")
|
746 |
smail = pkgInfoHash.Item ("owner_email")
|
| 734 |
shref = "mailto:"& smail
|
747 |
shref = "mailto:"& smail
|