<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><!--#include file="../Include/Conno.asp" --><!--#include file="../Include/function.asp" --><!--#include file="../Include/ShowPage.asp" --><!--#include file="../sql/Neeao_SqlIn.Asp" -->
<%
muserid=Session("CurUserID")
musername=Session("CurUserName")
if Request.ServerVariables("REQUEST_METHOD") = "POST" then 
m_Title = deleteHtmlTag(Request.Form("title"))
m_Title=replace(m_Title,"日","ri")
m_Title=replace(m_Title,"监听","jianting")
m_Title=replace(m_Title,"操","*")
m_Title=replace(m_Title,"药","*")
m_Title=replace(m_Title,"枪","*")
m_Title=replace(m_Title,"党","*")
m_Title=replace(m_Title,"法轮功","***")
m_Title=replace(m_Title,"迷魂","***")
m_Title=replace(m_Title,"安眠","***")
m_Title=replace(m_Title,"江泽民","***")
m_Title=replace(m_Title,"胡锦涛","***")
m_Title=replace(m_Title,"三级片","***")
m_Title=replace(m_Title,"腚","*")
m_Title=replace(m_Title,"妓","*")
m_Title=replace(m_Title,"娼","*")
m_Title=replace(m_Title,"阴蒂","*")
m_Title=replace(m_Title,"奸","*")
m_Title=replace(m_Title,"尻","*")
m_Title=replace(m_Title,"贱","*")
m_Title=replace(m_Title,"婊","*")
m_Title=replace(m_Title,"靠","*")
m_Title=replace(m_Title,"叉","*")
m_Title=replace(m_Title,"龟头","*")
m_Title=replace(m_Title,"屄","*")
m_Title=replace(m_Title,"赑","*")
m_Title=replace(m_Title,"妣","*")
m_Title=replace(m_Title,"肏","*")
m_Title=replace(m_Title,"尻","*")
m_Title=replace(m_Title,"屌","*")
	m_txtclass = deleteHtmlTag(Request.Form("txtclass"))
	F_RealName = deleteHtmlTag(Request.Form("F_RealName"))
	F_Mobile = deleteHtmlTag(Request.Form("F_Mobile"))
	F_Email = deleteHtmlTag(Request.Form("F_Email"))
	F_qq = deleteHtmlTag(Request.Form("F_qq"))
	F_Address = deleteHtmlTag(Request.Form("F_Address"))
	if m_txtclass = "" then
	  call msgbox("对不起，请选择信息分类！",1)
	  response.end()
	end if
	if m_Title = "" then
	  call msgbox("对不起，信息标题不能为空",1)
	  response.end()
	end if
	m_Content =  deleteHtmlTag(Request.Form("content"))
m_Content=replace(m_Content,"日","*")
m_Content=replace(m_Content,"操","*")
m_Content=replace(m_Content,"枪","*")
m_Content=replace(m_Content,"党","*")
m_Content=replace(m_Content,"法轮功","***")
m_Content=replace(m_Content,"迷魂","***")
m_Content=replace(m_Content,"安眠","***")
m_Content=replace(m_Content,"江泽民","***")
m_Content=replace(m_Content,"胡锦涛","***")
m_Content=replace(m_Content,"三级片","***")
m_Content=replace(m_Content,"腚","*")
m_Content=replace(m_Content,"妓","*")
m_Content=replace(m_Content,"娼","*")
m_Content=replace(m_Content,"阴蒂","*")
m_Content=replace(m_Content,"奸","*")
m_Content=replace(m_Content,"尻","*")
m_Content=replace(m_Content,"贱","*")
m_Content=replace(m_Content,"婊","*")
m_Content=replace(m_Content,"靠","*")
m_Content=replace(m_Content,"叉","*")
m_Content=replace(m_Content,"龟头","*")
m_Content=replace(m_Content,"屄","*")
m_Content=replace(m_Content,"赑","*")
m_Content=replace(m_Content,"妣","*")
m_Content=replace(m_Content,"肏","*")
m_Content=replace(m_Content,"尻","*")
m_Content=replace(m_Content,"屌","*")
	 if m_Content = "" then
	  call msgbox("对不起，信息内容不能为空",1)
	  response.end()
	end if
	if F_RealName = "" then
	  call msgbox("对不起，您的联系姓名不能为空",1)
	  response.end()
	end if
	if F_Mobile = "" then
	  call msgbox("对不起，您的联系电话不能为空",1)
	  response.end()
	end if
	
	if deleteHtmlTag(Request.Form("zone"))<>"" then
	m_area = deleteHtmlTag(Request.Form("zone"))
	else
	m_area=17  '市区
	end if
	
	if deleteHtmlTag(Request.Form("gqyear"))<>"" then
  	m_update =cdate(deleteHtmlTag(Request.Form("gqyear"))&"-"&deleteHtmlTag(Request.Form("gqmonth"))&"-"&deleteHtmlTag(Request.Form("gqday")))
    else
	m_update=cdate(date()+10)
	end if
	musernames=request("F_username")
	if muserid="" then
	muserid=0
	end if
	gqonoff=request("gqonoff")
	if gqonoff="off" then
	gqonoff="off"
	else
	gqonoff="on"
	end if
	SQL="INSERT INTO info_ad(F_adclassID,F_title,F_Content,F_area,F_regtime,F_update,F_username,f_userid,gqonoff,F_RealName,F_Mobile,F_Email,F_qq,F_Address) VALUES("&m_txtclass&",'"&m_Title&"','"&m_Content&"','"&m_area&"','"&now&"','"&m_update&"','"&musernames&"',"&muserid&",'"&gqonoff&"','"&F_RealName&"','"&F_Mobile&"','"&F_Email&"','"&F_qq&"','"&F_Address&"')"
	Conn.Execute SQL
	if musername="匿名" or musername="" then
	  Response.Write("<script language=javascript>alert('信息发布成功，请确定查看！');window.location.replace('/info/Class_index.asp');</script>")
      Response.End()
	else
	  Response.Write("<script language=javascript>alert('信息发布成功。点确定进入信息管理页面！');window.location.replace('/Member/msmdy.asp');</script>")
	  Response.End()
	end if
end if
%><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>信息发布,襄樊二手市场,襄樊生活网</title>
<LINK href="../css/Menu.css" type=text/css rel=stylesheet>
<LINK href="../css/aClass.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2900.3059" name=GENERATOR>
<SCRIPT src="../js/029bxw.js" type=text/javascript></SCRIPT>
</head>
<body>
<!--页面开始-->
<!--页面顶部开始-->
<!--#include file="../include/infomenu.htm"-->
<!--页面顶部结束-->
<!--页面标题开始-->
<DIV id="aTitle"><img src="../images/Icon/001.gif"/> 您的位置：<A href="/">首页</A>&nbsp;&gt;&gt;&nbsp;<A href="/Info/Class_index.asp">分类信息</A>&nbsp;&gt;&gt;&nbsp;<A href="/Info/write_info.asp">发布信息</A></DIV>
<!--页面标题结束-->
<!--页面正文结束-->
<table width="960" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="726" valign="top">
<table width="724" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="240" valign="top">
<div class="aList">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14">信息分类</TD>
                <TD width=38% height=20 bgColor=#99CC33></TD>
                <TD width=21% bgColor=#99CC33>&nbsp;</TD>
              </TR></TBODY></TABLE>
</div>
<div class="aWriteInfo2">
  <TABLE width=167 border=0 align="center" cellPadding=0 cellSpacing=0>
    <TBODY>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=20">拼客信息</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=21">物品交换</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=18">二手市场</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=22">求购信息</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=7">房屋求租</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=9">车辆买卖</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=8">转让信息</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=6">房屋出租</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=4">求职招聘</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=5">学习培训</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=19">提供服务</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=3">襄樊寻缘</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=12">一起游玩</A> </TD>
        <TD width="50%" height=18><A href="/Info/adinfolist.asp?classid=23">汽车租赁</A> </TD>
      </tr>
      <TR align=middle> </TR>
    </TBODY>
  </TABLE>
</div>
</div>
<div class="aList">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="#">区域分类</A></TD>
                <TD width=38% height=20 bgColor=#99CC33></TD>
                <TD width=21% bgColor=#99CC33>&nbsp;</TD>
              </TR></TBODY></TABLE>
</div>
<div class="aWriteInfo2">
  <TABLE width=167 border=0 align="center" cellPadding=0 cellSpacing=0>
    <TBODY>
      
      <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=9" target="_blank">迎泽区</A> </TD>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=10" target="_blank">杏花岭区</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=11" target="_blank">小店区</A> </TD>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=12" target="_blank">万柏林区</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=13" target="_blank">晋源区</A> </TD>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=14" target="_blank">尖草坪区</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=15" target="_blank">古交市</A> </TD>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=16" target="_blank">阳曲县</A> </TD>
      </tr>
	  <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=7" target="_blank">类烦县</A> </TD>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=8" target="_blank">清徐县</A> </TD>
      </tr>
      <TR align=middle>
        <TD width="50%" height=18><A href="/so/InfoSearch.asp?area=17" target="_blank">全部</A> </TD>
      </TR>
    </TBODY>
  </TABLE>
</div>
</div>
<div class="aList2">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 
                  src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="#">热点信息</A></TD>
                <TD width=38% height=20 bgColor=#CC9900></TD>
                <TD width=21% bgColor=#CC9900><A href="adinfolist.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "Select top 16 F_id,F_title,F_adclassid From info_ad order by F_ID desc"
			Set rs = conn.Execute(m_SQL)
				   Do While Not rs.Eof
	classsql="select f_value from info_adclass where f_id="&rs("F_adclassid")
	  Set rsclass=Conn.Execute(classSql)
	  if not rsclass.eof then
	  F_values=rsclass("f_value")
	  end if
	  rsclass.close
	  set rsclass=nothing%>
<div class="aList1">【<a href="/Info/adinfolist.asp?classid=<%=rs("F_adclassid")%>" title="<%=F_values%>"><font color="#ff0000"><%=F_values%></font></a>】<a href="/Info/ShowInfo.asp?ID=<%=rs("F_id")%>" title="<%=F_values%>:<%=rs("F_title")%>"><%=gotTopic(rs("F_title"),18)%></a></div>
<%rs.movenext
	  loop
	  rs.close%>
</div>
	</td>
    <td width="484" valign="top"><div class="aCenter" style="width:468px;margin:5px 6px 5px 0px; padding:3px">
	  <div  class="aWriteInfo">&hearts; 如果您有多条信息，请在 <a href="#">注册</a> / <a href="#">登陆</a> 后发布，这样便于您<a href="#">管理自己的信息</a>。</div>
	  <div  class="aWriteInfo">&hearts; 如果您只有一条信息，可以登陆后发布，也可以 <a href="#Info02">直接发布</a> </div>
      <a name="Info02" id="Info02"></a>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
          <TR bgColor=#ff9900>
            <TD class=right12 colSpan=2 height=25><FONT color=#ffffff><STRONG>·发布分类信息</STRONG></FONT></TD>
          </TR>
        <FORM id=post name=post action=write_info.asp method=post>
          <TR>
            <TD height=30 align=right bgcolor="#FFE3B9" class=right12> 当前用户： </TD>
            <TD width="395">
              <%if musername="" then
			  musername="匿名"
			  end if
			  %>
              <%=musername%>
              <%if musername="匿名" or musername="" then%>
              [<a href="/Member/login.asp"><font color="#FF0000">会员请先登录</font></a>]
              <%end if%>
              <input name="F_username" type="hidden" id="F_username" value="<%=musername%>"></TD>
          </TR>
          <TR>
            <TD width="73" height=30 align=right bgcolor="#FFE3B9" class=right12>信息分类：</TD>
            <TD><select name="txtclass" id="txtclass">
                <option value="">选择类型</option>
                <% classsql="select * from info_adClass"
	  Set rsclass=Conn.Execute(classSql)
	  do while not rsclass.eof 	  %>
                <option value="<%=rsclass("f_id")%>"><%=rsclass("f_value")%></option>
                <%	  rsclass.movenext 
	  loop
	  rsclass.close
	  set rsclass=nothing
	  %></select>
        * </TD>
          </TR>
          <TR>
            <TD height=30 align=right bgcolor="#FFE3B9" class=right12>信息标题：</TD>
            <TD><INPUT name=title class=input id="title">
        * </TD>
          </TR>
          <TR>
            <TD height=30 align=right bgcolor="#FFE3B9" class=right12>所在区域：</TD>
            <TD><INPUT onclick=document.post.zone.disabled=true type=radio CHECKED value=off name=areaonoff>
        关闭 |
          <INPUT onclick=document.post.zone.disabled=false type=radio value=on name=areaonoff>
        开启
        <SELECT name=zone disabled id="zone">
          <%mSql="Select F_ID,F_Value From T_areaType where F_CityTypeID=15 order by f_grade"
			 Set rst = conn.Execute(mSql)
			 do while not rst.eof %>
          <option value="<%=rst("f_id")%>"><%=rst("f_value")%></option>
          <% rst.movenext
		  loop
		  rst.close
		  set rst=nothing%>        </SELECT>
        <FONT 
            style="FONT-SIZE: 12px" face=MingLiU 
            color=#ff0000>根据实际情况选择是否开启默认选项</FONT></TD>
          </TR>
          <TR>
            <TD height=30 align=right bgcolor="#FFE3B9" class=right12>过期时间：</TD>
            <TD><INPUT onclick=document.post.gqyear.disabled=true;document.post.gqmonth.disabled=true;document.post.gqday.disabled=true type=radio CHECKED value=off name=gqonoff>
        关闭 |
          <input onClick=document.post.gqyear.disabled=false;document.post.gqmonth.disabled=false;document.post.gqday.disabled=false type=radio value=on name=gqonoff>
        开启
        <SELECT name=gqyear disabled id="gqyear">
          <%for n=cint(year(now())) to cint(year(now())+10)%>
          <OPTION value="<%=n%>" <% if n=cint(year(now())) then %> selected<% end if %>><%=n%></OPTION>
          <%next%>
        </SELECT>
        年
        <SELECT name=gqmonth disabled id="gqmonth">
          <% for n=1 to 12 %>
          <OPTION value="<%=n%>" <% if n=cint(month(now()+10)) then%>selected<% end if %>><%=n%></OPTION>
          <% next %>
        </SELECT>
        月
        <SELECT name=gqday disabled id="gqday">
          <% for n=1 to 31 %>
          <OPTION value="<%=n%>" <% if n=cint(day(now()+10)) then%>selected<% end if %>><%=n%></OPTION>
          <% next %>
        </SELECT>
        日 </TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>信息内容：</TD>
            <TD><textarea name="content" cols="50" rows="6" id="content"></textarea></TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>联系姓名：</TD>
            <TD><input name="F_RealName" type="text" id="F_RealName">
        *</TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>联系电话：</TD>
            <TD><input name="F_Mobile" type="text" id="F_Mobile" value="-"></TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>联系信箱：</TD>
            <TD><input name="F_Email" type="text" id="F_Email" value="-"></TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>联系QQ：</TD>
            <TD><input name="F_qq" type="text" id="F_qq" value="-"></TD>
          </TR>
          <TR>
            <TD height="30" align=right bgcolor="#FFE3B9" class=right12>联系地址：</TD>
            <TD><input name="F_Address" type="text" id="F_Address" value="襄樊"></TD>
          </TR>
          <TR>
            <TD height=30 bgcolor="#FFE3B9">&nbsp;</TD>
            <TD><INPUT type=submit value=提交 name=Submit2>
              <input type="reset" name="Submit3" value="重置">
</TD>
          </TR>
        </FORM>
      </TABLE>
</div>

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

<div id="aCenterAd1" style="width:714px; height:90px;margin:0px 6px 5px 0px;"><img src="../Ad_Web/Images/9_38_2_747_32_20070528103616.jpg" width="100%" height="90"></div>
    </td>
    <td width="236" valign="top">
<div class="aRight" style="width:234px;margin:5px 0px 5px 0px; padding:0px"><a href="/CardManage/reginfo.asp"><img src="../Ad_Web/Images/ad04.gif" border="0"></a></div>
<div class="aRight3" style="line-height:20px">
      <table width="100%" border="0" cellpadding="6" cellspacing="1">
        <form name="form2" method="post" action="/Member/ChkLogin.asp"><tr>
          <td bgcolor="#FDFBF0"><div>用户名
            <input name="txtUserName" type="text" class="form" id="txtUserName" size="13">
&nbsp;
<input name="Submit" type="submit" class="form" style=" background-color: #ffffff; border: 1px solid #6994C3; HEIGHT: 19px; width:70px" value="会员登录">
<br>
密　码
<input name="txtPassword" type="text" class="form" id="txtPassword" size="13">
&nbsp;
<input name="Submit" type="button" class="form" style=" background-color: #ffffff; border: 1px solid #6994C3; HEIGHT: 19px; width:70px" value="用户注册" onClick="window.open('/Member/Register.asp','','')">
</div>
<div style="margin-top:5px; color:#2E8D00 "><a href="/about/help_4.asp">俱乐部会员注册帮助及功能介绍</a></div></td>
        </tr></form>
    </table>
</div>
<div class="aRight5" style="line-height:25px;padding:6px; margin:5px 0px 5px 0px">
<table width="100%" cellpadding="0" cellspacing="0">
  <form name="form3" method="post" action="/so/InfoSearch.asp" target="_blank">
  <TR>
    <TD width="60" rowspan="2"><A href="/so/InfoSearch.asp" target="_blank"><img src="../images/index/icon_so_.gif" alt="信息广场搜索" border="0"></a></TD>
    <TD width="102" align="left"><INPUT name="KeyWords" class="input" id="KeyWords" value="出租" size="15"></TD>
    <TD align="left"><input name="imageField" type="image" src="../images/index/search.gif" alt="搜索" width="50" height="19" border="0"></TD>
  </TR>
  <TR>
    <TD height="25" colspan="3">热门：<A href="/so/InfoSearch.asp?KeyWords=&#20986;&#31199;" target="_blank">出租</A> <A href="/so/InfoSearch.asp?KeyWords=出售" target="_blank">出售</A> <A href="/so/InfoSearch.asp?KeyWords=转让" target="_blank">转让</A> <A href="/so/InfoSearch.asp?KeyWords=求购" target="_blank">求购</A> </TD>
    </TR>
</form></table>
</div>
<div class="aRight4">
<%m_SQL = "SELECT TOP 10 companyid,name FROM CityCard_League where iscard<>'0,0' and ischecked=1 ORDER BY companyid DESC"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=/Card/Show.asp?id="&rst("companyid")&" title="&rst("name")&">"&gotTopic(rst("name"),30)&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>
</div>
<div class="aRight2" style="width:234px;margin:5px 0px 5px 0px; padding:0px"><img src="../Ad_Web/Images/ad05.jpg"></div>
<div class="aRight6">
<div style="margin:5px"><TABLE cellSpacing=0 cellPadding=0 width=100% align=center 
            border=0>
              <TBODY>
              <TR>
                <TD align=middle width=11%><IMG height=18 src="../images/card/013.gif" width=18></TD>
                <TD width=30% align=middle class="aTexe14"><A href="/News/index.asp">新闻资讯</A></TD>
                <TD width=38% height=20 bgColor=#99CC33></TD>
                <TD width=21% bgColor=#99CC33><A href="/News/index.asp"><span class="aTexeMore" >更多&gt;&gt;</span></A></TD>
              </TR></TBODY></TABLE>
</div>
<%m_SQL = "SELECT TOP 8 title,id FROM tb_news where lm='8' ORDER BY id DESC"
Set rst = conn.Execute(m_SQL)
Do While Not rst.Eof
response.write "<div class=aList1>·<a href=/News/Show.asp?ArticleID="&rst("id")&" title="&rst("title")&">"&gotTopic(rst("title"),30)&"</a></div>"
rst.MoveNext
Loop
rst.Close%></div>
	</td>
  </tr>
</table>

<TABLE width=100% border=0 cellPadding=0 cellSpacing=0 bgcolor="#0175be">
    <TR>
      <TD height="26" class="aTexe142">&nbsp;&nbsp;精彩图片 <a href="/pic"><IMG src="../images/card/014.gif" alt="精彩图片" height=13 border="0" align=absMiddle></a></TD>
      <TD width=60><A class=aTexeMore href="/pic" >更多&gt;&gt;</A></TD>
    </TR>
</TABLE>
<div id="aPic" style=" height:150px">
<ul id="aPicUl"><%m_SQL = "SELECT TOP 6 id,title,titlepic FROM tb_news where lm='13' order by id desc"
			Set rs = conn.Execute(m_SQL)
			Do While Not rs.Eof
			ptitle=rs("title")%>
	 <li>
	 <div class="aPic01"><a href="/Pic/Show.asp?ArticleID=<%=rs("id")%>" target=_blank><img src="<%=rs("titlepic")%>" alt="<%=ptitle%>" width="130" height="98" border="0" /></a> </div>
	 <div class="aPic01"><a href="/Pic/Show.asp?ArticleID=<%=rs("id")%>" title=<%=ptitle%> target=_blank><%=gotTopic(ptitle,18)%></a></div>
	 </li><%rs.movenext
	 loop
	 rs.close%>
</ul>
</div>
<!--页面正文结束-->
<!--版权开始-->
<!--#include file="../include/CopyRight.htm"-->
<!--版权结束-->
<!--页面结束-->
</body>
</html>