📄 read.asp

📁 MisCMS源码
💻 ASP
字号:
<!--#include file="config.Asp"-->
<% id=request.QueryString("id")
	title=request.QueryString("title")
	conn.execute("update wzxx set t_hits=t_hits+1 where t_id=" & id & "") %>
<html>
<head>
<title><%= title %>-<%= SysName %>-<%= SysUrl %></title>
<!--#include file="top.asp" -->
<script language="JavaScript">
function doZoom(size){
document.getElementById('font').style.fontSize=size+'px'
setTailPosition()
}
</script>
<script language=JavaScript>
<!--
  function color(vobject,c)
  { document.getElementById(vobject).style.color=c; }
-->
</script>
<script language="JavaScript">
<!--
 function presub()
 { 

if(form1.username.value=="")
    {
    alert("请您输入评论人!");
     form1.username.focus();
     return false;
     
    }

   if(form1.pl.value=="")
    {
    alert("请您输入评论语!");
     form1.pl.focus();
     return false;
     
    }
 }
//-->
</script>
<% set rs=server.CreateObject("adodb.recordset")
	rs.open"select * from wzxx where t_id=" & id & "",conn,1,1 %>
<div id="content">
<div id="tit"><%=rs(3)%></div>
<div id="titmune">
收集：<%=rs(9)%>　阅读：<font color="#FF0000"><%=rs(6)%></font>次　文字颜色：
<select name=color_frm size=1 onChange="if(this.options[this.selectedIndex].value!=''){color('font',this.options[this.selectedIndex].value);}">
<option value='#843307' style="color:#000000">默认</option>
<option value='#666666' style="color:#808080">灰度</option>
<option value='#808000' style="color:#808000">橄榄</option>
<option value='#008000' style="color:#008000">绿色</option>
<option value='#800000' style="color:#800000">褐色</option>
<option value='#CC3300' style="color:#CC3300">深红</option>
<option value='#336699' style="color:#336699">深蓝</option>
</select>
　文字大小：[<a href="#" onClick="javascript:doZoom(16)">大</a> <a href="#" onClick="javascript:doZoom(14)">中</a> <a href="#" onClick="javascript:doZoom(12)">小</a>]
</div>
<div id="read"><font id="font"><%=rs(4)%></font>
<p align="right">作者：<%=rs(8)%></p>
<p align="right"><%=rs(5)%></p></div>
<div id="gog">
<script type="text/javascript"><!--
google_ad_client = "pub-7234555567241040";
google_ad_width = 728;
google_ad_height = 90;
google_ad_format = "728x90_as";
google_ad_type = "text";
google_ad_channel = "";
//--></script>
<script type="text/javascript"
  src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</div>
<div id="pl">
<% set rst=server.CreateObject("adodb.recordset")
		rst.open"select * from plxx where wzid=" & id & " order by plid desc",conn,1,1
		if not rst.eof then
		while not rst.eof %>
	<table width="80%"  border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#2F94CE">
      <tr bgcolor="#FFFFFF">
        <td width="10%" align="right">评论人：</td>
        <td width="43%"><%=rst(2)%></td>
        <td width="11%" align="center">评论时间:</td>
        <td width="36%"><%=rst(4)%></td>
      </tr>
      <tr bgcolor="#FFFFFF">
        <td align="right">评论语：</td>
        <td colspan="3"><%=rst(3)%></td>
      </tr>
    </table>
	<hr>
	<% rst.movenext
	wend
	else
	response.write("<p align='center'>该文章尚无评论！</p>")
	end if
	rst.close
	set rst=nothing %>
</div>
<table width="500" border="0" align="center" cellpadding="2" cellspacing="2" class="comment">
<form name="form1" method="post" action="mis_do.asp?act=pl&id=<%=rs(0)%>">
<tr><td align="right" width="80">评论人：</td>
<td><input name="username" type="text" id="username" size="30"><font color="#FF0000"> *</font></td></tr>
<tr><td align="right">评论语：</td>
<td><textarea name="pl" cols="60" rows="5" id="textarea" class="textarea"></textarea>
  <font color="#FF0000"> *</font></td>
</tr>
<tr><td><input name="title" type="hidden" id="title" value="<%= title %>"></td>
<td><input type="submit" name="Submit" value="提交" onClick="return presub();">
            &nbsp;&nbsp;&nbsp;&nbsp;
            <input type="reset" name="Submit2" value="重写"></td></tr>
    </form>
  </table>
</div>
<% rs.close
set rs=nothing %>
<!--#include file="bottom.asp"-->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -