<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Dim news Dim news_numRows Set news = Server.CreateObject("ADODB.Recordset") news.ActiveConnection = MM_news_STRING news.Source = "SELECT title, wenhao, time FROM news ORDER BY time DESC" news.CursorType = 0 news.CursorLocation = 2 news.LockType = 1 news.Open() news_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 15 Repeat1__index = 0 news_numRows = news_numRows + Repeat1__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> 新建网页 1

[设为首页] [收藏本站] [站长信箱]

欢迎光临东莞市建设工程安全监督站!

质监站 | 首页 | 政策法规 | 标准规范 | 办事指南 | 行业信息 | 下载专区 | 双优工程 | 拆除工程 | 安全知识 | 安全教育 | 信用档案

 
 

关于全市室内电梯安装施工安全管理会议

企业到会情况及处理意见的公示

 

各镇街(园区)安监组(站),各有关单位:

    为切实加强室内电梯安装施工安全监督,督促和指导建筑施工、工程监理企业落实安全生产主体责任,预防和减少室内电梯安装安全事故的发生,我局于2011128日召开了全市室内电梯安装施工安全管理会议,通报了我市今年以来建筑施工安全生产形势,提出了下一阶段我市室内电梯安装工程施工安全管理工作要求,并由广州奥的斯电梯有限公司东莞分公司负责人作出关于认真吸取事故教训、加强施工安全生产工作的发言。现将企业到会情况及处理意见公示如下:

一、企业到会情况

(一)本次全市室内电梯安装施工安全管理会议到会企业共58家,名单如下:

东莞市富士电梯有限公司

东莞市三洋电梯有限公司

东莞市魏丰电梯科技有限公司

东莞市华菱电梯有限公司

东莞市东升电梯有限公司

东莞市长城电梯有限公司

东莞市西门子电梯有限公司

东莞市东航电梯有限公司

东莞市川鑫电梯有限公司

东莞市华星电梯有限公司

东莞市日芝电梯有限公司

东莞市三星电梯有限公司

东莞市宝马电梯有限公司

东莞市大力士电梯有限公司

东莞市上菱电梯有限公司

东莞市东奥电梯有限公司

日立电梯(中国)有限公司东莞分公司

东莞市上海三菱电梯特约销售服务有限公司

广州奥的斯电梯有限公司东莞分公司

广东骏安电梯有限公司

东莞市莞菱电梯技术服务有限公司

东莞市富升电梯有限公司

东莞市佳胜电梯有限公司

广东台日电梯有限公司东莞分公司

东莞市长城广奥有限公司

上海三菱电梯有限公司东莞分公司

伟达电梯(深圳)有限公司东莞分公司

东莞市全灵特种设备工程有限公司

东莞市中凯电梯有限公司

东莞市瀛鑫电梯工程有限公司

东莞市奥通电梯有限公司

东莞市迅达电梯销售服务有限公司

东莞市运通电梯有限公司

东莞市德立电梯有限公司

东莞市塘厦机械厂

东莞市诚顺电梯有限公司

东莞市华日电梯有限公司

东莞市东江电梯有限公司

东莞市广日电梯经销有限公司

东莞市骏达电梯有限公司

东莞市凯鑫电梯有限公司

东莞市诚辉实业投资有限公司

东莞市恒泰电梯有限公司

东莞市天翔电梯起重设备有限公司

东莞市楠帆威电梯有限公司

东莞市张丰合号电梯有限公司

东莞市安博电梯有限公司

东莞市华宇电梯有限公司

东莞市群立电梯有限公司

东莞市华升电梯有限公司

东莞市诚达电梯有限公司

东莞市万菱电梯有限公司

东莞市三川电梯有限公司

东莞市新力电梯有限公司

东莞市悍马电梯起重机工程有限公司

东莞市环宇电梯有限公司

东莞市东菱电梯有限公司

蒂森电梯有限公司深圳分公司

 

 

(二)根据市质量技术监督局提供的电梯安装企业名单,本次全市室内电梯安装施工安全管理会议缺席企业共16家,名单如下:

东莞市快意电梯有限公司

东莞市川田电梯有限公司

广东迪宝电梯有限责任公司

东莞市华宝新奥电梯有限公司

巨人通力电梯有限公司东莞分公司

东莞市振兴快捷电梯公司

东莞市盈动电梯有限公司

东莞市中奥电梯有限公司

东莞市明兴电梯有限公司

东莞市永达电梯工程有限公司

东莞市西子电梯有限公司

东莞市日菱电梯有限公司

东莞市城飞电梯有限公司

东莞市秦岭电梯有限公司

东莞市科迈电梯起重设备工程有限公司

东莞市中堂恒丰电梯安装维修公司

 

 

二、对缺席企业的处理

对上述缺席全市室内电梯安装施工安全管理会议的企业,我站将暂停办理该企业的“在建工程电梯安装施工安全保障措施告知备案”事项。

 

东莞市建设工程安全监督站

二〇一一年十二月十三日

 

 

 

版权所有:东莞市建设工程安全监督站 ICP证号:粤ICP备05029083号
电话(0769)22981323 传真(0769)22981393
地址:东莞市南城区新基
联络我们


<% news.Close() Set news = Nothing %>