 |
宏儒中国与富士康圆满完成ISO体系项目
|
<%
set rs=server.CreateObject("adodb.recordset")
conn.open
if hrcname="" then
sql="select neir from information where shux='a'"
else
sql="select neir from information where shux='p'"
End if
rs.open sql,conn,1,1
if rs.eof then
neir="对不起，没有新信息！"
else
information=int(rs.recordCount)
response.Cookies("information")=information
response.Cookies("information").expires=DateAdd("n",30,now())
neir=rs("neir")
End if
'分页开始
if len(Request("PageNo"))=0 then
PageNo=1
else
PageNo=int(Request("PageNo"))
End if
rs.PageSize=3
rs.AbsolutePage=int(PageNo)
dim k,i
if PageNo=1 then
k=1
else
k=1+3*(int(PageNo)-1)
End if
i=1
do while i<=int(rs.PageSize) and not rs.eof
neir=xhhtml(rs("neir"))
%>
<%
rs.MoveNext
if rs.eof then
exit do
End if
loop
Sub TurnPage(Rs_tmp,PageSize) 'Rs_tmp 记录集 ; PageSize 每页显示的记录条数;
Dim TotalPage '总页数
Dim PageNo '当前显示的是第几页
Dim RecordCount '总记录条数
Rs_tmp.PageSize = PageSize
RecordCount = Rs_tmp.RecordCount
TotalPage = INT(RecordCount / PageSize * -1)*-1
PageNo = Request.QueryString ("PageNo")
'直接输入页数跳转；
If Request.Form("PageNo")<>"" Then PageNo = Request.Form("PageNo")
'如果没有选择第几页，则默认显示第一页；
If PageNo = "" then PageNo = 1
If RecordCount <> 0 then
Rs_tmp.AbsolutePage = PageNo
End If
%>
|
<%End Sub
call TurnPage(rs,3)
rs.close
set rs=nothing
%>
|
创立于1974年，富士康科技集团在总裁郭台铭先生的领导下，以前瞻性的眼光与自创颠覆电子代工服务领域的机光电垂直整合“eCMMS”商业模式，提供客户囊括共同设计(JDSM)、共同开发(JDVM)…… 全球运筹及售后服务等等之全球最具竞争力的一次购足整体解决方案。
富士康科技集团是全球3C(计算机、通讯、消费性电子)代工领域规模最大、成长最快、评价最高的国际集团，集团旗下公司不仅于亚洲及欧洲的证交所挂牌交易，更囊括当今捷克前三大出口商、大中华地区最大出口商、富比士及财富全球五百大企业，及全球3C代工服务领域龙头等头衔。
集团多年来致力于研发创新，以核心技术为中心，包括：纳米技术、绿色制程技术、平面显示器技术、无线通讯技术、精密模具技术、服务器技术、光电 / 光通讯技术材料与应用技术及网络技术等。集团不仅具完善的研发管理制度，更在智权管理上努力耕耘，积极地以提升华人之国际竞争力为己任；截至2005年底已在全世界共获超过15,300件专利，因此集团不仅在美国麻省理工学院的全球年度专利排行榜(MIT Technology Review)中，是全球前二十名中惟一上榜的华人企业。也因如此，才能被美国财富杂志评鉴入选为全球最佳声望标竿电子企业15强，并成为全球惟一能在过去五年持续名列美国商业周刊(BusinessWeek)科技百强(IT100)前十名的公司！
|
| |
|
