<%@ Control Language="vb" AutoEventWireup="false" Inherits="WanerSoft.Controls.BookCommentSend" TargetSchema="http://schemas.microsoft.com/intellisense/ie5"%>
<%@ Import Namespace="WanerSoft.Cache" %>
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="20">&nbsp;</td>
  </tr>
  <%IF Session.Item("UserName")<>Nothing Then%>
    <tr>
    <td height="26" align="left">&nbsp;&nbsp;&nbsp;* <%=Session.Item("UserName")%>，欢迎您对本书发表书评。积分在 <span class="style1"><%=Configs.ComChkMoney%> 以上的会员</span>才能发表评论。发表评论可获得积分 <%=Configs.ComMoney%> </td>
  </tr>  
  <%
ElseIf Configs.ComGuest=True Then
%>
    <tr>
    <td height="26" align="left">&nbsp;&nbsp;&nbsp;* 游客，欢迎您对本书发表书评。</td>
  </tr>
<%
End If
If Configs.ComGuest=True Or Session.Item("UserName")<>Nothing Then
IF Configs.ComChkMa=True Then
  %>
  <tr>
    <td height="26"><table width="95%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="21%" align="left">&nbsp;&nbsp;&nbsp;附加码：<asp:TextBox ID="commentma" runat="server" width="50" /></td>
        <td width="79%" align="left"><asp:Image ID="ComImg" runat="server" ImageUrl="/GetCode.aspx?color=ffffff&Sname=com"></asp:Image></td>
      </tr>
    </table></td>
  </tr>
  <%
 End IF
End IF
  %>
  <tr>
    <td align="left">&nbsp;
    <asp:TextBox ID="bookcomment" runat="server" rows="5" TextMode="MultiLine" Columns="70" /></td>
  </tr>
  <tr>
    <td height="24" align="left"> &nbsp;&nbsp;<input id="editid" type="hidden" runat="server"><input id="bookstitle" type="hidden" runat="server"><input type="button" value="发表评论" id="CommentSave" name="CommentSave" runat="server">&nbsp;注：严禁使用任何html、javascript脚本或其他非法性字符，书评请少于<%=Configs.ComChkNum%>字节。</td>
  </tr>
    <tr>
    <td height="24">&nbsp;</td>
  </tr>
</table>