📄 soft_show.asp
字号:
case 3
response.write "试用版"
case 4
response.write "演示版"
case 5
response.write "注册版"
case 6
response.write "破解版"
case 7
response.write "零售版"
case 8
response.write "OEM版"
end select%></TD>
<TD>软件类别：
<%
select case rs("SoftType")
case 1
response.write "国产软件"
case 2
response.write "国外软件"
case 3
response.write "汉化补丁"
case 4
response.write "程序源码"
case 5
response.write "电影下载"
case 6
response.write "FLASH动画"
case 7
response.write "其他"
end select
%></TD>
</TR>
<TR bgColor=#fffffe>
<TD>开 发 商：
<%response.write "<a href='" & rs("AuthorHomepage") & "'>" & dvhtmlencode(rs("Author")) & "</a> <a href='mailto:" & rs("AuthorEmail") & "'>Email</a>" %> </TD>
<TD>软件语言：
<%
select case rs("SoftLanguage")
case 1
response.write "英文"
case 2
response.write "简体中文"
case 3
response.write "繁体中文"
case 4
response.write "简繁中文"
case 5
response.write "多国语言"
case 6
response.write "其他语言"
end select%></TD>
</TR>
<TR bgColor=#fffffe>
<TD>相关链接： <a href="<%=rs("DemoUrl")%>">程序演示</a> <a href="<%=rs("RegUrl")%>">软件注册</a></TD>
<TD>软件添加： <%=rs("Editor")%></TD>
</TR>
<TR bgColor=#fffffe>
<TD bgcolor="#fffffe">下载次数： 本日：<%=rs("DayHits")%> 本周：<%=rs("WeekHits")%></TD>
<TD valign="top" bgColor=#fffffe>解压密码： <span class="red"><%=rs("DecompressPassword")%></span></TD>
</TR>
</TBODY>
</TABLE>
<BR>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgcolor=#efefef style="padding-top:5px">::下载地址::</TD>
</TR>
<TR>
<TD bgcolor="#000000" #ffffff height="1"></TD>
</TR>
</TBODY>
</TABLE>
<TABLE align=center bgColor=#EEEEEE border=0 cellPadding=5 cellSpacing=1 style="WORD-BREAK: break-all" width="100%">
<TBODY>
<TR>
<TD bgColor=#fffffe style="LINE-HEIGHT: 16px">
<%
if rs("SoftLevel")<=999 then
if UserLogined<>True then
FoundErr=True
ErrMsg=ErrMsg & "对不起，本软件为收费下载软件，要求至少是本站的注册用户才能下载！<br>您还没注册或者没有登录？所以不能下载本软件。请赶紧 <a href='User_Reg.asp'><font color=red><b>注册</b></font></a> 或 <a href='User_Login.asp'><font color=red><b>登录</a></font></a>吧！"
else
if UserLevel>rs("SoftLevel") then
FoundErr=True
ErrMsg=ErrMsg & "对不起，本软件为收费下载软件，并且只有 <font color=blue>"
if rs("SoftLevel")=999 then
ErrMsg=ErrMsg & "注册用户"
elseif rs("SoftLevel")=99 then
ErrMsg=ErrMsg & "收费用户"
elseif rs("SoftLevel")=9 then
ErrMsg=ErrMsg & "VIP用户"
elseif rs("SoftLevel")=5 then
ErrMsg=ErrMsg & "管理员"
end if
ErrMsg=ErrMsg & "级别的用户</font> 才能下载。你目前的权限级别不够，所以不能下载。"
else
if ChargeType=1 and rs("SoftPoint")>0 then
if UserPoint<rs("SoftPoint") then
FoundErr=True
ErrMsg=ErrMsg &"对不起，本软件为收费下载软件，并且下载本软件需要消耗 <b><font color=red>" & rs("SoftPoint") & "</font></b> 点！"
ErrMsg=ErrMsg &"而你目前只有 <b><font color=blue>" & UserPoint & "</font></b> 点可用。点数不足，无法下载本软件。请与我们联系进行充值。"
else
ErrMsg=ErrMsg & "<font color=red><b>注意</b></font>：本软件为收费下载软件，并且下载本软件需要消耗 <font color=red><b>" & rs("SoftPoint") & "</b></font> 点！ 若点击任何一个下载地址，意味着你同意消耗相应点数来下载此软件。若你不同意，请不要点击任何下载地址！"
end if
elseif ChargeType=2 then
if ValidDays<=0 then
FoundErr=True
ErrMsg=ErrMsg & "<font color=red>对不起，本软件为收费下载，而您的有效期已经过期，所以无法下载本软件。请与我们联系进行充值。</font>"
end if
end if
end if
end if
end if
if FoundErr=True then
response.write ErrMsg
else
response.write " <a href='Soft_Down.asp?UrlID=1&SoftID=" & rs("SoftID") & "' target='_blank'><img src='images/down/download.gif' border='0'></a> "
if rs("DownloadUrl2")<>"" and rs("DownloadUrl2")<>"http://" then response.write " <a href='Soft_Down.asp?UrlID=2&SoftID=" & rs("SoftID") & "' target='_blank'><img src='images/down/download2.gif' border='0'></a> "
if rs("DownloadUrl3")<>"" and rs("DownloadUrl3")<>"http://" then response.write " <a href='Soft_Down.asp?UrlID=3&SoftID=" & rs("SoftID") & "' target='_blank'><img src='images/down/download2.gif' border='0'></a> "
if rs("DownloadUrl4")<>"" and rs("DownloadUrl4")<>"http://" then response.write " <a href='Soft_Down.asp?UrlID=4&SoftID=" & rs("SoftID") & "' target='_blank'><img src='images/down/download2.gif' border='0'></a> "
end if
%></TD>
</TR>
</TBODY>
</TABLE>
<%if FoundErr<>True and ErrMsg<>"" then response.write ErrMsg %><BR>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgcolor="#efefef">::软件简介::</TD>
</TR>
<TR>
<TD bgcolor="#000000" #ffffff height="1"></TD>
</TR>
</TBODY>
</TABLE>
<TABLE align=center bgColor=#EEEEEE border=0 cellPadding=5
cellSpacing=1 style="WORD-BREAK: break-all" width="100%">
<TBODY>
<TR>
<TD height="50" valign="top" bgColor=#fffffe class="666666" style="LINE-HEIGHT: 16px"> <%=ubbcode(dvhtmlencode(rs("SoftIntro")))%></TD>
</TR>
</TBODY>
</TABLE>
<br>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgcolor="#efefef">::相关软件::</TD>
</TR>
<TR>
<TD bgcolor="#000000" #ffffff height="1"></TD>
</TR>
</TBODY>
</TABLE>
<TABLE align=center bgColor=#EEEEEE border=0 cellPadding=5
cellSpacing=1 style="WORD-BREAK: break-all" width="100%">
<TBODY>
<TR>
<TD bgColor=#fffffe class="666666" style="LINE-HEIGHT: 16px">
<%call ShowCorrelative(5,200)%></TD>
</TR>
</TBODY>
</TABLE>
<BR>
<TABLE align=center border=0 cellPadding=2 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD bgcolor="#efefef">::网友评论::</TD>
<TD bgcolor="#efefef" align="right">【<a href="Soft_Comment.asp?SoftID=<%=rs("SoftID")%>" target="_blank">发表评论</a>】</TD>
</TR>
<TR>
<TD bgcolor="#000000" #ffffff height="1" colspan="2"></TD>
</TR>
</TBODY>
</TABLE>
<TABLE align=center bgColor=#EEEEEE border=0 cellPadding=5
cellSpacing=1 style="WORD-BREAK: break-all" width="100%">
<TBODY>
<TR>
<TD bgColor=#fffffe class="666666" style="LINE-HEIGHT: 16px"><%call ShowComment(5)%></TD>
</TR>
</TBODY>
</TABLE>
</td>
</tr>
</table>
</td>
</tr>
</table>
<% call Bottom() %>
<% call PopAnnouceWindow(400,300) %>
</body>
</html>
<script>
mtDropDown.initialize();
</script>
<%
set rsSoft=nothing
set rsPic=nothing
call CloseConn()
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -