📄 config_flea.asp
字号:
<%
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> 请写清楚您的联系方式：联系人、联系电话、电子邮件等信息</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> 元<%=redx%></td></tr>
<tr><td>联 系 人：</td><td><input type=text size=20 name=nname maxlength=20><%=redx%> 注册用户：<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='提交信息'> <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
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -