⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pinglunll.asp

📁 商业网站开发有源代码可以运行
💻 ASP
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title><%=webname%>--用户评论</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/css.css" rel="stylesheet" type="text/css">
<style>
td{font-size:9pt;line-height:120%;color:#353535;} 
body{font-size:9pt;line-height:120%} 

a:link          { color: #000000; text-decoration: none }
a:visited       { color: #000000; text-decoration: none }
a:active        { color: #000000; text-decoration: none }
a:hover         { color: #336699; text-decoration: none; position: relative; right: 0px; top: 1px }
</style>
</head>
<body leftmargin="3" topmargin="4" marginwidth="00">
<%dim bookid,action
pinglunid=request.QueryString("id")%>
<table width="98%" border="0" cellspacing="1" cellpadding="1" align="center" bgcolor="#FFCC00">
  <tr> 
    <td bordercolor="#FFF1C8" bgcolor="#FFF1C8"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td rowspan="2"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
              <tr> 
                <td class="12v" > 
                  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%" bgcolor="#FFF1C8">
                    <tr> 
                      <td> 
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select * from shop_pinglun where pinglunid="&pinglunid,conn,1,1
%>
                        <table width="100%" border="0" cellspacing="1" cellpadding="2">
<%set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_books where bookid="&rs("bookid"),conn,1,1
%>
                          <tr> 
                            <td>评论:[<%=rs1("bookname")%>]</td>
                          </tr>
<%rs1.close
set rs1=nothing%>
                          <tr> 
                              <td> 
                                
                              <table width="100%" border="0" cellpadding="2" cellspacing="1">
                                <tr> 
                                  <td width="25%"> 
                                    <div align="right">姓名:</div>
                                  </td>
                                  <td width="75%"> <%=rs("pinglunname")%> </td>
                                </tr>
                                <tr> 
                                  <td width="25%"> 
                                    <div align="right">评级:</div>
                                  </td>
                                  <td width="75%"> <img src="images/pingji/<%=rs("pingji")%>.gif"> 
                                  </td>
                                </tr>
                                <tr> 
                                  <td width="25%"> 
                                    <div align="right">评论标题:</div>
                                  </td>
                                  <td width="75%"> <%=rs("pingluntitle")%> </td>
                                </tr>
                                <tr> 
                                  <td valign="top" width="25%"> 
                                    <div align="right">评论正文:</div>
                                  </td>
                                  <td width="75%" style="table-layout:fixed;word-break:break-all"> 
                                    <%=rs("pingluncontent")%> </td>
                                </tr>
                                <%if rs("huifu")<>"" then %>
                                <tr> 
                                  <td valign="top" width="25%"> 
                                    <div align="right"><font color="#FF0000">管理回复:</font></div>
                                  </td>
                                  <td width="75%" style="table-layout:fixed;word-break:break-all"> 
                                    <%=rs("huifu")%> </td>
                                </tr>
                                <%end if%>
                                <tr> 
                                  <td colspan="2"> 
                                    <div align="center"> 
                                      <input name="imageField" type="image" src="images/gb.gif" width="54" height="18" border="0" onFocus="this.blur()" onClick="javascript:window.close();">
                                    </div>
                                  </td>
                                </tr>
                              </table>
<%rs.close
set rs=nothing%>
                              </td>
                          </tr>
                        </table>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>
<%function HTMLEncode2(fString)
	fString = Replace(fString, CHR(13), "")
	fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
	fString = Replace(fString, CHR(10), "<BR>")
	HTMLEncode2 = fString
end function%>
<script LANGUAGE="javascript">
<!--
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}
function check()
{
  if(checkspace(document.pinglunform.pinglunname.value)) {
	document.pinglunform.pinglunname.focus();
    alert("请填写您的姓名!");
	return false;
  }
  if(checkspace(document.pinglunform.pingluntitle.value)) {
	document.pinglunform.pingluntitle.focus();
    alert("请填写评论标题!");
	return false;
  }
  if(checkspace(document.pinglunform.pingluncontent.value)) {
	document.pinglunform.pingluncontent.focus();
    alert("请填写评论正文!");
	return false;
  }
	  }
//-->
</script>

⌨️ 快捷键说明

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