:: 武义气象信息网 ::

◇设为首页◇

◇加入收藏◇

◇联系我们◇

首　页　

气象政务

天气预报

天气实况

农业气象

气象法规

气象科普

防雷管理

服务定制

历史资料

<% dim datafile2 '读文本文件 strScroll=""'"欢迎来到武义气象信息服务网站" '滚动栏信息 ' datafile2=server.mappath("/database/sk64201.txt") set myfileobject=server.createobject("scripting.filesystemobject") datafile2=server.mappath("/database/zxfb.txt")'最新气象信息发布 set mytextfile=myfileobject.opentextfile(datafile2) sumhang=0 '行数sumhang b="" while not mytextfile.atendofstream aa=trim(mytextfile.readline) if aa<>"" then b=b+aa sumhang=sumhang+1 end if wend mytextfile.close if sumhang<>0 then strScroll=trim(strScroll+b) end if datafile2=server.mappath("/database/zjgx.txt")'网站最近更新 set mytextfile=myfileobject.opentextfile(datafile2) sumhang=0 '行数sumhang b="" while not mytextfile.atendofstream aa=trim(mytextfile.readline) if aa<>"" then b=b+aa sumhang=sumhang+1 end if wend mytextfile.close if sumhang<>0 then if strScroll="" then strScroll=trim(strScroll+b) else strScroll=trim(strScroll+"　　　　　　　　"+b) end if end if datafile2=server.mappath("/database/gdlxx.txt")'滚动栏信息 set mytextfile=myfileobject.opentextfile(datafile2) sumhang=0 '行数sumhang b="" while not mytextfile.atendofstream aa=trim(mytextfile.readline) if aa<>"" then b=b+aa sumhang=sumhang+1 end if wend mytextfile.close if sumhang<>0 then if strScroll="" then strScroll=trim(strScroll+b) else strScroll=trim(strScroll+"　　　　　　　　"+b) end if end if if strScroll="" then strScroll="欢迎来到武义气象信息服务网站" set mytextfile=nothing set myfileobject=nothing response.write(""+strScroll+"") '上一行是用于滚动文字的 %>

防雷管理

机构设置

武义县防雷设施检测所机构设置

一、办公室
　职能：办公用品采购、电话值守并记录、来客接待。完成领导安排的其他工作。
二、审核科
　职能：审批业务受理、图纸审核及其收费、防雷工程施工监督和竣工验收。完成领导安排的其他工作。
三、检测科
　职能：常规检测及其收费。完成领导安排的其他工作。
四、计量室
　职能：仪器管理（包括采购、归档、维护、送检等）。
五、档案室
　职能：档案管理。

　　严正声明：　本站内容未经许可不得转载，否则依法追究责任!

ZHF.WuYi.ZheJiang.China

Email:hotwin@163.com　Tel:0579-7643059