<%
sub flea_main()
%>
<TABLE width="99%" border=0>
<TR><TD align=middle>
<TABLE width="99%" border=0>
<TBODY>
<TR>
<TD width="15%"></TD>
<TD width="33%"></TD>
<TD width="2%"></TD>
<TD width="15%"></TD>
<TD width="33%"></TD></TR>
<TR><TD><A href="flea_list.asp?c_id=32&s_id=72""><IMG src="images/flea/4.gif" border=0></A></TD>
<TD>
<TABLE width="100%" border=0>
<TBODY>
<TR>
<TD>【电脑设备】</TD></TR>
<TR><TD>电脑产品不断更新换代，加上外设的加入，需求也就增多了。</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=72"">→查看更多信息</A></TD></TR></TBODY></TABLE></TD>
<TD></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=78"><IMG src="images/flea/6.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【通讯工具】</TD></TR>
<TR><TD>随着手机、移动办公等通讯工具日益普及和升级，交换开始了…</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=78">→查看更多信息</A></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=10></TD></TR>
<TR><TD><A href="flea_list.asp?c_id=32&s_id=79""><IMG src="images/flea/2.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【人才信息】</TD></TR>
<TR><TD>人才是知识经济的关键，为你拓宽了就业和竞争的机会。</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=79">→查看更多信息</A></TD></TR></TBODY></TABLE></TD>
<TD></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=80"><IMG src="images/flea/7.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【家政服务】</TD></TR>
<TR><TD>你家里需要什么帮助或解决吗？还有你需要家政工作吗？</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=80">→查看更多信息</A></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=10></TD></TR>
<TR><TD><A href="flea_list.asp?c_id=32&s_id=388"><IMG src="images/flea/5.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【爱心求助】</TD></TR>
<TR><TD>希望和真诚的你成为朋友，网络的虚拟也会拉进彼此的距离。</TD></TR>
<TR>
<TD align=right><A href="flea_list.asp?c_id=32&s_id=388">→查看更多信息</A></TD></TR></TBODY></TABLE></TD>
<TD></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=389"><IMG src="images/flea/3.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【商家信息】</TD></TR>
<TR><TD>随时发布产品、服务的信息，消费者能及时得到最新动态。</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=389">→查看更多信息</A></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=10></TD></TR>
<TR><TD><A href="flea_list.asp?c_id=32&s_id=390"><IMG src="images/flea/1.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【房屋租赁】</TD></TR>
<TR><TD>发布最新的房源信息，包括了供应方和求租方。</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=390">→查看更多信息</A></TD></TR></TBODY></TABLE></TD>
<TD></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=391"><IMG src="images/flea/8.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【交通工具】</TD></TR>
<TR><TD>你有交通工具的求购和出售吗？如汽车、摩托车、自行车…</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=391">→查看更多信息</A></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=10></TD></TR>
<TR><TD><A href="flea_list.asp?c_id=32&s_id=392"><IMG src="images/flea/9.gif" border=0></A></TD>
<TD><TABLE width="100%" border=0>
<TBODY>
<TR><TD>【二手信息】</TD></TR>
<TR><TD>包括各种二手货品，大家都可以来这儿发布，进行交易。</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=392">→查看更多信息</A></TD></TR></TBODY></TABLE></TD>
<TD></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=393"><IMG src="images/flea/10.gif" border=0></A></TD>
<TD>
<TABLE width="100%" border=0>
<TBODY>
<TR><TD>【其它信息】</TD></TR>
<TR><TD>不管你还有任何其它方面的需求和帮助，请来这儿发布…</TD></TR>
<TR><TD align=right><A href="flea_list.asp?c_id=32&s_id=393">→查看更多信息</A></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=10></TD></TR>
<TR><TD align=middle>
<TABLE width="98%">
<TBODY>
<TR>
<TD align=middle>
<FIELDSET style="WIDTH: 100%" align=center><LEGEND>
<TABLE style="BORDER-RIGHT: #808080 1px solid; BORDER-TOP: #808080 1px solid; BORDER-LEFT: #808080 1px solid; BORDER-BOTTOM: #808080 1px solid" cellSpacing=0 cellPadding=0 width=200 border=0>
<TBODY>
<TR><TD vAlign=bottom align=middle height=18><FONT color=#ff0000><B>请您仔细阅读下面的郑重声明</B></FONT></TD></TR>
</TBODY></TABLE></LEGEND>
<TABLE cellSpacing=0 cellPadding=0 width="98%" align=right border=0>
<TBODY>
<TR><TD height=5></TD></TR>
<TR>
<TD class=htd>1、禁止发布含有色情和反动言论以及与国家法律法规相抵触的任何信息；禁止发布在网上对他人进行人身攻击评议的言论……等信息。
<BR>2、信息发布者提供的信息必须是真实可靠的，不得有欺骗行为否则后果自负；每条信息的发布不得超过二百五十个字节；敬请不要进行重复发布。
<BR>3、这里的信息发布是全免费的，<%response.write web_var(web_config,1)%>对其不负任何的法律责任（由发布者自负责任敬请郑重），<%response.write web_var(web_config,1)%>有选择和删除权。</TD></TR>
<TR><TD align=middle height=30>
<INPUT onclick="location.href='user_put.asp?action=business';" type=button value=同意以上声明，我要发布交换信息></TD></TR>
<TR><TD height=5></TD></TR>
</TBODY></TABLE></FIELDSET> 
</TD></TR></TBODY></TABLE>
</TD></TR></TBODY></TABLE>
<TABLE border=0>
<TBODY>
<%
end sub

sub flea_put()
  dim sql2,rs2,ispic,pic,now_id
  if trim(request.querystring("add"))="chk" then
    dim name,csid,remark
    name=code_form(request.form("name"))
    csid=trim(request.form("csid"))
    remark=request.form("remark")
    pic=trim(request.form("pic"))
    if isnumeric(csid) or len(csid)<1 then
      response.write "<font class=red_2>请选择交易类型！</font><br><br>"&go_back
    elseif len(remark)>250 then
      response.write "<font class=red_2>交易说明不能长于250个字符！</font><br><br>"&go_back
    else
      cid=mid(csid,1,instr(csid,"-")-1)
      sid=mid(csid,instr(csid,"-")+1,len(csid))
      set rs=server.createobject("adodb.recordset")
      sql="select * from business"
      rs.open sql,conn,1,3
      rs.addnew
      rs("c_id")=cid
      rs("s_id")=sid
      rs("username")=login_username
      rs("hidden")=true
      rs("name")=name
      rs("url")=code_form(request.form("url"))
      rs("price")=code_form(request.form("price"))
      rs("phone")=code_form(request.form("phone"))
      rs("nname")=code_form(request.form("nname"))
      rs("email")=code_form(request.form("email"))
      rs("remark")=remark
      if len(pic)<1 then
        rs("pic")="no_pic.gif"
      else
        rs("pic")=pic
      end if
      rs("tim")=now_time
      rs.update
      rs.close:set rs=nothing 
	  response.write "<script>alert(""已成功发布了一条交易信息！"");</script>"
      call flea_main()
      exit sub
    end if
  else
%>
<TR><TD background="images/main/dian3.gif"></TD></TR>
<table border=0 cellspacing=0 cellpadding=3>
<form action='?action=put&add=chk' method=post>
  <tr><td colspan=2 align=center height=30><b><font class=red>【发布信息】</font></b>&nbsp;请写清楚您的联系方式：联系人、联系电话、电子邮件等信息</td></tr>
  <tr><td width='12%'>交易名称：</td><td width='88%'><input type=text size=60 name=name maxlength=50><%=redx%></td></tr>
  <tr><td>交易类型：</td><td><select name=csid size=1><%
sql="select c_id,c_name from jk_class where nsort='"&n_sort&"' order by c_order,c_id"
set rs=conn.execute(sql)
do while not rs.eof
  nid=int(rs(0))
  response.write vbcrlf&"<option value='"&nid&"' class=bg_2>"&rs(1)&"</option>"
    sql2="select s_id,s_name from jk_sort where c_id="&nid&" order by s_order,s_id"
  set rs2=conn.execute(sql2)
  do while not rs2.eof
    now_id=int(rs2(0))
    response.write vbcrlf&"<option value='"&nid&"-"&now_id&"'"
    if cid=nid and sid=now_id then response.write " selected"
    response.write ">　"&rs2(1)&"</option>"
    rs2.movenext
  loop
  rs2.close:set rs2=nothing
  rs.movenext
loop
rs.close:set rs=nothing
%></select><%=redx%></td></tr>
  <tr><td>交易价格：</td><td><input type=text size=10 name=price maxlength=20>&nbsp;&nbsp;元<%=redx%></td></tr>
  <tr><td>联 系 人：</td><td><input type=text size=20 name=nname maxlength=20><%=redx%>&nbsp;注册用户：<font class=blue><%response.write login_username%></font></td></tr>
  <tr><td>联系电话：</td><td><input type=text size=30 name=phone maxlength=30></td></tr>
  <tr><td>电子邮件：</td><td><input type=text size=30 name=email maxlength=50></td></tr>
  <tr><td>联系地址：</td><td><input type=text size=30 name=url maxlength=100></td></tr>
<% ispic="w"&upload_time(now_time) %>
  <tr><td>图片地址：</td><td><input type=test name=pic size=30 maxlength=30 readonly></td></tr>
  <tr><td>上传图片：</td><td><iframe frameborder=0 name=upload_frame width='100%' height=30 scrolling=no src='upload.asp?uppath=website&upname=<%response.write ispic%>&uptext=pic'></iframe></td></tr>
  <tr><td valign=top class=htd><br>交易说明<br><=250B</td><td><font color="#333333"><textarea name=remark rows=6 cols=60></textarea></font></td></tr>
  <tr><td colspan=2 align=center height=25><input type=submit value='提交信息'>　&nbsp;<input type=reset value='重新填写'></td></tr>
</form></table><%
  end if
end sub

sub top_flea(utt,ijt,sh,n_num)
   dim temp1
  temp1=vbcrlf&"<table border=0 width='99%' cellspacing=2 cellpadding=0 align=center class=tf><tr height=0><td width='75%'></td><td width='25%'></td></tr>"
  sql="select top "&n_num&" name,id,c_id,s_id,"&utt&" from business order by "&utt&" desc,id"
  set rs=conn.execute(sql)
  do while not rs.eof
    temp1=temp1&vbcrlf&"<tr><td height="&space_mod&" class=bw>"&img_small(ijt)&format_flea_view(rs("name"),1,"")&"</td></tr>"
    rs.movenext
  loop
  rs.close
  temp1=temp1&"</table>"
  response.write "<table width='99%' align=center><tr><td align=center>"&format_bar("<font class=end><b>最新信息</b></font>",temp1,13,2,"",web_var(web_color,6)&"|","")&"</td></tr></table>"
end sub

sub flea_ck1()
  pageurl="?c_id="&cid&"&s_id="&sid&"&action="&action&"&"
  keyword=code_form(request.querystring("keyword"))
  sea_type=trim(request.querystring("sea_type"))
  call cid_sid_sql(2,sea_type)

sql="select * from business where hidden=1"&sqladd
select case action
case "counter"
  sql=sql&" order by counter desc,id desc"
case "tim"
  sql=sql&" order by tim desc"
case "id"
  sql=sql&" order by id"
case else
  sql=sql&" order by id desc"
end select

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
  rssum=rs.recordcount
end if
call format_pagecute()
%>
<table border=0 width='100%'>
<tr><td colspan=3 height=1 background='images/bg_dian.gif'></td></tr>
</td></tr>
<%
if int(viewpage)>1 then
  rs.move (viewpage-1)*nummer
end if
for i=1 to nummer
  if rs.eof then exit for
  nid=rs("id"):name=rs("name")
%>
<tr><td><%call web_site_type1()%></td></tr>
<tr><td height=1 background='images/bg_dian.gif'></td></tr>
<%
  rs.movenext
next
rs.close:set rs=nothing
%>
<tr><td bgcolor=#effbff height=30>
  <table border=0 width='100%' cellspacing=0 cellpadding=0>
  <tr align=center valign=bottom><td width='30%'>现在有<font class=red><%response.write rssum%></font>条信息┋每页<font class=red><%response.write nummer%></font>条</td>
  <td width='70%'>页次：<font class=red><%response.write viewpage%></font>/<font class=red><%response.write thepages%></font> 分页：<%response.write jk_pagecute(nummer,thepages,viewpage,pageurl,5,"#ff0000")%></td></tr>
  </table>
  <table border=0 width='100%' class=bg_2>
  <tr>
  <td width=2></td>
  <td class=red_2>说明：</td>
  <td width=5></td>
  <td><img border=0 src='images/small/IMAGE.GIF' align=absmiddle>&nbsp;有相关图片说明</td>
  <td align=right><%response.write img_small("jt13") %>&nbsp;联系方式以及部分功能要 <a href='login.asp?action=register'>注册</a> 并 <a href='login.asp'>登陆</a> 才可正常浏览和使用</td>
  <td width=2></td>
  </tr>
</table>
</table>
<%
end sub

sub web_site_type1()
%>
<table width='99%' cellspacing=0 cellpadding=0 border=1 bordercolor=#99CC33>
  <tr>
  <td class=td><b>&nbsp;<a href="flea_view.asp?c_id=<%response.write cid%>&s_id=<%response.write sid%>"><%response.write name%></a></b></td>
  <td class=td>&nbsp;发布时间：<%response.write time_type(rs("tim"),7)%></td>
  </tr>
  <tr><td colspan=2 align=center><table border=0 width='99%' class=bw><tr><td class=tf><font class=htd><%response.write code_html(rs("remark"),1,0)%></font></td></tr></table></td></tr>
  <tr><td colspan=2 class=bg_3 align=right>
  <table border=0 cellspacing=0 cellpadding=2>
  <tr>
    <td align=right>联系人：<%=rs("nname")%>&nbsp;电子邮件：<a href='mailto:<%=rs("email")%>?subject=我对你在<%response.write web_var(web_config,1)%>发布的<%response.write name%>信息感兴趣'><%=rs("email")%></a>&nbsp;电话：<%=rs("phone")%>&nbsp;</td>
    <td><font class=gray>[<a href="flea_view.asp?c_id=<%response.write cid%>&s_id=<%response.write sid%>">详细信息</a>]</font></td>
  </tr>
</table>
</table>
<%
end sub

sub flea_ck2()
  pageurl="?c_id="&cid&"&s_id="&sid&"&action="&action&"&"
  keyword=code_form(request.querystring("keyword"))
  sea_type=trim(request.querystring("sea_type"))
  call cid_sid_sql(2,sea_type)

sql="select * from business where hidden=1"&sqladd
select case action
case "counter"
  sql=sql&" order by counter desc,id desc"
case "tim"
  sql=sql&" order by tim desc"
case "id"
  sql=sql&" order by id"
case else
  sql=sql&" order by id desc"
end select

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
  rssum=rs.recordcount
end if
call format_pagecute()
%>
<table border=0 width='100%'>
<tr><td colspan=3 height=1 background='images/bg_dian.gif'></td></tr>
<tr><td align=center height=30>
  <table border=0 width='100%' cellspacing=0 cellpadding=0>
  <tr align=center valign=bottom><td width='30%'>现在有<font class=red><%response.write rssum%></font>条记录┋每页<font class=red><%response.write nummer%></font>个</td>
  <td width='70%'>页次：<font class=red><%response.write viewpage%></font>/<font class=red><%response.write thepages%></font> 分页：<%response.write jk_pagecute(nummer,thepages,viewpage,pageurl,5,"#ff0000")%></td></tr>
  </table>
</td></tr>
<tr><td height=1 background='images/bg_dian.gif'></td></tr>
<%
if int(viewpage)>1 then
  rs.move (viewpage-1)*nummer
end if
for i=1 to nummer
  if rs.eof then exit for
  nid=rs("id"):name=rs("name")
%>
<tr><td><%call web_site_type()%></td></tr>
<tr><td height=1 background='images/bg_dian.gif'></td></tr>
<%
  rs.movenext
next
rs.close:set rs=nothing
%>
</table>
<%
end sub

sub web_site_type()
%>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<TBODY>
<TR><TD align=middle bgColor=#effbff colSpan=2>
<TABLE class=tf width="100%" border=0>
<TBODY>
<TR><TD class=bw align=middle><FONT class=blue size=3><B><%response.write name%></B>
</FONT></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD background="images/main/dian3.gif" colSpan=2 height=1></TD></TR>
<TR align=middle><TD width="40%">
<TABLE width="100%" border=0>
<TBODY>
<TR><TD height=1></TD></TR>
<TR><TD align=middle><img src='<% response.write upload_file&rs("pic") %>' border=0 width=<%response.write pic_width%> height=<%response.write pic_height%>></TD></TR>
<TR><TD height=1></TD></TR>
<TR><TD align=middle height=2>发布于：<%response.write time_type(rs("tim"),7)%></TD></TR>
<TR><TD height=1></TD></TR>
</TBODY></TABLE></TD>
<TD class=bg_2 vAlign=top width="60%">
<TABLE width="96%" border=0>
<TBODY>
<TR><TD><%response.write code_html(rs("remark"),1,0)%></TD></TR></TBODY></TABLE></TD></TR>
<TR><TD height=5></TD></TR>
<TR vAlign=bottom bgColor=#effbff height=22>
<TD>&nbsp;<%response.write img_small("jt13") %>&nbsp;<FONT class=blue><B>联系信息</B></FONT></TD>
<TD><%response.write img_small("jt13") %>&nbsp;<FONT class=blue><B>发送站内短信</B></FONT></TD></TR>
<TR><TD background="images/main/dian3.gif" colSpan=2 height=1></TD></TR>
<TR><TD class=bg_2 align=right><TABLE class=tf width="99%" border=0>
<TBODY>
<TR><TD class=bw height=18>相关价格：<FONT class=red_3><%=rs("price")%></FONT></TD></TR>
<TR><TD class=bw height=18>联 系 人：<%=rs("nname")%>&nbsp;&nbsp;</TD></TR>
<TR><TD class=bw height=18>联系电话：<%=rs("phone")%></TD></TR>
<TR><TD class=bw height=18>电子邮件：<a href='mailto:<%=rs("email")%>?subject=我对你在<%response.write web_var(web_config,1)%>发布的<%response.write name%>信息感兴趣'><%=rs("email")%></a></TD></TR>
<TR><TD class=bw height=18>相关网址：<a href='<%=rs("url")%>' target=_blank><%=rs("url")%></TD></TR></TBODY></TABLE></TD>
<TD class=bg_2>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<FORM name=mail_frm onsubmit=""javascript:frm_submitonce(this);"" action=user_message.asp?action=write method=post target=_blank>
<INPUT type=hidden value=ok name=write_ok> 
<INPUT type=hidden name=send_later> 
<INPUT type=hidden value=<%=rs("nname")%> name=accept_u> 
<TBODY>
<TR><TD>短信主题：</TD>
<TD><INPUT maxLength=20 size=38 name=topic></TD></TR>
<TR><TD>短信内容：<BR><BR>250字内</TD>
<TD><TEXTAREA onkeydown=""javascript:frm_quicksubmit();"" title="短信内容最多250个字符" name=word rows=4 cols=38></TEXTAREA></TD></TR>
<TR><TD>发送短信：</TD>
<TD height=30><INPUT type=submit value=发送短信 name=wsubmit>&nbsp;&nbsp;<INPUT onclick=javascript:mail_send_later(); type=submit value=保存短信 name=send>&nbsp;&nbsp;<INPUT type=reset value=清除重写></TD></TR></FORM></TBODY></TABLE></TD></TR>
</TBODY></TABLE>
</TD></TR>
<%
end sub

sub business_left()
  dim temp1
  temp1=vbcrlf&"<table border=0 width='98%' cellspacing=0 cellpadding=4 align=center>" & _
	vbcrlf&"<tr><td height=5 width='98%'></td></tr>" & _
	vbcrlf&"<tr><td colspan=2 align=left><table border=0 width='98%'>" & _
	vbcrlf&"<tr><td>　　请您遵守中华人民共和国有关法律、法规；</td></tr>" & _
	vbcrlf&"<tr><td>　　尊重网上道德并遵守诚实信用原则；</td></tr>" & _
	vbcrlf&"<tr><td>　　请勿发表与本站栏目内容无关的话题和不法言论。</td></tr>" & _
	vbcrlf&"<tr><td><a href='user_put.asp?action=business'><img src='images/flea/flea_put.gif' title='发布我的交易信息' border=0></a>" & _
	vbcrlf&"</table></td></tr>" & _	
	vbcrlf&"</td></tr></table>"
  response.write "<table width='99%' align=center><tr><td align=center>"&format_bar("<font class=end><b>栏目公告</b></font>",temp1,13,2,"",web_var(web_color,6)&"|","")&"</td></tr></table>"
end sub

sub flea_sousuo()
%>
<TABLE width="100%" border=0>
<TBODY>
<TR>
<TD class=bg_2 vAlign=bottom align=middle height=25>
<TABLE width="100%" border=0>
<TBODY>
<TR align=middle>
<TD><A href="flea_list.asp?c_id=32&s_id=72">电脑设备</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=78">通讯工具</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=79">人才信息</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=80">家政服务</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=388">爱心求助</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=389">商家信息</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=390">房屋租赁</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=391">交通工具</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=392">二手信息</A></TD>
<TD><A href="flea_list.asp?c_id=32&s_id=393">其它信息</A></TD>
</TR></TBODY></TABLE></TD></TR>
<TR><TD background="images/main/dian3.gif" height=1></TD></TR>
<TR><TD align=middle bgColor=#effbff height=30>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<TBODY><TR align=middle>
<TD><A href="flea_list.asp?">【所有信息】</a></TD>
<TD>关键字：</TD>
<form action='flea_view.asp?' method=get>
<input type=hidden name=action value='<%response.write action%>'>
<input type=hidden name=c_id value='<%response.write cid%>'>
<input type=hidden name=s_id value='<%response.write sid%>'>
<input type=hidden name=page value='<%response.write viewpage%>'>
<TD><input type=text name=keyword value='<%response.write keyword%>' size=28 maxlength=28></TD>
<TD><SELECT name=sea_type size=1> 
<option value='name'<%if sea_type="'name" then response.write " selected"%>>按名称</option>
<option value='remark'<%if sea_type="remark" then response.write " selected"%>>按说明</option>
<option value='username'<%if sea_type="username" then response.write " selected"%>>按发布人</option>
<option value='nname'<%if sea_type="nname" then response.write " selected"%>>按联系人</option>
<option value='phone'<%if sea_type="phone" then response.write " selected"%>>按电话</option>
<option value='email'<%if sea_type="email" then response.write " selected"%>>按电子邮件</option>
</SELECT></TD>
<TD><SELECT name=s_id>
<OPTION class=gray value="" selected>所有信息</OPTION> 
</SELECT></TD>
<td>&nbsp;<input type=submit value='搜 索'></td></FORM></TR></TBODY></TABLE></TD></TR>
<%
end sub
%>