| ※ 产品分类 >> MORE |
|
 氮气无铅回流焊
小型台式回流焊
波峰焊/无铅波峰焊
贴片机
丝印机
点胶机
锡膏搅拌机
BGA维修系列
检测系统
周边设备
无铅辅料及工具
PCB雕刻机系列
PCB化学制板系列
半导体生产设备
|
|
|
 |
|
|
| ※ 企业新闻 >>MORE |
|
<%
dim focus_rs
dim focus_sql
MaxList=45
if IsNumeric(request("page")) then
if not isempty(request("page")) and request("page")<>"" then
currentPage=cint(request("page"))
else
currentPage=1
end if
else
currentpage=1
end if
set focus_rs=server.createobject("adodb.recordset")
focus_sql="select top 14 * from article where shenghe=1 and typeid=8 order by dateandtime desc"
focus_rs.open focus_sql,conn,1,1
MaxPerPage=MaxList
totalPut=focus_rs.recordcount
if (totalput mod maxperpage)=0 then
totalpage=totalput\maxperpage
else
totalpage=totalput\maxperpage+1
end if
if currentpage<1 then currentpage=1
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if (currentPage-1)*MaxPerPage
<%
if focus_rs.eof then
response.Write "| 没有任何消息！！/td> | "
else
do while not focus_rs.eof and MaxPerPage>0
response.write ""
response.write " "
response.Write(""&focus_rs("title")&"")
response.write " | "
response.Write(""&formatdatetime(focus_rs("dateandtime"),2)&" | ")
response.Write(" | ")
MaxPerPage=MaxPerPage-1
focus_rs.movenext
loop
end if
focus_rs.close
set focus_rs=nothing
%>
|
|
|
|
| ※ 行业动态 >>MORE |
|
<%
dim focus_rss
dim focus_sqls
MaxList=45
if IsNumeric(request("page")) then
if not isempty(request("page")) and request("page")<>"" then
currentPage=cint(request("page"))
else
currentPage=1
end if
else
currentpage=1
end if
set focus_rss=server.createobject("adodb.recordset")
focus_sqls="select top 14 * from article where shenghe=1 and typeid=9 order by dateandtime desc"
focus_rss.open focus_sqls,conn,1,1
MaxPerPage=MaxList
totalPut=focus_rss.recordcount
if (totalput mod maxperpage)=0 then
totalpage=totalput\maxperpage
else
totalpage=totalput\maxperpage+1
end if
if currentpage<1 then currentpage=1
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if (currentPage-1)*MaxPerPage
<%
if focus_rss.eof then
response.Write "| 没有任何消息！！ | "
else
do while not focus_rss.eof and MaxPerPage>0
response.write "| "
response.write " "
response.Write(""&focus_rss("title")&"")
response.write " | "
response.Write(""&formatdatetime(focus_rss("dateandtime"),2)&" | ")
response.Write(" | ")
MaxPerPage=MaxPerPage-1
focus_rss.movenext
loop
end if
focus_rss.close
set focus_rss=nothing
%>
|
|
|
|
| ※ SMT技术 >>MORE |
|
<%
dim focus_rsb
dim focus_sqlb
MaxList=45
if IsNumeric(request("page")) then
if not isempty(request("page")) and request("page")<>"" then
currentPage=cint(request("page"))
else
currentPage=1
end if
else
currentpage=1
end if
set focus_rsb=server.createobject("adodb.recordset")
focus_sqlb="select top 14 * from article where shenghe=1 and typeid=10 order by dateandtime desc"
focus_rsb.open focus_sqlb,conn,1,1
MaxPerPage=MaxList
totalPut=focus_rsb.recordcount
if (totalput mod maxperpage)=0 then
totalpage=totalput\maxperpage
else
totalpage=totalput\maxperpage+1
end if
if currentpage<1 then currentpage=1
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if (currentPage-1)*MaxPerPage
<%
if focus_rsb.eof then
response.Write "| 没有任何消息！！/td> | "
else
do while not focus_rsb.eof and MaxPerPage>0
response.write "| "
response.write " "
response.Write(""&focus_rsb("title")&"")
response.write " | "
response.Write(""&formatdatetime(focus_rsb("dateandtime"),2)&" | ")
response.Write(" | ")
MaxPerPage=MaxPerPage-1
focus_rsb.movenext
loop
end if
focus_rsb.close
set focus_rsb=nothing
%>
|
|
|
|
|
