%set rs=server.createobject("adodb.recordset")
'商机
rs.open "select * from SMT_sca where SMT_key=1 and SMT_key1=1 and SMT_key2=1",conn,1,1
scacount=rs.recordcount
rs.close
'产品
rs.open "select * from SMT_cp where SMT_key=1 and SMT_key1=1 and SMT_key2=1",conn,1,1
cpcount=rs.recordcount
rs.close
'招聘
rs.open "select * from SMT_job_zp where SMT_key=1 and SMT_key1=1 and SMT_key2=1",conn,1,1
zpcount=rs.recordcount
rs.close
'求职
rs.open "select * from SMT_job_qz where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_iname is not null",conn,1,1
qzcount=rs.recordcount
rs.close
'企业
rs.open "select * from SMT_yp where SMT_key<>0 and SMT_key<>2 and SMT_key1=1",conn,1,1
ypcount=rs.recordcount
rs.close
'展会
rs.open "select * from SMT_exhibit where SMT_key<>0 and SMT_key2=1",conn,1,1
zhcount=rs.recordcount
rs.close
'信息
rs.open "select * from SMT_xxnews where SMT_key=1 and SMT_key1=1 and SMT_key2=1",conn,1,1
newscount=rs.recordcount
rs.close
'信息
rs.open "select * from SMT_news where SMT_key=1 and SMT_key1=1 and SMT_key2=1",conn,1,1
newscount=rs.recordcount+newscount
rs.close%>
打码机 - 买打码机,卖打码机到中国喷码标识网
<%SMT_top%>
|
|
<%sql="select * from SMT_exhibit where SMT_key<>0 and SMT_key2=1 order by SMT_tjdate desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "暂无内容"
else
'分页的实现
listnum=4
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum
i=0
do while not rs.eof and i
| · target="_blank"><%=rs("SMT_z_name")%> |
<%rs.movenext
i=i+1
j=j-1
loop%>
<%end if%>
<%rs.close%>
|
|
|
|
|
|
| 编辑短信“中国喷码网”移动、联通用户发送至50120。本条信息资费0.1元,不收包月费。 |
|
|
|
|
|
|
|
|
|
|
<%set rs=server.createobject("adodb.recordset")
sql="select top 12 * from SMT_Job_zp where SMT_key=1 and SMT_key1=1 and SMT_key2=1 and SMT_key3=1 order by SMT_id desc"
rs.open sql,conn,1,1
do while not rs.eof
title=rs("SMT_job_name")
if len(title)>8 then title=left(title,14)&"..."%>
· target="_blank"><%=title%>
<%rs.movenext
loop
rs.close%> |
|
|
|
|
|