about.asp

汕头育新学校学籍与成绩管理平台是集学籍管理与成绩管理于一体的网络互动平台。功能强大、使用简单、高效速成、安全方便

                                    <TD height=23 vAlign=top class=p12>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;六、可直接打印或者输出成Excel表格。</TD>
                                  </TR>
								  <TR> 
                                    <TD height=23 vAlign=top class=p12>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;七、安全性高，实现多次安全防护。
    1.只有学生用户可以自己注册，而且必须与学号（姓名）绑定，一经绑定，无法修改。只有绑定了学号（姓名）的学生用户才能使用本系统查询成绩，网上讨论，学籍管理等。
    2.管理员可以修改学籍资料和成绩信息，也可进行删除，但所有删除都可由超级管理员还原。
    3.超级管理员只对用户和回收站进行管理。超级管理员进入系统必须用两个用户名和密码。</TD>
                                  </TR>
								  <TR> 
                                    <TD height=23 vAlign=top class=p12>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;八、本系统适用于当前广东省初中和高中，如果课程设置多于广东省或名称不同，则要对系统进行修改才能使用。[所有课程：数学,语文,外语(英语)，物理,化学,生物,历史,地理,思想政治(思想品德),体育与健康，音乐,艺术，美术，信息技术，通用技术,研究性学习，社会实践（综合实践活动），社区服务（校本课程）] 
                                    </TD>
                                  </TR>
                                  <TR> 
                                    <TD height=23 vAlign=top class=p12>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 管理员用户名：admin &nbsp;&nbsp; 密码：admin2006<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 或管理员用户名：admin2006 &nbsp;&nbsp; 密码：admin2006
    </TD>
                                  </TR>
								  <TR> 
                                    <TD height=23 vAlign=top class=p12>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  版本：1.0  &nbsp;&nbsp;程序制作：卢业敏 &nbsp;&nbsp;联系QQ：188136451 电邮：[e-mail]<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 最后更新日期：2006.1.18 &nbsp;&nbsp;<br>
                                    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                                    版本类别：试用版本&nbsp;&nbsp; 运行环境：asp+excel<br>
                                    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 有什么问题或要求定制可通过以上方式联系！<br>
                                      &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                                      新版下载地址:&nbsp;<a href="http://www.styuxin.com/xxg/styuxin.rar" target="_blank">&nbsp;http://www.styuxin.com/xxg/styuxin.rar</a>&nbsp;&nbsp;<br>
                                      &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
                                      演示地址:&nbsp;&nbsp; <a href="http://www.styuxin.com/xxg/st/user_login.asp" target="_blank">http://www.styuxin.com/xxg/st/user_login.asp</a></TD>
                                  </TR>
                                </TBODY>
                              </TABLE>
                            </DIV></TD></TR></TBODY></FORM></TABLE>                                                                                                  
                                                                                                  
                                                                                                  
                                                                                                  
			</DIV></TD></TR>                                                                                                           
        <TR>                                                                                                           
          <TD class=tdBott_p>对汕头育新学校有任何意见和问题，<a href="../note.asp">请给我们留言</a>。</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>                                                                                                           
                                                                   
                                                                                                                                                                                                
                                                               
                                                                                                                                                                 
                                                                                                                                                       
                                                                                                                                                                 
                                                                                                                                                         
		                                                                                                                                                                   
<!--#include file="down.inc"-->                                                                                                                                                             
</BODY>                                                                                                     
<%elseif b1="删除" then                                                                                      
s_id=request("s_id")                                                                                      
sql="update student set s_del=True where s_id="&s_id                                                                                      
conn.execute sql                                                                               
Response.write "<script>alert('删除成功！点确定继续......');location.href('admin_display.asp');</script>"                                                                                                         
                                                                                  
                                                                                
elseif b1="修 改" then                                                                                                        
Dim s_name,s_sex,s_class,s_phone,s_no,Ipaddr                                                                                              
s_id=Request.Form("s_id")                                                                                                        
s_name=Request.Form("s_name")                                                                                                        
s_sex=Request.Form("s_sex")                                                                                                        
s_class=Request.Form("s_class")                                                                                                        
s_no=Request.Form("s_no")                                                                                                        
Ipaddr=Request.ServerVariables("REMOTE_ADDR")                                                                                                      
                                                                                                    
Dim Result                                                                                                    
Result="错误:"                                                                                                    
If s_no="" Then Response.write "<script>alert(""学号没有填写！"");history.back();</script>"                                                                                                        
If s_no<>"" And Not IsNumeric(s_no) Then Result=Result&"学号必须是数字！"                                                                                                      
If s_name="" Then Response.write "<script>alert(""学生姓名没有填写！"");history.back();</script>"                                                                                                        
If Len(s_name)>10 Then Response.write "<script>alert(""学生姓名错误！"");history.back();</script>"                                                                                                        
If Len(s_name)<4 Then Response.write "<script>alert(""学生姓名错误！"");history.back();</script>"                                                                                                        
If s_class="" Then Response.write "<script>alert(""班级没有填写！"");history.back();</script>"                                                                                                        
                                                                                                   
                                                                                                    
IF Result="错误:" Then                                                                                                    
Dim sql                                                                                                        
sql="update student set s_name='"&s_name&"',s_sex='"&s_sex&"',s_class='"&s_class&"',s_no='"&s_no&"' where s_id="&s_id                                                                                              
Conn.Execute sql                                                                                                        
                                                                                                        
Response.write "<script>alert('修改成功！点确定继续......');location.href('admin_display.asp');</script>"                                                                                                         
Else                                                                                                    
Response.write "<script>alert("""&Result&""");history.back();</script>"                                                                                                    
end if                                                                                      
                                                                                    
                                                                                    
                                                                                                    
conn.close                                                                                                          
end if                                                                                                          
%>