📄 soft_show.asp
字号:
<!--#include file="Inc/func_soft.asp"-->
<%
'请勿改动下面这三行代码
const ChannelID=3
Const ShowRunTime="Yes"
MaxPerPage=20
SkinID=0
PageTitle="软件信息"
Set rsSoft= Server.CreateObject("ADODB.Recordset")
Set rsPic= Server.CreateObject("ADODB.Recordset")
%>
<html>
<head>
<title><%=SoftTitle%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<!--#include file="inc/Skin_CSS.asp"-->
<%call MenuJS()%>
<script language="JavaScript" type="text/JavaScript">
function Check()
{
if (document.myform.Name.value=="")
{
alert("请输入姓名！");
document.myform.Name.focus();
return false;
}
if (document.myform.Content.value=="")
{
alert("请输入评论内容！");
document.myform.Content.focus();
return false;
}
return true;
}
</script>
</head>
<body <%=Body_Label%> onmousemove='HideMenu()'>
<!--#include file="top.asp"-->
<%
dim sqlRoot,rsRoot,trs,arrClassID,TitleStr
sqlRoot="select C.ClassID,C.ClassName,C.RootID,L.LayoutFileName,L.LayoutID,C.Child,C.ParentPath From SoftClass C inner join Layout L on C.LayoutID=L.LayoutID where C.ParentID=" & ClassID & " or C.ParentPath like '%" & ParentPath & "," & ClassID & "%' and C.IsElite=True and C.LinkUrl='' and C.BrowsePurview>=" & UserLevel & " order by C.OrderID"
Set rsRoot= Server.CreateObject("ADODB.Recordset")
rsRoot.open sqlRoot,conn,1,1
arrClassID=ClassID
do while not rsRoot.eof
arrClassID=arrClassID & "," & rsRoot(0)
rsRoot.movenext
loop
rsRoot.close
set rsRoot=nothing
%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="border2">
<tr>
<td width="180" rowspan="2" valign="top" class="tdbg_leftall"> <table width="180" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="title_left2"></td>
</tr>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0"class="title_left">
<tr >
<td class='title_bg_center' align="center">软件搜索</td>
</tr>
</table></td>
</tr>
<tr>
<td class="tdbg_left"><div align="center">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5" style="word-break:break-all">
<tr>
<td valign="top"> <div align="center">
<%call ShowSearchForm("Soft_Search.asp",1)%>
</div></td>
</tr>
</table>
</div></td>
</tr>
<tr>
<td class="title_left2"></td>
</tr>
<%if Child>0 then%>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0" class="title_left">
<tr>
<td class='title_bg_center' align="center"><%=ClassName%> 分类</td>
</tr>
</table></td>
</tr>
<tr>
<td class="tdbg_left"><table width="100%" height="100%" border="0" cellpadding="8" style="word-break:break-all">
<tr>
<td valign="top"> <%call ShowChildClass(1)%> </td>
</tr>
</table></td>
</tr>
<tr>
<td class="title_left2"></td>
</tr>
<%end if%>
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0" class="title_left">
<tr>
<td class='title_bg_center' align="center"><%=ClassName%>下 载Top10</td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top" class="tdbg_left"><table width="100%" height="100%" border="0" cellpadding="8" style="word-break:break-all">
<tr>
<td valign="top"> <%call ShowTop(10,200,arrClassID)%> </td>
</tr>
</table></td>
</tr>
<tr>
<td class="title_left2"></td>
</tr>
<tr>
<td background="Images/left05.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0" class="title_left">
<tr>
<td class='title_bg_center' align="center">软 件 评 分</td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top" class="tdbg_left"><table width="175" border="0" align="center" cellpadding="5" cellspacing="0" style="word-break:break-all">
<form name="myform" method="post" action="Soft_Comment.asp" onSubmit="return Check()" >
<% if CheckUserLogined()=false then%>
<tr>
<td align="center">姓名：
<input name="Name" type="text" id="Name" size="14" maxlength="16" title=必填></td>
</tr>
<%else%>
<input type="hidden" name="Name" value="<%=UserName%>">
<% end if %>
<tr >
<td align="center">评分<input type="radio" name="Score" value="1" style="BORDER:0px;">1<input type="radio" name="Score" value="2" style="BORDER:0px;">2<input type="radio" name="Score" value="3" checked style="BORDER:0px;">3<input type="radio" name="Score" value="4" style="BORDER:0px;">4<input type="radio" name="Score" value="5" style="BORDER:0px;">5
</td>
</tr>
<tr>
<td align="center"> <textarea name="Content" cols="23" rows="5" id="Content" alt="请注意用语文明且合法，不要发布带有攻击性的言论，谢谢合作！" style="BORDER-BOTTOM: #cccccc 1px solid; BORDER-LEFT: #cccccc 1px solid; BORDER-RIGHT: #cccccc 1px solid; BORDER-TOP: #cccccc 1px solid; font-size: 9pt"></textarea>
</td>
</tr>
<tr>
<td> <div align="center">
<input name="Action" type="hidden" id="Action" value="Save">
<input name="SoftID" type="hidden" id="SoftID" value="<%=SoftID%>">
<input type="submit" name="Submit2" value="提交">
<input name="Reset2" type="reset" id="Reset3" value="清除">
</div></td>
</tr>
</form>
</table></td>
</tr>
<tr>
<td class="title_left2"></td>
</tr>
</table>
</td>
<td valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="15" align=center>
<tr>
<td align="left" bgcolor="#FFFFFF">
<TABLE
width="100%" border=0 align=center cellPadding=2 cellSpacing=0 class="tdbg_rightall" style="word-break:break-all">
<TBODY>
<TR>
<TD align=center style="padding-top:5px" bgcolor="#efefef"><STRONG><%=dvhtmlencode(rs("SoftName")) & " " & dvhtmlencode(rs("SoftVersion"))%></STRONG></TD>
</TR>
</TBODY>
</TABLE>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="1" bgcolor="#000000"></td>
</tr>
<tr>
<td height="10"></td>
</tr>
</table>
<TABLE width="100%" border=0 align=center cellPadding=2
cellSpacing=1 bgColor=#EEEEEE style="WORD-BREAK: break-all">
<TBODY>
<TR bgColor=#fffffe>
<TD width="48%">运行环境： <%=dvhtmlencode(rs("OperatingSystem"))%></TD>
<TD width="27%" rowSpan=6 align=center valign="middle" bgColor=#fffffe><%
if rs("SoftPicUrl")="" then
response.write "<img src='images/nopic.jpg'>"
else
response.write "<a href='" & rs("SoftPicUrl") & "'><img src='" & rs("SoftPicUrl") & "' width='150' border='0' alt='查看原始图片'></a>"
end if
%> </TD>
<TD width="25%" bgcolor="#fffffe">文件大小： <%=rs("SoftSize") & " K"%></TD>
</TR>
<TR bgColor=#fffffe>
<TD>添加时间： <%=rs("UpdateTime")%></TD>
<TD>软件等级： <font color="#009900"><%=string(rs("Stars"),"★")%></font></TD>
</TR>
<TR bgColor=#fffffe>
<TD bgcolor="#fffffe">授权方式：
<%
select case rs("CopyrightType")
case 1
response.write "免费版"
case 2
response.write "共享版"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -