<% If Session("KepuLogOn_OK") < 1 then Response.Redirect "error.asp?id=2" If Session("User_ID")="" then Response.Redirect "error.asp?id=3" send = Request("send") If send = "ok" Then password1 = Request("password1") password2 = Request("password2") If Len(password1)<3 then message="错误提示：您输入的密码有误，要求三位以上，请重新输入" If password1 <> password2 then message="错误提示：您两次输入的密码不一致，请重新输入" If message="" then Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("database/member_info.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath sql="select username, password from User where ID=" & Session("User_ID") Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql , conn, adOpenDynamic, 3 If Not rs.Eof then If password1 <> "" then rs("password")=password1 rs.Update message="提示：密码修改成功！" End If End If Else Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("database/member_info.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath sql="select username, password from User where ID=" & Session("User_ID") Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, adOpenStatic End If %> ::苏州科普之窗::--会员登录
网站首页


关于科普摄影评审和设置作品积分的相关事宜！

　　为了进一步提升科普摄影的水平，现有5位有摄影水平较高的评审老师负责评审所有作品，评审老师有时会对作品作出点评。

　　目前录取的作品分4个等次，不同等次的作品有不同的积分，具体如下：

　　鼓励：200分积分
　　合格：1000分积分
　　推荐：1500分积分
　　优秀：3000分积分

　　另外，大家目前看到有些作品有推荐指数（即打星号的），有些没有。目前，在作品合格的基础上，按照作品的综合质量（艺术性和科普性）有5个推荐指数。

感谢您的参与！欢迎各位网友积级参与，赢取更多奖品！

咨询电话：0512-65151021
投诉/咨询信箱（Email）：szkp1@szkp.org.cn

苏州科普之窗科普擂台赛组委会
2006年10月10日

 
 
　每日科普知识竞答
　每周科普知识竞答
　科普佳作推荐投稿
　科普摄影投稿
　我的摄影参赛作品
   　会员资料管理
　我的佳作推荐文章   　会员密码修改
　我的知识竞答记录   　会员积分查看
最新会员摄影作品展示
最新会员推荐文章