<% dim Hits dim vote dim VoteNum dim documentid Dim con Set con = Server.CreateObject("ADODB.Connection") con.Open Application("ConnectionString") Call con.Execute("update documents set hits=isnull(hits,0)+1 where documentid=1239") Dim rs Set rs = con.Execute("select hits,vote/isnull(votenum,1),isnull(votenum,1) as votenum from documents where documentid=1239") If Not (rs.EOF And rs.BOF) Then Hits = rs(0) Vote = rs(1) VoteNum = rs(2) Else Hits = 1 Vote = 5 VoteNum = 1 End If rs.Close Set rs = Nothing con.Close Set con = Nothing %>

　

关于要求重新填报０５年康庄工程建设预计划的通知

04-11-1  市康庄办

　

各县（市、区）康庄办：

由于04年康庄工程建设计划调整幅度较大，为避免项目重复或项目漏报，根据省康庄办的安排，要求各县（市、区）康庄办重新填报05年康庄工程建设预计划，具体要求如下：

一、项目必须符合康庄工程所规定的范围，即村道；

二、05年交通部计划省康办已经返回,因已经上报交通部，项目已不能再进行更改，但必须按新表格和其它类型项目一起进行重报；

三、必须严格按照新表格（2张表）进行填写，不得任意更改格式，特别注意要填写项目的电子地图编号；

四、计划分交通部、国债、财政转移、省厅4种类型，具体里程控制数另行通知；

四、请于11月8日前上报市康办，电子邮箱：jhkzb@126.com。

　

附件：

1、省康办返回的05年交通部计划

2、05年康庄工程建设预计划表格格式

　

金华市乡村康庄工程办公室              

2004年11月1日                   

           
　

关闭