<% On Error Resume Next class_id_=request.querystring("c1") class_id_=replace(class_id_,"<","《",1,-1) class_id_=replace(class_id_,">","》",1,-1) class_id_=replace(class_id_,"/","/",1,-1) class_id_=replace(class_id_,"'","‘",1,-1) class_id_=replace(class_id_,"&","%",1,-1) class1_id_=request.querystring("c2") class1_id_=replace(class1_id_,"<","《",1,-1) class1_id_=replace(class1_id_,">","》",1,-1) class1_id_=replace(class1_id_,"/","/",1,-1) class1_id_=replace(class1_id_,"'","‘",1,-1) class1_id_=replace(class1_id_,"&","%",1,-1) class2_id_=request.querystring("c3") class2_id_=replace(class2_id_,"<","《",1,-1) class2_id_=replace(class2_id_,">","》",1,-1) class2_id_=replace(class2_id_,"/","/",1,-1) class2_id_=replace(class2_id_,"'","‘",1,-1) class2_id_=replace(class2_id_,"&","%",1,-1) class3_id_=request.querystring("c4") class3_id_=replace(class3_id_,"<","《",1,-1) class3_id_=replace(class3_id_,">","》",1,-1) class3_id_=replace(class3_id_,"/","/",1,-1) class3_id_=replace(class3_id_,"'","‘",1,-1) class3_id_=replace(class3_id_,"&","%",1,-1) filename=request.querystring("f") filename=replace(filename,"<","《",1,-1) filename=replace(filename,">","》",1,-1) filename=replace(filename,"/","/",1,-1) filename=replace(filename,"'","‘",1,-1) filename=replace(filename,"&","%",1,-1) set fs=server.createobject("scripting.filesystemobject") set conn = server.createobject("adodb.connection") conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("../../web.mdb") dir=request.servervariables("APPL_PHYSICAL_PATH") title="重庆统计信息网首页" if class_id_<>eof then set rs=conn.execute("select class,title,date_a,owner from main where class_id='"&class_id_&"' and filename='"&filename&"'") class_n_=rs("class") ob_p=dir&class_id_&"\" ' title=title&" > "&class_n_&"" title=title&" > "&class_n_ end if if class1_id_<>eof then set rs=conn.execute("select class1,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and filename='"&filename&"'") class1_n_=rs("class1") ob_p=ob_p&class1_id_&"\" ' title=title&">"&class1_n_&"" title=title&" > "&class1_n_ end if if class2_id_<>eof then set rs=conn.execute("select class2,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and class2_id='"&class2_id_&"' and filename='"&filename&"'") class2_n_=rs("class2") ob_p=ob_p&class2_id_&"\" ' title=title&">"&class2_n_&"" title=title&" > "&class2_n_ end if if class3_id_<>eof then set rs=conn.execute("select class3,title,date_a,owner from main where class_id='"&class_id_&"' and class1_id='"&class1_id_&"' and class2_id='"&class2_id_&"' and class3_id='"&class3_id_&"' and filename='"&filename&"'") class3_n_=rs("class3") ob_p=ob_p&class3_id_&"\" ' title=title&">"&class3_n_&"" title=title&" > "&class3_n_ end if filename1=rs("title") time_=rs("date_a") title=title&" > 正文" ob_p=ob_p&filename set a=fs.opentextfile(""&ob_p&"") txt=a.readall txt=cstr(txt) a.close %> 重庆统计政府公众信息网
统计局外网统计工作动态重庆统计动态 【打印】【关闭
重庆市开展单位清查数据质量验收工作
              2009年02月27日

 

为了检验和评估全市第二次经济普查单位清查数据质量,重庆市经普办从2月中旬开始,启动了为期半个月的单位清查质量抽查验收工作。

市经普办领导高度重视此项工作,专题研究了单位清查的组织实施原则、抽查内容、抽样方法和分析评估要求等重要问题。单位名录组制定了详细的单位清查抽查方案,通过采取分层随机抽样方法,从40个区县抽取80个普查区进行检查。各抽查组成员集中学习了抽查方案,熟悉工作步骤和操作方法,夯实了业务基础。

目前,全市已完成了实地入户调查工作,正在对抽查数据进行核实比对。市经普办将根据数据质量抽查情况,对全市单位清查数据进行分析评估。


 

Copyright© 2004 重庆市统计局信息管理处版权所有
邮箱:jszx_cq@stats.gov.cn