%@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.事项名称 |
施工起重机械使用登记备案 |
|
2.颁发的证件及有效期 |
颁发的证件:市安监站颁发《建筑起重机械使用登记牌》 |
|
证件有效期:无 |
|
3.审批类型及法律效力 |
日常管理 |
|
4.设定依据 |
《建设工程安全生产管理条例》(国务院令第393号,2004年2月1日施行)第三十五条
施工单位在使用施工起重机械和整体提升脚手架、模板等自升式架设设施前,应当组织有关单位进行验收,也可以委托具有相应资质的检验检测机构进行验收;使用承租的机械设备和施工机具及配件的,由施工总承包单位、分包单位、出租单位和安装单位共同进行验收。验收合格的方可使用。
《特种设备安全监察条例》规定的施工起重机械,在验收前应当经有相应资质的检验检测机构监督检验合格。
施工单位应当自施工起重机械和整体提升脚手架、模板等自升式架设设施验收合格之日起30日内,向建设行政主管部门或者其他有关部门登记。登记标志应当置于或者附着于该设备的显著位置。
《建筑起重机械安全监督管理规定》(建设部166号,2008年6月1日施行)第十六条 建筑起重机械安装完毕后,使用单位应当组织出租、安装、监理等有关单位进行验收,或者委托具有相应资质的检验检测机构进行验收。建筑起重机械经验收合格后方可投入使用,未经验收或者验收不合格的不得使用。
第十七条 使用单位应当自建筑起重机械安装验收合格之日起30日内,将建筑起重机械安装验收资料、建筑起重机械安全管理制度、特种作业人员名单等,向工程所在地县级以上地方人民政府建设主管部门办理建筑起重机械使用登记。登记标志置于或者附着于该设备的显著位置。 |
|
5.审批条件 |
《建设工程安全生产管理条例》(国务院令第393号,2004年2月1日施行)第十七条
在施工现场安装、拆卸施工起重机械和整体提升脚手架、模板等自升式架设设施,必须由具有相应资质的单位承担。
安装、拆卸施工起重机械和整体提升脚手架、模板等自升式架设设施,应当编制拆装方案、制定安全施工措施,并由专业技术人员现场监督。
施工起重机械和整体提升脚手架、模板等自升式架设设施安装完毕后,安装单位应当自检,出具自检合格证明,并向施工单位进行安全使用说明,办理验收手续并签字。
|
|
6.申请资料 |
1、建筑起重机械安装验收资料(包括建筑起重机械基础验收表);
2、检验检测机构出具的检验检测报告;
3、《广东省建筑施工起重机械登记证》和《建筑施工起重机械履历手册》;
4、有关规定需要的其他资料;
注:有关证件和证明资料均须提供原件及复印件,复印件加盖使用单位公章,原件经核对后退还。 |
|
7.审批受理机构及地点 |
受理机构:
市安监站 受理地点:市安监站六楼办公室 |
|
8.审批决定机关 |
市安监站 |
|
9.审批程序 |
1、市安监站办公室收验材料。对资料不齐全项目,即时一次性告知申请人需澄清、补充的有关情况或文件。
2、对资料齐全的,自收到之日3个工作日内由市安监站在《建筑施工起重机械履历手册》上作出使用登记记录,并将建筑起重机械使用登记牌发给使用单位。
3、发现申请人提交虚假资料的,经查证属实,将依法提请建设局作出处理,并作为不良行为予以记录和向社会公示。
注:申请人对建筑施工起重机械使用登记备案的办理意见有异议的,可依法向市人民政府(或省建设厅)申请行政复议或者向人民法院提起行政诉讼。 |
|
10.审批时限 |
3个工作日 |
|
11.审批收费 |
无 |
|
12.相关表格 |
|
|
13.年审或年检 |
|
|
14.受理咨询与投诉的机构和电话 |
受理咨询机构:市安监站办公室 电话:22981323;
受理投诉机构:市安监站办公室 电话:22981323。 |
|
15.备注 |
|
| |
|
|
<%
news.Close()
Set news = Nothing
%>