% 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-7-15
金华市交通局
|
|
各县(市、区)交通局:
为进一步推动我市乡村康庄工程顺利实施,经市政府领导同意,决定召开全市乡村康庄工程示范项目现场会,现就有关事项通知如下: 一、 会议内容: 现场参观示范项目;各县(市、区)交流示范项目实施及上半年工作情况和下半年工作打算;研究部署下一步工作。 二、 会议时间: 7月20日下午报到,7月21日开会,会期一天。 三、 会议地点: 浦江县塔山宾馆。 四、 参加人员: 各县(市、区)政府分管领导、交通局局长、分管局领导、 康庄办专职管理人员各一人。县(市、区)政府分管领导请各县(市、区)交通局负责通知。 五、 其它事项: 1、 7月21日上午会议,全体人员参加;下午康庄工程业 务会议,分管局领导、康庄办专职管理人员参加; 2、 各县(市、区)准备书面汇报材料50份带会议交流; 3、 各县(市、区)参加会议人员名单,于7月16日前报 金华市乡村康庄工程办公室。联系电话:2342560,电子邮件:jhkzb@126.com; 4、 会务工作委请浦江县交通局办理;
5、
联系人:方向征(市康庄办),电话:2342560,鲍锦明(浦江康庄办),电话:4206022,手机:13566957708。
抄送:各县(市、区)人民政府、康庄工程办公室。
|