📄 softview.asp
字号:
</div></TD>
</TR>
<TR>
<TD align=middle width="70"
bgColor=#ff9933>节目语言：</TD>
<TD width="244" bgColor=#eeeeee><FONT
color=#ff6600><%=trim(rs("Language"))%></FONT>
<%
if not isnull(rs("SoftViewImg")) and rs("SoftViewImg")<>"" then %>
<FONT
color=#ff6600> <a href="SoftImg.asp?SoftID=<%=request.QueryString("SoftID")%>" target="_blank">
<font color="#000000"><img src="images/screen.gif" border="0" align="absmiddle" title="查看预览图"></font>
<% end if %>
</a></FONT></TD>
</TR>
<TR>
<TD align=middle width="70"
bgColor=#ff9933>节目类型：</TD>
<TD width="244" bgColor=#eeeeee><%=trim(rs("SoftType"))%>
/ <%=CateName%> / <%=SubCateName%></TD>
</TR>
<TR>
<TD align=middle width="70"
bgColor=#ff9933>运行环境：</TD>
<TD width="244" bgColor=#eeeeee><FONT
color=#000000><%=trim(rs("system"))%></FONT><img src="image/wmd.gif" width="18" height="17" tppabs="http://www.play99.net/tvradio/images/realone.gif"></TD>
</TR>
<TR>
<TD width="70" align=middle
bgColor=#ff9933>授权方式：</TD>
<TD colspan="2" bgColor=#eeeeee> <%=trim(rs("LicenceType"))%> (向站长报告新的连接)</TD>
</TR>
<TR>
<TD width="70" align=middle
bgColor=#ff9933>整理时间：</TD>
<TD bgColor=#eeeeee><%=rs("SoftTime")%></TD>
<TD bgColor=#eeeeee>相关网站：<a href="<%=rs("SoftFrom")%>" target="_blank"><%=rs("SoftFrom")%></a></TD>
</TR>
</TBODY>
</TABLE></TD>
<TR>
<TD width="98%" bgColor=#ffffff
height=1></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD width="100%">
<P align=left> <img src="images/Info.gif" width="52" height="18"><span class="style8"><font color="#000000">：</font></span><%=UBBCode(rs("Content"))%></P></TD>
</TR>
</TBODY>
</TABLE>
<TABLE height=86 cellSpacing=0 cellPadding=0 width=555
border=0>
<TBODY>
<TR>
<TD width=56 height=19> </TD>
<TD width=499 height=19><IMG
src="123.files/liebiao_bg1.gif" border=0></TD>
</TR>
<TR>
<TD width=56 height=16></TD>
<TD width=499 background=123.files/liebiao_bg2.gif
height=16>
<TABLE cellSpacing=0 cellPadding=6 width=532
align=center border=0>
<TBODY>
<TR>
<TD style="FONT-SIZE: 12px" width=440
height=113>
<P><BR>
</P><DIV align=center>
<CENTER>
<table width="523" border="0" align="right" cellpadding="3" cellspacing="1" bgcolor="#CCCCCC" class="tdbBig">
<tr bgcolor="#FFFFFF">
<td width="65" align="center" nowrap height="20">下载次数：</td>
<td width="443" height="20"><span class="style7"><img src="images/join.gif" width="19" height="15"></span>本日：<%=trim(rs("DayHits"))%> 本周：<%=trim(rs("WeekHits"))%> 本月：<%=trim(rs("MonthHits"))%> 总计：<%=trim(rs("AllHits"))%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="65" height="19" align="center" nowrap> </td>
<td height="19" width="443"> </td>
</tr>
<% rs.close %>
<tr bgcolor="#FFFFFF">
<td width="65" height="19" align="center" nowrap><b>下载地址：</b></td>
<td height="19" width="443"><%
sql="select * from "&CategoryName&"_SoftLink where SoftID=" & request.QueryString("SoftID")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "目前没有任何下载连接"
else
dim i
i=1
do while not rs.eof
%>
<%=i%>、<a href=# onClick=window.open("SoftDown.asp?ID=<%=rs("ID")%>","webname","fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=460,height=400") class="ArticleList"><%=trim(rs("LinkName"))%></a> 人气：<%=rs("Hits")%> <br>
<%
i=i+1
rs.movenext
loop
end if
rs.close
%></td>
</tr>
<%
sql="select SoftID,SoftName,SoftVer from "&CategoryName&"_SoftInfo where SoftName like '%"& left((keys),8) &"%' and SoftID<>" & request.QueryString("SoftID")
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
%>
<tr bgcolor="#FFFFFF">
<td width="65" align="center" nowrap><b>相关节目：</b></td>
<td width="443">
<% do while not rs.eof %>
<li><a href="SoftView.asp?SoftID=<%=rs("SoftID")%>" class="ArticleList"><%=rs("SoftName")&" "&rs("SoftVer")%></a></li>
<% rs.movenext
loop %>
</td>
</tr>
<% end if
rs.close
%>
<tr bgcolor="#FFFFFF">
<td align="center" width="65">观看说明：</td>
<td width="443"><b>* </b>欣赏本站所有电视电台请使用 <a href="javascript:if(confirm('http://www.johoo8.com/Mpsetup_GB.exe \n\nThis file was not retrieved by Teleport Pro, because it is addressed on a domain or path outside the boundaries set for its Starting Address. \n\nDo you want to open it from the server?'))window.location='http://www.johoo8.com/Mpsetup_GB.exe'" tppabs="http://www.johoo8.com/Mpsetup_GB.exe">windows mediaplayer</a> 和 <a href="javascript:if(confirm('http://www.johoo8.com/RealOne.exe \n\nThis file was not retrieved by Teleport Pro, because it is addressed on a domain or path outside the boundaries set for its Starting Address. \n\nDo you want to open it from the server?'))window.location='http://www.johoo8.com/RealOne.exe'" tppabs="http://www.johoo8.com/RealOne.exe">realone player</a> <br>
<b>* </b>如果您发现该电视不能正常连接，请<a class="ArticleList" href="mailto:ynwdtcj@126.com">通知管理员</a>，QQ:<strong>249755778</strong>谢谢！ <br>
<b>* </b>未经本站明确许可，任何网站不得非法盗链及抄袭本站资源；如引用页面，请注明来自梦想剧场，谢谢您的支持！<br>
<b>*</b> 本站部分资源来自网络，如有侵犯您的权益，请立即告知我们，我们将在24小时内删除相关信息。 </td>
</tr>
<tr bgcolor="#F2F2F2">
<td align="center" width="65">用户评价：</td>
<td width="443">
<% if EssayNum=0 then
response.write "目前没有用户参与评价"
else
response.write "共有<b><font color=red>"&EssayNum&"</font></b>人参与评价，得分：<font color=red>"&avgGrade&"</font>分"
response.write "『<a href=""ShowEssay.Asp?SoftID="&request.QueryString("SoftID")&""" target=""_blank"">查看评价</a>』"
end if
dim userip_temp
userip_temp=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
if userip_temp="" then
userip_temp=Request.ServerVariables("REMOTE_ADDR")
end if
Response.Write(" 来自<b>"&userip_temp&"</b>的朋友，你可以参与评论！")
%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="127" colspan="2" align="center" width="515"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="50%" valign="top">
<% sql="select top 5 * from "&CategoryName&"_SoftEssay where SoftID="&request.QueryString("SoftID")&" order by ID desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'>没有评论</p>"
else
do while not rs.eof
if len(Trim(rs("Content")))>65 then
response.write "<li>"&left(Trim(rs("Content")),64)&".. ["&rs("UserName")&" <font color=""red"">"&DateTimeFormat(rs("DateTime"),4)&"</font>]"
else
Response.Write "<li>"&Trim(rs("Content")) & " ["&rs("UserName")&" <font color=""red"">"&DateTimeFormat(rs("DateTime"),4)&"</font>]"
end if
rs.movenext
loop
end if
rs.close
Response.Write("</li>")
%>
</td>
<td width="50%" valign="top">
<table width="100%" border="0" cellpadding="1" cellspacing="1" bgcolor="#E7E7E7">
<form name="myform" method="post" action="" target="_top" onSubmit="return Juge(this)" >
<tr bgcolor="#FCFCFC">
<td>用 户：</td>
<td>
<font color="#808080">
<input type="text" name="UserName" maxlength="15" size="28" style="height: 16px;BORDER-BOTTOM: #888888 1px solid; BORDER-LEFT: #888888 1px solid; BORDER-RIGHT: #888888 1px solid; BORDER-TOP: #888888 1px solid; font-size: 9pt"></font> ！ </td>
</tr>
<tr bgcolor="#FCFCFC">
<td>Email：</td>
<td>
<font color="#808080">
<input type="text" name="Email" maxlength="50" size="28" style="height: 16px;BORDER-BOTTOM: #888888 1px solid; BORDER-LEFT: #888888 1px solid; BORDER-RIGHT: #888888 1px solid; BORDER-TOP: #888888 1px solid; font-size: 9pt"></font> ！
<font color="#808080">
<input type="Hidden" name="SoftID" value='<%=request("SoftID")%>'>
<input type="Hidden" name="action2" value='savereinfo'>
</font>
</td>
</tr>
<tr bgcolor="#FCFCFC">
<td>分 值：</td>
<td>
<font color="#808080">
<input type="radio" name="Grade" value="100"></font>
100分 <font color="#808080">
<input type="radio" name="Grade" value="85" checked></font>
85分 <font color="#808080">
<input type="radio" name="Grade" value="70">
70分
<input type="radio" name="Grade" value="55">
55分 <br>
<input type="radio" name="Grade" value="40">
40分
<input type="radio" name="Grade" value="25">
25分
<input type="radio" name="Grade" value="10">
10分
<input type="radio" name="Grade" value="0">
0分</font></td>
</tr>
<tr bgcolor="#FCFCFC">
<td>说 明：</td>
<td>
<textarea name="content" cols="38" rows="5" title="请注意用语文明且合法，不要发布带有攻击性的言论，谢谢合作！" style="BORDER-BOTTOM: #888888 1px solid; BORDER-LEFT: #888888 1px solid; BORDER-RIGHT: #888888 1px solid; BORDER-TOP: #888888 1px solid; font-size: 9pt"></textarea> ！ </td>
</tr>
<tr bgcolor="#FCFCFC">
<td> </td>
<td>
<font color="#808080">
<input type="submit" name="Submit" value="提交"></font>
<font color="#808080">
<input type="reset" name="Submit2" value="重设"></font>
(注：“！”为必填内容。) </td>
</tr>
</form>
</table></td>
</tr>
</table></td>
</tr>
</table>
</CENTER>
</DIV>
<DIV
align=center><BR>
</DIV></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD width=555 colSpan=2 height=16>
<TABLE height=35 cellSpacing=0 cellPadding=0
width=555 border=0>
<TBODY>
<TR>
<TD width="100%"
background=123.files/liebiao_bg3.gif>
<DIV align=center> </DIV></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<%end sub %>
</td>
</tr>
</table>
</div>
<!--#include file="foot.asp" -->
</BODY></HTML>
<%
set rs=nothing
CloseDatabase
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -