<!--#include file="head.asp"-->
<div align="center"> 
  <%dim theitem,sql,rs,thepage,currentpage,pagename,totalpage,n,page
  if request("id")="" then
   response.write "<script>alert('错误参数！');history.back();</script>"
   response.end
   end if
Set rs = Server.CreateObject("ADODB.Recordset")
    sql="select * from news_data where adid="&request("id")&""
    rs.open sql,conn,1,3
	if rs.eof then
	response.write "<font color=#ff0000>对不起，没有找到符合条件的广告内容！</font>"
	rs.close:set rs=nothing
	conn.close:set conn=nothing
   	response.end
end if
adid=rs("adid")
%>
<table width="860"  border="0" cellspacing="0" cellpadding="0"><tr valign="top"><td width="580"><table width="100%"  border="0" cellpadding="0" cellspacing="1" bgcolor="C0C0C0"><tr><td bgcolor="#FFFFFF"><table width="97%"  border="0" align="center" cellpadding="0" cellspacing="0"><tr><td height="30" valign="bottom"><div align="center">
                <%if rs("cu")="yes" then%>
                <b><font style="font-size:13px" <%if rs("color")<>"" then%>color="<%=rs("color")%>"<%end if%>><%=rs("title")%></font></b>
                <%else%>
                <font style="font-size:13px" <%if rs("color")<>"" then%>color="<%=rs("color")%>"<%end if%>><%=rs("title")%></font>
                <%end if%>
              </div></td></tr><tr><td><hr size="1" color="#FF6600"></td></tr><tr><td><div align="center">区域：<font color="#FF0000"><%=rs("city_one")%>
                      <%if rs("city_two")<>"" then %>
                      /<%=rs("city_two")%>
                      <%end if%>
                      <%if rs("city_three")<>"" then %>
                      /<%=rs("city_three")%>
                      <%end if%>
                </font> &nbsp;类别：<%=rs("type")%>
                &nbsp;信息ID号：<%=rs("adid")%>&nbsp;&nbsp;人气指数：
<script language="javascript"> 
function   XmlPost2(webFileUrl)   
{  
 var   result   =   "";   
var   xmlHttp   =   new   ActiveXObject("MSXML2.XMLHTTP");   
xmlHttp.open("POST",   webFileUrl,   false);   
xmlHttp.send("");   
result   =   xmlHttp.responseText;   
document.write(result);   
}
</script><script language="javascript">XmlPost2('rq_message.asp?action=rq&type=news&id=<%=rs("adid")%>');</script></div>
				</td></tr><tr><td>&nbsp;</td></tr><tr><td><p style="line-height: 200%"><span style="font-size: 10.5pt"><%=rs("text")%></span></td></tr>
				<%if rs("pic")<>"" then%><tr><td>
				<table width="320" height="220" border="0" cellpadding="0" cellspacing="1" bgcolor="e8e8e8" style="float:left;"><tr><td align="center" bgcolor="#FFFFFF">
                <a href="adpic/<%=rs("pic")%>" target="_blank"><img src="adpic/<%=rs("pic")%>" border="0" width="310" height="210" style="float:center;"></a>
                </td></tr></table></td></tr><%end if%></table>
<table width="97%" border="0" align="center" cellpadding="0" cellspacing="0"><tr><td>
<script language="JavaScript">
<!--//
function checkmessage()
{   
    if (document.form.messagetext.value.length<1)
	{
        alert("请填写留言内容！");
        document.form.messagetext.focus();
        return false;
    }
	    if (document.form.messagetext.value.length>100)
	{
        alert("请把留言字数控制在100以内！");
        document.form.messagetext.focus();
        return false;
    }
}
//-->
</script>
<form name="form" method="post" action="post.asp?type=news&id=<%=request("id")%>" onSubmit="return checkmessage()"><table  border="0" cellpadding="2" cellspacing="1" style="word-break:break-all" width="100%"><tr bgcolor="#FFFFFF">
  <td valign="top" bgcolor="#FFFFFF"><p style="line-height: 180%"><span style="font-size: 10.5pt">留言人:
        <input name="messagename" type="text" id="messagename4" size="9" maxlength="20">
        联系方式:
        <input name="messagelxfs" type="text" id="messagelxfs4" size="10" maxlength="50">
        <br>
        留言内容:<font color=#fa4600>[请遵纪守法并注意语言文明]</font></span><br>
        <textarea name="messagetext" cols="60" rows="6"></textarea>
        </span>
    </p>
  <table width="100%"  border="0" cellspacing="0" cellpadding="0"><tr><td align="right"><div align="left"><input type="submit" name="Submit" value="提交留言"></div></td></tr></table></td></tr><tr>
	<td valign="top" ><script language="javascript">XmlPost2('rq_message.asp?action=message&type=news&id=<%=adid%>');</script></td></tr></table></form></td></tr></table></td></tr>
</table></td>
<td width="10">&nbsp;</td>
<td width="270"><table width="100%"  border="0" cellpadding="0" cellspacing="1" bgcolor="C0C0C0">
  <tr>
    <td bgcolor="#FFFFFF"><table  border="0" cellpadding="0" cellspacing="0" align="center" id="table17">
      <tr>
        <td height="8"></td>
      </tr>
    </table>    <table width="92%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="25" height="200" bgcolor="DAF0FF"><div align="center"><strong>图<br>片<br>新<br>闻</strong></div>              　 
          </td>
          <td><%set rs1 = server.createobject("adodb.recordset")
sql="select top 4 adid,pic,color,title,cu from [news_data] where pic <>'' order by [top] desc,money desc,adid desc"             
rs1.open sql,conn,1,1  
if rs1.eof then
response.write "暂无图片新闻"
else
i=0
response.write "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr valign=""bottom"">"
do while not rs1.eof
if i mod 2=0 then response.write "<tr>"
response.write "<td align=""center""><a href=""html/news/"&rs1("adid")&".htm"" target=""_blank""><img src=""adpic/"&rs1("pic")&""" width=""100"" height=""90"" border=""0""></a><br>"
response.write "<a href=""html/news/"&rs1("adid")&".htm"" target=""_blank"">" 
if rs1("cu")="yes" then
response.write "<b><font style=""font-size:9pt"""
if rs1("color")<>"" then response.write " color="""&rs1("color")&""""
response.write ">"&left(rs1("title"),8)&"</font></b>" 
else
response.write "<font style=""font-size:9pt"""
if rs1("color")<>"" then response.write " color="""&rs1("color")&""""
response.write ">"&left(rs1("title"),8)&"</font>"
end if
response.write "</a></td>"
rs1.movenext
i=i+1
if i mod 2=0 then response.write "</tr>"
loop
if i mod 2<>0 then response.write "<td></td></tr>"
response.write "</table>"
end if
rs1.close:set rs1=nothing%></td>
        </tr>
        <tr>
          <td height="30" colspan="2" background="images/news_0024.gif">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span style="color: #990000"><strong>固顶新闻</strong></span></td>
        </tr>
        <tr>
          <td colspan="2"><%response.write "<table width=""100%""  border=""0"" cellspacing=""4"" cellpadding=""0"" ><tr>"
set rs1=server.createobject("adodb.recordset")               
sql="select top 10 * from news_data where top=1 and stop >= date() order by adid desc"
rs1.open sql,conn,1,1
if rs1.eof then
response.write "<tr><td>暂无固顶新闻</td></tr>"
else
do while not rs1.eof
response.write "<tr><td><a title="&rs1("title")&" href=html/news/"&rs1("adid")&".htm target=blank><font style='size:12px'"
if rs1("color")<>"" then response.write "color="&rs1("color")
response.write ">"&left(rs1("title"),20)&"</font></a></td></tr>"
rs1.movenext
loop
end if
rs1.close:set rs1=nothing
response.write "</table>"%></td>
        </tr>
        <tr>
          <td colspan="2"></td>
        </tr>
      </table>
        <table  border="0" cellpadding="0" cellspacing="0" align="center" id="table17">
          <tr>
            <td height="8"></td>
          </tr>
      </table></td>
  </tr>
</table></td>
</tr></table><table  border="0" cellpadding="0" cellspacing="0" align="center" id="table2"><tr><td height="5" width="175"></td></tr></table></div>
<!--#include file="foot.asp"-->
