如何让留言内容和管理员回复不顶格(前面空两格)
程序代码:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.> <html xmlns="http://www.> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <!--#include file="conn.asp" --> <!--#include file="admin/function/displaytm.asp" --> <% set rs= Server.CreateObject("adodb.recordset") sql="select * from basic" rs.open sql,conn,1,1 %> <title><%= rs("stname") %></title> <link href="css.css" rel="stylesheet" type="text/css" /> <script language="JavaScript" type="text/javascript" src="SelectDate.js"></script> <script language="JavaScript" type="text/javascript"> function js(){ if(document.form1.nc.value==""){ alert("请输入您的姓名!") document.form1.nc.focus() return false } if(document.form1.lz.value==""){ alert("请输入您的联系方式!") document.form1.lz.focus() return false } if(document.form1.dz.value==""){ alert("请输入您的联系地址!") document.form1.dz.focus() return false } if(document.form1.lb.value==""){ alert("请选择留言类型!") document.form1.lb.focus() return false } if(document.form1.msg.value==""){ alert("请输入留言内容!") document.form1.msg.focus() return false } } </script> <style type="text/css"> <!-- .STYLE1 {color: #FF0000} .style2 {color: #0000FF} .style3 {color: #000066} .style4 {color: #FF0099} --> </style> </head> <body> <!--#include file="top.asp" --> <table width="1000" border="0" align="center" cellpadding="0" cellspacing="0" id="bj"> <tr> <td width="190" height="600" valign="top" ><table width="100%" border="0" cellpadding="0" cellspacing="0" id="bj"> <tr> <td height="5"> </td> </tr> </table> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.,0,29,0" width="200" height="300"> <param name="movie" value="dh_2.swf" /> <param name="quality" value="high" /> <embed src="dh_2.swf" quality="high" pluginspage="http://www. type="application/x-shockwave-flash" width="200" height="300"></embed> </object> <td height="800" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td height="25"> </td> </tr> </table> <table width="100%" border="0" cellpadding="0" cellspacing="0" id="lbj"> <tr> <td height="28" align="left" class="imp"><img src="imgs/news_tt.gif" width="21" height="21" align="absmiddle" />在线留言</td> </tr> </table> <table width="800" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="25" bgcolor="#CCCCCC" class="imp">客户留言</td> </tr> </table> <form id="form1" name="form1" method="post" action="message_js.asp"> <table width="800" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC"> <tr> <td width="120" height="30" align="center">姓名:</td> <td height="30" align="left"><input name="nc" type="text" id="nc" style=" background:#FFFFFF; color:#333333; height:auto; border:solid 1px #88b5d1" /> <span class="STYLE1">*</span></td> </tr> <tr> <td width="120" height="30" align="center">联系方式:</td> <td height="30" align="left"><input name="lz" type="text" id="lz" style=" background:#FFFFFF; color:#333333; height:auto; border:solid 1px #88b5d1" /><span class="STYLE1">*</span></td></td> </tr> <tr> <td width="120" height="30" align="center">联系地址:</td> <td height="30" align="left"><input name="dz" type="text" id="dz" style=" background:#FFFFFF; color:#333333; height:auto; border:solid 1px #88b5d1" /><span class="STYLE1">*</span></td></td> </tr> <tr> <td width="120" height="30" align="center">留言类别:</td> <td height="30" align="left"><select name="lb" id="lb"> <option value="" selected="selected">==请选择留言类别==</option> <% set rs= Server.CreateObject("adodb.recordset") sql="select * from msg_type order by id desc" rs.open sql,conn,1,1 while not rs.eof %> <option value="<%= rs("id") %>"><%= rs("typ") %></option> <% rs.movenext wend %> </select> <span class="STYLE1">* </span></td> </tr> <tr> <td width="120" height="30" align="center">验证码:</td> <td height="30" align="left"><input name="yzm" type="text" id="yzm" /> <% Randomize a=int((9 - 1 + 1) * Rnd + 1) b= int((9- 1+ 1) * Rnd + 1) c= int((9 - 1 + 1) * Rnd + 1) session("c")=a*b+c %> (<font color="red"><%= a %>乘<%= b %>加<%=c%></font>=?)把运算结果填到左边 </td> </tr> <tr> <td width="120" height="30" align="center">留言:</td> <td height="30" align="left"><textarea name="msg" cols="70" rows="10" id="msg"></textarea></td> </tr> <tr> <td width="120" height="30" align="center"> </td> <td height="30" align="left"><input type="submit" name="Submit" value="提交" onclick="return js()"/> <input type="reset" name="Submit2" value="重置" /></td> </tr> </table> </form><table width="800" border="0" align="center" cellpadding="0" cellspacing="0"> <% set rs= Server.CreateObject("adodb.recordset") sql="select msg.* ,msg_type.typ from msg,msg_type where msg.lb=msg_type.id and msg.yz=yes order by msg.id desc" rs.open sql,conn,1,1 page=Trim(Request.QueryString("page")) if not ISnumeric(request("page")) or ISempty(request("page")) then page=1 page=cint(page) if not rs.eof then rs.pagesize=10 alpgs=rs.pagecount if page>alpgs then page=alpgs if page<>0 then rs.absolutepage=page else Response.Write("没有符合条件记录!") end if else Response.Write("<tr><td>数据库中暂无纪录!</td></tr>") end if for pages=0 to rs.pagesize-1 if rs.bof or rs.eof then exit for if pages<>0 then if pages mod 1=0 then Response.Write("</tr><tr>") end if end if %> <tr> <td height="200" valign="top"><table width="800" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="30" align="left" bgcolor="#ECECEC"><img src="/imgs/123.gif" alt="" height="24" width="24" border="0" /><span class="style2">姓名:<%= rs("nc") %></span> 类别:<%= rs("typ") %> 发表于:<%= displaytime(rs("mydate")) %></td> </tr> <tr> <td height="60" align="left" bgcolor="#FFFFFF"><img src="/imgs/20085171520323.png" alt="" height="19" width="19" border="0" /><span class="style3"><%= rs("msg") %></span> </td> </tr> <tr> <td height="30" align="left" bgcolor="#ECECEC"> </td> </tr> <tr> <td height="30" align="left" bgcolor="#CCCCCC"><img src="/imgs/234.gif" alt="" height="24" width="24" border="0" /><span class="STYLE1">管理员回复:<%= rs("nc") %></span></td> </tr> <tr> <td height="60" align="left" bgcolor="#ECECEC"><img src="/imgs/20085171520865.png" alt="" height="19" width="19" border="0" /><span class="style4"><%= rs("hf") %></span> </td> </tr> </table></td> </tr> <% rs.movenext next %> </table> <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td height="30" align="center">每页<font color="#FFFFFF" face="impact"><%= rs.pagesize %></font>/共<font color="#FFFFFF" face="impact"><%= rs.recordcount %></font>条记录 <% If page<>1 Then %> <a href="?page=1&lb=<%= mylb %>">首页</a> <% End If %> <% If page>1 Then %> <a href="?lb=<%= mylb %>&page=<%= page-1 %>">上一页</a> <% Else %> 上一页 <% End If %> <% for pages=1 to alpgs %> <a href="?lb=<%= mylb %>& page=<%= pages %>"><%= pages %></a> <% next %> <% If page<alpgs Then %> <a href="?lb=<%= mylb %>&page=<%= page+1 %>">下一页</a> <% Else %> 下一页 <% End If %> <% If page<>alpgs Then %> <a href="?page=<%= alpgs %>&lb=<%= mylb %>">尾页</a> <% End If %> 第:<font color="#FFFFFF" face="impact"><%= page %></font>/<font color="#FFFFFF" face="impact"><%= alpgs %></font>页</td> </tr> </table></td> </tr> </table> <!--#include file="footer.asp" --> </body> </html>