<%'guidedisplay=1%>

<!--#include file="admin_start.asp" -->

<%
id=request("id")

if not MySys.check.isInteger(id) then
   MySys.Error.info = "请提交合法的评论分类id！"
   MySys.Error.location = "back"
   MySys.Error.err()
End If

id=int(id)

rs.open"select * from jins_review_list where review_id="&id&" ",conn,1,1
if rs.eof then
   MySys.Error.info = "您请求的评论不存在！"
   MySys.Error.location = "back"
   MySys.Error.err()
End If

set rs_t=conn.execute("select sort_name from jins_review_sort where sort_id="&rs("sort_id")&" ")
if not rs_t.eof then
sort_name=rs_t("sort_name")
end if
set rs_t=nothing

select case sort_name
case "goods"
	sort_name="goods_name"
	sort_table="goods"
	sort_description="商品名称"
	sort_url="admin_goods_list.asp?s_n=3,goods_id,0&goods_id="

case "news"
	sort_name="news_title"
	sort_table="news"
	sort_description="新闻标题"
	sort_url="admin_info_news_list.asp?s_n=3,news_id,0&news_id="
case else
	sort_name=""
	sort_table=""
	sort_description=""
	sort_url=""


end select

session("FB_EM_1_SQL_uppath")="../REVIEWPIC/"&id

%>

<body topmargin="30" marginwidth="10" marginheight="10">
<form name=edit_html target=admin_edit_html method=post><input type=hidden name=c value=''><input type=hidden name=formname value=''><input type=hidden name=inputname value=''></form>
<form name=edit_template target=admin_edit_template method=post><input type=hidden name=c value=''><input type=hidden name=c_sql value=''><input type=hidden name=formname value=''><input type=hidden name=inputname value=''></form>
<form name=review_list action="admin_info_review_edit_handle.asp?action=edit&id=<%=id%>" method=post>
<table cellpadding="3" cellspacing="4" width="80%" height="30" align=center style='border:1px solid #ebebeb' >
	<tr>
		<td width="2%" align=right><img alt='点击弹开编辑框' onclick="opencat(basic_open)" style='CURSOR: hand' src="Images/index_search.gif" width="8" height="16"></td>
		<td  width="98%" align=left>
		<font color="#ebebeb"> | </font>
		<img alt='点击弹开提示信息框' onclick="opencat(help_ads_open)" style='CURSOR: hand' src="Images/icon_info.gif" width="13" height="13" hspace="0" align="absmiddle">			
		<font color="#ebebeb"> | </font>
		评论编辑
	    </td>
	</tr>		
	<tr id="help_ads_open" style="display: ">
		<td colspan="10" align=left>
		<table cellpadding="4" cellspacing="2" width="99%" height="30" align=center style='border:1px dashed #B7B7B7' >
			<tr>
				<td colspan="8" width='100%' style="line-height:150% ">
				·您可以更改评论的类型<br>
				·您可以对评论进行审核<br>
				·您可以对评论进行回复。<br>
			</td>
			</tr>
		</table>
		</td>
	</tr>
	
	<tr id="basic_open" >
		<td colspan="10" align=left style='padding-bottom:5px'>
		<table cellpadding="4" cellspacing="2" bgcolor='#f7f7f7' width="99%" height="30" align=center style='border:1px dashed #808080;padding:20px' >
			<tr>
				<td width="20%" align=right>评论类型：</td>
				<td  colspan="2"  width="80%" align=left>
				<select  >
				<%
				dim s
				set s=MySys.temp.search
				s.list_Sort "", "jins_review_sort",0,"根目录|"&rs("sort_id")
				response.write s.sort_list
				set s=nothing
				%>
				</select>
				·加入时间:
				<%=rs("review_addtime")%>
				·评论审核:
				<select name=review_verify >
				<option value=1 <%if rs("review_verify")=1 then response.write "selected"%> >审核</option>
				<option value=0 <%if rs("review_verify")=0 then response.write "selected"%> >等待</option>
				</select>
				</td>
			</tr>
		   <%
			if sort_name<>"" then
			%>
			<tr>
				<td width="20%" align=right><%=sort_description%>：</td>
				<td  colspan="2"  width="80%" align=left>
				<%
				set rs_t=conn.execute("select "&sort_name&" from jins_"&sort_table&"_list where "&sort_table&"_id="&rs("id")&" ")
				if not rs_t.eof then response.write rs_t(sort_name)
				set rs_t=nothing
				%>
				</td>
			</tr>
			<%
			end if
			%>
			<tr>
				<td width="20%" align=right>回复时间：</td>
				<td  colspan="2"  width="80%" align=left>
				<%=rs("review_reply_addtime")%>
				</td>
			</tr>
			<tr>
				<td width="20%" align=right>评分等级：</td>
				<td  colspan="2"  width="80%" align=left>
				<%=rs("review_score")%> 级
				</td>
			</tr>

		</table><br>

		<table cellpadding="4" cellspacing="2" bgcolor='#f7f7f7' width="99%" height="30" align=center style='border:1px dashed #808080;padding:20px' >
			<tr>
				<td width="20%" align=right>评论标题：</td>
				<td colspan="2" width="80%" align=left>
				<%=rs("review_title")%>
				</td>
			</tr>
			<tr>
				<td width="20%" align=right>评论作者：</td>
				<td  colspan="2"  width="80%" align=left>
				<%=rs("review_writer")%>
				</td>
			</tr>
		    <tr>
			  <td width="20%" align=right valign=top>评论内容：</td>
			  <td  width="80%" align=left >		
			  <table style='border:1px dashed #808080;' cellpadding="3" cellspacing="3" bgcolor='#ffffff' width="86%" align=left >
		       <tr><td> <%=rs("review_content")%></td></tr>
              </table>
                
			</td>
			</tr>

		</table><br>
		<table cellpadding="4" cellspacing="2" bgcolor='#f7f7f7' width="99%" height="30" align=center style='border:1px dashed #808080;padding:20px' >
		    <tr>
			  <td width="20%" align=right valign=top>回复：</td>
			  <td  width="80%" align=left>
                <textarea id="review_reply" name="review_reply" cols="55" rows="8"><%=rs("review_reply")%></textarea>
                <a title='点击进行详细编辑！' href="javascript:openedit_template('review_list','review_reply','','review_id','<%=rs("review_id")%>','评论回复编辑 > <%=rs("review_title")%>','yes');" >
				<img border=0 src="Images/old.gif" width="21" height="20" align="top"><br>
				</a>
			</td>
			</tr>

		</table><br>
		</td>
	</tr>

	<tr>
		<td height='1' colspan="9" background='images/dot03.gif'></td>
	</tr>
	
	<tr>
	  <td height='30' colspan="8" width='100%' align=center >
	  <input type=submit value="提交设置！" >
	   <input type=reset value="重置" > 
	   <input onclick='history.back(-1)' type=button value="返回" >	  </td>
	</tr>
</table>		
<SCRIPT language=javascript>
	function opencat(cat)
	{
 	 	if(cat.style.display=="none"){
     	cat.style.display="";
  		} else {
     	cat.style.display="none"; 
  		}
	}</SCRIPT>
</form>
<%
rs.close
%>
<!--#include file="admin_end.asp" -->