<!--#include virtual="top.asp"-->

<% Response.Expires = -1   
Response.ExpiresAbsolute = Now() - 1   
Response.cachecontrol = "no-cache"   
 %>
<%
a_ID=Request("a_ID")
If a_ID="" or not isnumeric(a_ID) then
		Response.Write "<script>"
		Response.Write "alert('参数错误！');"
		Response.Write "history.go(-1)"
		Response.Write "</script>"
		Response.End
	End If%>
<script src="js/float.js" language="javascript"></script>
<div id="div_content">
  <div id="div_bigcon" class="clearfix">
    <div id="jkyp_div_left">
      <div id="div_menu">
        <dl>
          <%
Set rs=Server.CreateObject("ADODB.RecordSet") 
sql="Select * from jkyp where a_flid" 
rs.Open sql,conn,1,1 
if not Rs.eof then
do while not rs.eof
%>	  
                  <dd ><a href="product.asp?a_flid=<%=rs("a_flid")%>" ><%=rs("a_flname")%></a></dd>
               	<% 
rs.movenext 
loop 
rs.close 
end if
%>	
          
        </dl>
      </div>
   <!--#include virtual="left.asp"-->
    </div>
	<%a_id=request("a_id")
Set rs=Server.CreateObject("ADODB.RecordSet") 
sql="Select * from jkyp where a_id="&request.QueryString("a_id")
rs.Open sql,conn,1,1 
%>
    <div id="div_right">
      <div id="top_info_div">
        <div id="div_top_info">
          <dl>
            <dt><%=rs("a_flname")%></dt>
            <dd>轻松饮：健康饮食从我做起！</dd>
          </dl>
        </div>
        <div id="div_maps"> &nbsp;&nbsp;<a href="index.asp" id="sy" class="withelink">首页</a>&nbsp;&nbsp; &gt; <a href="product.asp">健康饮品</a> &gt; <span class="chen_f"><%=rs("a_flname")%></span></div>
      </div>
      <div id="div_right_info" class="clearfix">
        <div class="clearfix"><p style="text-align: center">
		<br/>
		<strong><%=rs("a_title")%></strong><br/>
	<img alt="<%=rs("a_title")%>" src="<%=rs("img")%>" style="width: 500px; height: 675px" /><br />
	<br />
		<strong><%=rs("a_content")%></strong></p>
</div><% rs.close %>
        <div style="padding:20px 0 0 9px; font-size:0;"> <img src="images/pj_top.jpg" /> </div>
        <div class="pjxt">
          <div id="pjxt_pj"> 评论：</div>
		  <% t=0
		  sql="select * from pinglun where a_id='"&a_id&"' order by rz_hftime desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1 
if not Rs.eof then
%>
		        <div class="float_left">
            <div class="div_ly_mtop"></div>
			        <div class="div_ly_mmiddle">
			<%do while not rs.eof
			t=t+1%>
              <dl>
			           <dt class="div_ly_mmiddledt">第<%Response.write(t)%>楼：<font>
				 <% =RS("rz_hfcontent") %> 
                           </font></dt>
              </dl>
	<% 
if t>=5 then exit do 
rs.movenext 
loop 
end if 
rs.close 
%>
            </div>
			
		            <div class="div_ly_mbottom"></div>
        <div class="div_ly_btop clearboth"></div>	
		        <div class="div_ly_bmiddle clearboth clearfix">
<%a_id=request("a_id")
if Request("action")="Save" then 
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from pinglun "
rs.open sql,conn,1,3
rs.AddNew
rs("rz_hfname")=Request.Form("mess_name")
rs("rz_tel")=Request.Form("mess_phone")
rs("email")=Request.Form("mess_email")
rs("adder")=Request.Form("mess_title")
rs("a_id")=request.QueryString("a_id")
rs("rz_hfcontent")=Request.Form("mess_content")
if rs("rz_hfcontent")="" then
        response.write "<SCRIPT language=JavaScript>alert('内容不能为空 或 输入字符非法！');"
        response.write "this.location.href='vbscript:history.back()';</SCRIPT>"
        response.end
end if
if rs("rz_hfname")="" then
        response.write "<SCRIPT language=JavaScript>alert('姓名不能为空 或 输入字符非法！');"
        response.write "this.location.href='vbscript:history.back()';</SCRIPT>"
        response.end
end if
rs.Update
rs.Close
response.write  " <script   Language=JavaScript> {window.history.go(-1);} </script> "
Set rs=nothing
end if
a_id=request("a_id")
Set rs=Server.CreateObject("ADODB.RecordSet") 
sql="Select * from jkyp where a_id="&request.QueryString("a_id")
rs.Open sql,conn,1,1 %>
          <form id="form1" name="form1" method="post" action="?action=Save&a_id=<%=rs("a_id")%>">
            <div>
              <dl>
                <dd class="lytxdd"> <span class="lytxddspan">姓名：</span>
                  <input id="mess_name" name="mess_name" type="text" class="lytxddtext" />
                  <span class="lytxddspanl">联系方式：</span>
                  <input id="mess_phone" name="mess_phone" type="text"  class="lytxddtext" />
                </dd>
                <dd class="lytxdd"> <span class="lytxddspan">邮箱：</span>
                  <input id="mess_email" name="mess_email" type="text"  class="lytxddtext" />
                  <span class="lytxddspanl">联系地址：</span>
                  <input id="mess_add" name="mess_add" type="text"  class="lytxddtext" />
                </dd>
                <dd class="lytxdd" style="height:105px;width:635px;clear:both;"> <span class="lytxddspan">内容：</span>
                  <input id="mess_content" name="mess_content" type="text" style="width:540px;height:105px" class="lytxddtext" />
                </dd>
                <dd id="lytj" class="clearboth"><input name="" type="image" src="images/tj.jpg" /></dd>
              </dl>
            </div>
          </form>
		  <% rs.close %>
        </div>
        <div class="div_ly_bbottom"></div>
      </div>
      <div style="padding-left:3px;font-size:0;"> <img src="images/pj_bottom.jpg" /> </div>
    </div>
  </div>
</div>
</div>
<!--#include virtual="fooder.asp"-->
</body></html>