中国水网2007年度水业评选活动

<% set conn = server.createobject("adodb.connection") conn.open application("sql") %> 中国水网2007年度水业评选活动

2007年度优秀环境工程公司评选是以网友投票为基础，结合特邀专家的评价与年度报告分析通过以下四方面标准，最终评选出2007年度优秀环境工程公司。
　　评选标准如下：一是企业的市场规模；二是品牌影响力；三是行业口碑；四是技术创新能力。

投票说明：
　　如果您已经是中国水网的会员，请在投票前填写您相应的注册信息，非会员欢迎注册或直接投票。每个会员限投票1次，将为您增加10枚金币；获奖者在选中票数最多者中产生。评选活动截止日期1月20日，评选结果将在中国水网及合作媒体上正式公布；获奖者名单将在中国水网发布。　　
　　活动设一等奖一名，各奖水网金币500枚；二等奖3名：各奖水网金币200枚；三等奖10名，各奖水网金币100枚。希望广大网友踊跃参加投票。　　
　　每次投票选1-10项，每个IP地址只能投票一次，多投无效。会员注册>>

候选企业推荐：请点击推荐您心目中的优秀专业公司>>

　候选企业：以下企业排名不分先后

<% sql = "select * from tuijian_fu where xianshi=1 and mylei = '环境工程公司' order by uptime" set rs = server.createobject("adodb.recordset") rs.open sql,conn,1 k=1 do while not (rs.eof or err) if (k mod 2)=1 then response.write "" end if if rs("myurl")="" OR IsNull(rs("myurl")) or rs("myurl")="http://" then myqiyewangzhan = " ../../group/view.asp?jid=" & rs("tid") & "" else myqiyewangzhan = rs("myurl") end if %> <% if (k mod 2)=0 then response.write "" end if k=k+1 rs.moveNext if k>1000 then exit do loop rs.close set rs=nothing %>

" onclick=checkppp(this)>

<%=rs("myqiye")%>

<%if session("shifoudenglu") = "denglu" then%> <%else%> <%end if%>

<%if session("myqiye3")="" then%> 欢迎您！您已经成功登陆，您可以直接投票了，将为您增加10枚金币！ <%else%> 您已经投过票了，将不能再投票了！ <%end if%>
如果您是水网会员，请确认您的会员身份，如果您不是会员欢迎注册或直接投票！
类别：	用户名：	密码：