<% 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 %> ::苏州科普之窗::--会员登录
网站首页


关于科普佳作推荐的几点补充规定

　　为了提高“科普擂台赛”的水平，现制定竞赛规则的几点补充规定，希望各位网友积极配合和支持，遵守竞赛规则，与我们共同努力，为科普事业做出贡献。

一、科普佳作推荐的文章来源尽量取材较权威的网站或公开的出版物。

二、科普佳作推荐的文章必须严格按照分类要求进行投稿，相同主题文章尽量避免重复投递。

三、要对科普佳作推荐的文章进行简单编辑：

　　1、科普佳作推荐，文章字数不得少于500字，文章中不带图片。如原文有图片的，要将图片及相关的文字，如"见图1"等内容要去掉，同时保证文章内容通顺；

　　2、科普佳作推荐，文章中原则上不出现原文中的“今天”、“昨天”等名词，以免造成时间概念不清，并且要改正错别字及错缺的标点符号，不用繁体字；

　　3、科普佳作推荐，文章应注明出处及作者，且出处应为原始出处；

　　4、科普佳作推荐，文章中的文字内容，都必须进行规范排版：每段开头空两个全角空格，段与段之间空一行，文章中的标点符号要求使用全角格式。

2006年1月1日

附：关于“全角空格”与使用“全角格式的标点符号”的说明

显示为“新月”形时为半角状态
显示为“满月”形时为全角状态
用鼠标单击以上图形可在“全角”和“半角”间进行相互转换！

建议：除数字和英文字母，文章内容请使用全角字符。

本次活动最终解释权归苏州科普之窗“网上科普擂台赛”组委会所有！

　

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