<% 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 %>

图片新闻

市康庄办在婺城区召开全市乡村康庄工程工作座谈会

2004-9-21 来源:市康庄办

9月21日,市康庄办在婺城区召开了全市乡村康庄工程工作座谈会。会议传达了全省乡村康庄工程计划编制工作会议的有关精神，通报了全市乡村康庄工程计划编制以及建设管理、资金使用审计情况，交流了有关工程建设和财务管理等先进经验，并对下一阶段工作作了布置。市交通局董一平副局长、婺城区刑水成副区长到会并作了讲话。

图1

图2

关闭窗口

制作维护：金华市乡村康庄工程办公室联系电话：0579-2342560