<!--网站头文件-->
<!--#include file="webhead.asp"-->
<%dim id
pinlunid=lcase(trim(request("pinlunid")))
  if IsNumeric(request.QueryString("carid"))=False or request.QueryString("pinlunid")="" then
		response.write"<SCRIPT language=JavaScript>alert('参数错误！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end	
		end if
classid=lcase(trim(request("classid")))
  if IsNumeric(request.QueryString("classid"))=False or request.QueryString("classid")="" then
	response.write"<SCRIPT language=JavaScript>alert('参数错！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end	
		end if
		title=request.QueryString("titlename")
		title=replace(title,"'","")
					  	if classid=1 then
					  	set rs=server.createobject("adodb.recordset")
					  	rs.open "select id from build where  id="&pinlunid,conn,1,1
					  	end if
					  	 	if classid=2 then
					  	set rs=server.createobject("adodb.recordset")
					  	rs.open "select id from sell where  id="&pinlunid,conn,1,1
					  	end if
					  	 	if classid=3 then
					  	set rs=server.createobject("adodb.recordset")
					  	rs.open "select girlid from sell2 where  girlid="&pinlunid,conn,1,1
					  	end if
					  		if classid=4 then
					  	set rs=server.createobject("adodb.recordset")
					  	rs.open "select nclassid from rent where  nclassid="&pinlunid,conn,1,1
					  	end if
						if rs.bof and rs.eof then
						response.write"<SCRIPT language=JavaScript>alert('参数错误！');"
						response.write"javascript:history.go(-1)</SCRIPT>"
						response.end
						end if
		%>

		<title><%=webname%>-<%=title%>-全部留言</title>
<div align="center">
			<table width="784" border="0" cellspacing="0" cellpadding="0" class="lr" bordercolor="#000000" style="border-left-style: solid; border-left-width: 1px; border-right-style: solid; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px">
		<tr>
			<td>　</td>
		</tr>
	</table>
</div>
<div align="center">
			<table width="784" border="0" cellspacing="0" cellpadding="0" class="lr" bordercolor="#000000" style="border-left-style: solid; border-left-width: 1px; border-right-style: solid; border-right-width: 1px; border-top-width: 1px; border-bottom-width: 1px">
	

				<%
				 	set rs1=server.createobject("adodb.recordset")
					  	rs1.open "select * from pl where  class="&classid&" and shenghe=1  and pinlunid="&pinlunid&" order by pinglundate desc ",conn,1,1
				%><tr>
			<td>
			<table border="0" width="100%" id="table35" cellpadding="0" bordercolor="#BDDBE9" cellspacing="0">
	<tr>
		<td>
		<table border="0" width="100%" id="table39" cellspacing="1">
			<tr>
				<td>
				<table border="0" width="100%" id="table40" cellspacing="0" cellpadding="0" bgcolor="#F9F9F9">
					<tr>
						<td><%=title%>　</td>
					</tr>
				</table>
				</td>
			</tr>
		</table>
		</td>
	</tr>
	<tr>
		<td><div align="center">
			
			<br>
			<table style="FONT-SIZE: 9pt; border-collapse:collapse" cellSpacing="1" cellPadding="3" border="1" id="table36" width="95%" bordercolor="#E9E9E9">
				<tr>
					<td align="middle" bgColor="#F7F7F7" width="70">
					<input class="go-wenbenkuang" onclick="spanComment356431584.style.display=''; fmComment356431584.content.focus();" type="button" value="发表评论"></td>
					<td noWrap align="middle" bgColor="#F7F7F7">评论人</td>
					<td noWrap align="middle" bgColor="#F7F7F7">评论共<font color="red"><%=rs1.recordcount%></font>条
					 </td>
					<td align="middle" bgColor="#F7F7F7" width="81">发表时间</td>
				</tr>
				<tr id="spanComment356431584" style="DISPLAY: none" bgColor="white">
					<td colSpan="4">
					<form name="fmComment356431584" onsubmit="    if(content.value=='') { content.focus(); alert('评论内容不能为空！'); return false; }    if(content.value.length&gt;1000) { content.focus(); alert('评论内容字数超过1000！'); return false; }    if(nickName.value=='') { nickName.focus(); alert('笔名不能为空！'); return false; }	if(!nickName.value.match(/^[a-zA-Z0-9_\u4e00-\u9fa5]+$/)) { nickName.focus(); alert('笔名必须是字母、数字、下划线或者汉字！'); return false; }    return true;  " method="post" action="savepinlun.asp">
						联系方式： 
						<input  maxLength="100" name="contact" class="wenbenkuang">
						<br>
						（此信息有助于我们与您联系。 
						<input type="radio" CHECKED value="false" name="open">不对外公开 
						<input type="radio" value="true" name="open">对外公开）<br>
						笔 名 <font color="red">&nbsp;*</font>： <input  maxLength="20" name="nickName" class="wenbenkuang">
						<input type="hidden" name="linkaddress" value="<%=request.servervariables("http_referer")%>">
						<br>
						评论内容 <font color="red">*</font>： （最多1000字。当前字数：<span id="spanCommentContentLength356431584" style="COLOR: red">0</span>）<br>
						<textarea onkeyup="if(event.ctrlKey &amp;&amp; (10 == event.keyCode || 13 == event.keyCode) &amp;&amp; form.onsubmit()) form.submit(); else onchange();" onpropertychange="onchange()" name="content" rows="5" cols="60" onchange="document.getElementById('spanCommentContentLength356431584').innerHTML=value.length;" class="wenbenkuang" ></textarea>
						<br>
						　<table border="0" width="100%" id="table37" cellspacing="0" cellpadding="0">
							<tr>
								<td width="69%">
			
						&nbsp;<font color="red">注：所有评论通过审核后才会被公开。</font></a><br>
			1.尊重网上道德，遵守<a target="_blank" href="law.asp"><font color="red">《全国人大常委会关于维护互联网安全的决定》</font></a>和<a target="_blank" href="law2.asp"><font color="red">《互联网电子公告服务管理规定》</font></a>及中华人民共和国其他各项有关法律法规。<br>
				
				2.承担一切因您的行为而直接或间接导致的民事或刑事法律责任 <br>
				
				3.本站管理人员有权保留或删除其管辖留言中的任意内容 <br>
				
				4.本站有权在网站内转载或引用您的评论 <br>
				5.参与本评论即表明您已经阅读并接受上述条款<table border="0" width="100%" id="table38" cellspacing="0" cellpadding="0">
				<tr>
					<td>
					<p align="right">
			
						表情：</td>
				</tr>
			</table>
								</td>
								<td><script>function showimage(){document.images.tus.src=""+document.fmComment356431584.userface.options[document.fmComment356431584.userface.selectedIndex].value+"";}

facetol=36;
temp = Math.floor(Math.random() * facetol+1);


document.write("<img src=images/touxiang/1/"+temp+".gif name=tus> ")
document.write("<select name=userface size=1 onChange=showimage()>")

for(i=1;i<=facetol;i++) {
if (i==temp) ii="selected";else ii=""
document.write("<option value='images/touxiang/1/"+i+".gif' "+ii+">"+i+"</option>")
}
</script></select> 　</td>
							</tr>
						</table>

					<input type="hidden" value="<%=pinlunid%>" name="pinlunid">
						<input type="hidden" value="<%=classid%>" name="classid">
						<input type="hidden" value="<%=rs("titlename")%>" name="titlename">
						<input  type="submit" value="发表我的评论！" class="go-wenbenkuang"> 
						</p>
					</form>
					</td>
				</tr>
				<%
				
			 
					  do while not rs1.eof
				
%>
				
				<tr bgColor="white">
					<td noWrap align="left" width="70"><nobr><font color="red"><%=rs1("storey")%></font> 楼</nobr>
					<nobr>[<a class="comment" onclick="spanComment356431584.style.display=''; fmComment356431584.content.focus(); fmComment356431584.content.value='回复 <%=rs1("storey")%> 楼(<%=rs1("nickName")%>)：'; fmComment356431584.content.onchange(); return false;" href="#">回复</a>]</nobr>
　</td>
					<td style="WORD-BREAK: break-all; WORD-WRAP: break-word" align="middle" width="50">
					<font color="green"><%=rs1("nickName")%></font></td>
					<td style="WORD-BREAK: break-all; WORD-WRAP: break-word" width="285" valign="top">
	
					<table border="0" width="100%" id="table38" cellspacing="0" cellpadding="0">
						<tr>
							<td valign="top">
					<img src="<%=replace(rs1("userface"),"../","")%>" align="absBottom"><%=rs1("pingluncontent")%>　</td>
						</tr>
						<tr>
							<td><%if rs1("open") =1 then 
							response.write "<font color='green'>联系方式</font>:"&rs1("contact")
							 end if%>　</td>
						</tr>
					</table></td>
					<td width="81">
										<%
					if len(month(rs1("pinglundate")))=2 then
					response.write   month(rs1("pinglundate"))
					else
					response.write "0"&month(rs1("pinglundate"))
					end if
					%>-<%
							if len(day(rs1("pinglundate")))=2 then
					response.write   day(rs1("pinglundate"))
					else
					response.write "0"&day(rs1("pinglundate"))
					end if
					%>&nbsp;<%
					if len(hour(rs1("pinglundate")))=2 then
					response.write   hour(rs1("pinglundate"))
					else
					response.write "0"&hour(rs1("pinglundate"))
					end if
					%>:<%
					if len(minute(rs1("pinglundate")))=2 then
					response.write   minute(rs1("pinglundate"))
					else
					response.write "0"&minute(rs1("pinglundate"))
					end if
					%></td>
				</tr>
				
				<%
				rs1.movenext
			
				loop
				rs1.close
				set rs1=nothing
				%>
				<tr bgColor="white">
					<td style="LINE-HEIGHT: 14pt" colSpan="4">　</td>
				</tr>
			</table>
 		</div><br>
		</td>
	</tr>
</table></td>		<td width=3 bgcolor="#ffffff">　</td>
			<td width=1 bgcolor="#E9E9E9">　</td>
			<td width=3 bgcolor="#ffffff">　</td>
			<td width="175">　</td>
		</tr>
	</table>
</div> 
  <!--#include file=webfoot.asp-->