⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 st_sort.asp

📁 汕头育新学校学籍与成绩管理平台是集学籍管理与成绩管理于一体的网络互动平台。功能强大、使用简单、高效速成、安全方便
💻 ASP
字号:
<!--#include file="user_err.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="char.asp"-->
<%
b1=request("b1")

if b1="" then
%>
<HTML><HEAD><TITLE>汕头育新学校 - 注册页面</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type><LINK 
href="images/style.css" type=text/css rel=stylesheet>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY text=#000000 vLink=#0033cc aLink=#800080 link=#0033cc bgColor=#ffffff 
topMargin=0>
<%
If Request.Form("Submit")="注册" Then
Dim p_name,p_born,p_sex,p_political,p_nation,p_high,p_borncity,p_study,p_marry,p_school,p_special,p_worktime,p_oldfirm,p_oldjob,p_experience,p_askmoney,p_type,p_askjob1,p_askjob2,p_askaddress,p_ability,p_familyaddr,p_phone,p_province,p_city,p_town,p_qq,p_phonecall,p_pic,p_users,birthYear,birthMonth,birthDay,p_dot,p_reg,p_email
p_name=Request.Form("p_name")
p_sex=Request.Form("p_sex")
p_political=Request.Form("p_political")
p_nation=Request.Form("p_nation")
p_high=Request.Form("p_high")
p_borncity=Request.Form("p_borncity")
p_study=Request.Form("p_study")
p_marry=Request.Form("p_marry")
p_school=Request.Form("p_school")
p_special=Request.Form("p_special")
p_worktime=Request.Form("p_worktime")
p_oldfirm=Request.Form("p_oldfirm")
p_oldjob=Request.Form("p_oldjob")
p_experience=Request.Form("p_experience")
p_askmoney=Request.Form("p_askmoney")
p_type=Request.Form("p_type")
p_askjob1=Request.Form("p_askjob1")
p_askjob2=Request.Form("p_askjob2")
p_askaddress=Request.Form("p_askaddress")
p_ability=Request.Form("p_ability")
p_familyaddr=Request.Form("p_familyaddr")
p_phone=Request.Form("p_phone")
p_province=Request.Form("p_province")
p_city=Request.Form("p_city")
p_town=Request.Form("p_town")
p_qq=Request.Form("p_qq")
p_phonecall=Request.Form("p_phonecall")
p_pic=Request.Form("p_pic")
p_users=Request.Form("p_users")
birthYear=Request.Form("birthYear")
birthMonth=Request.Form("birthMonth")
birthDay=Request.Form("birthDay")
p_born=Request.Form("birthYear") &"-"& Request.form("birthMonth") &"-"& Request.form("birthDay")
p_dot=Request.Form("p_dot")
p_reg=Request.Form("p_reg")
p_email=Request.Form("p_email")

Dim Result
Result=false
If Result=false Then
If p_name="" Then Response.write "<script>alert(""用户名没有填写!"");history.back();</script>"
If birthYear="" Then Response.write "<script>alert(""请选择出生年份!"");history.back();</script>"
If birthMonth="" Then Response.write "<script>alert(""请选择出生月份!"");history.back();</script>"
If birthDay="" Then Response.write "<script>alert(""请选择出生日期!"");history.back();</script>"
If p_high="" Then Response.write "<script>alert(""身高没有填写!"");history.back();</script>"
If p_borncity="" Then Response.write "<script>alert(""请选择您的籍贯!"");history.back();</script>"
If p_special="" Then Response.write "<script>alert(""所学专业没有填写!"");history.back();</script>"
If p_school="" Then Response.write "<script>alert(""毕业院校没有填写!"");history.back();</script>"
If p_oldfirm="" Then Response.write "<script>alert(""在职单位没有填写!"");history.back();</script>"
If p_oldjob="" Then Response.write "<script>alert(""在职职位没有填写!"");history.back();</script>"
If p_experience="" Then Response.write "<script>alert(""工作经历没有填写!"");history.back();</script>"
If p_askmoney="" Then Response.write "<script>alert(""要求月薪没有填写!"");history.back();</script>"
If p_askaddress="" Then Response.write "<script>alert(""希望工作所在地没有填写!"");history.back();</script>"
If p_askjob1="" Then Response.write "<script>alert(""职业一没有填写!"");history.back();</script>"
If p_askjob2="" Then Response.write "<script>alert(""职业二没有填写!"");history.back();</script>"
If p_ability="" Then Response.write "<script>alert(""教育情况没有填写!"");history.back();</script>"
If p_familyaddr="" Then Response.write "<script>alert(""家庭住址没有填写!"");history.back();</script>"
If p_phone="" Then Response.write "<script>alert(""联系电话没有填写!"");history.back();</script>"
If p_province="" Then Response.write "<script>alert(""请选择目前所在省份!"");history.back();</script>"
If p_city="" Then Response.write "<script>alert(""请选择目前所在城市!"");history.back();</script>"
If p_town="" Then Response.write "<script>alert(""请填写目前所在乡镇!"");history.back();</script>"
If p_email="" Then Response.write "<script>alert(""电子邮件不能为空!"");history.back();</script>"
If p_qq="" Then Response.write "<script>alert(""Q Q不能为空!"");history.back();</script>"
If p_phonecall="" Then Response.write "<script>alert(""手机号不能为空!"");history.back();</script>"
Result=true
end if

IF Result=true Then
Dim sql
sql="insert into person(p_name,p_born,p_sex,p_political,p_nation,p_high,p_borncity,p_study,p_marry,p_school,p_special,p_worktime,p_oldfirm,p_oldjob,p_experience,p_askmoney,p_type,p_askjob1,p_askjob2,p_askaddress,p_ability,p_familyaddr,p_phone,p_province,p_city,p_town,p_qq,p_phonecall,p_pic,p_users,p_dot,p_reg,p_email,p_now)"
sql=sql&" values('"&p_name&"','"&p_born&"','"&p_sex&"','"&p_political&"','"&p_nation&"','"&p_high&"','"&p_borncity&"','"&p_study&"','"&p_marry&"','"&p_school&"','"&p_special&"','"&p_worktime&"','"&p_oldfirm&"','"&p_oldjob&"','"&p_experience&"','"&p_askmoney&"','"&p_type&"','"&p_askjob1&"','"&p_askjob2&"','"&p_askaddress&"','"&p_ability&"','"&p_familyaddr&"','"&p_phone&"','"&p_province&"','"&p_city&"','"&p_town&"','"&p_qq&"','"&p_phonecall&"','"&p_pic&"','"&p_users&"','"&p_dot&"','"&p_reg&"','"&p_email&"','"&Now&"')"
Conn.Execute sql
u_name = Session("u_name")
u_password = Session("u_password")
uid = Session("uid")
If changeuid(u_name,u_password,uid)="Passed" Then
Result="增加个人简历成功!<li><a href=member/logout.asp>点这里返回首页重新登陆!</a></li>"
ResultInfo
End If

End IF

Else

dim rs
dim count
set rs = conn.execute("select * from stat order by st_id asc")
%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
        <%
        count = 0
        do while not rs.eof 
        %>
subcat[<%=count%>] = new Array("<%=(rs("st_name"))%>","<%=rs("st_class")%>","<%=rs("st_id")%>");
        <%
        count = count + 1
        rs.movenext
        loop
        rs.close
        %>
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.form1.p_city.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { 
                document.form1.p_city.options[document.form1.p_city.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</script><table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
      <form name="form1" method="post" action="personreg.asp">
      <td bgcolor="#f6f6f6"> <%                                                                                                          
					sql = "select y_id,y_name from years order by y_id desc"                                                                                                          
					set rs = conn.execute(sql)                                                                                                          
					if rs.eof and rs.bof then                                                                                                          
						response.write "请先添加学年!"                                                                                                          
						response.end                                                                                                          
					else                                                                                                          
					%>                                                                                                          
 <select class=txBox_p id=c_year   maxLength=30 name=c_year>                                                                                                           
                                                                                                                 
          <%do while not rs.eof%>                                                                                                          
          <option value="<%=rs(0)%>"><%=(rs(1))%></option>                                                                                                          
          <%                                                                                                          
        				rs.movenext                                                                                                          
       					loop                                                                                                          
						end if                                                                                                          
       					rs.close                                                                                                          
        				set rs = nothing                                                                                                          
						%>                                                                                                          
        </select>                                                                                                          
<%
					sql = "select c_id,c_name from class order by c_id asc"
					set rs = conn.execute(sql)
					if rs.eof and rs.bof then
						response.write "请先添加班级!"
						response.end
					else
					%> <select name="p_province" onChange="changelocation(document.form1.p_province.options[document.form1.p_province.selectedIndex].value)" size="1">
          <option value="">选择班级</option>
          <%do while not rs.eof%>
          <option value="<%=rs(0)%>"><%=(rs(1))%></option>
          <%
        				rs.movenext
       					loop
						end if
       					rs.close
        				set rs = nothing
						%>
        </select> <select name="p_city">
          <option value="">选择名称</option>
        </select> <input name="p_town" type="text" class="form" id="p_town" size="10" maxlength="15"> 
        <font color="#0000FF">(填写镇!)</font><INPUT type=submit value="注册" name=Submit><INPUT type=reset value=重填 name=Submit2></td></form>
    </tr>
     
  
  <%End IF
%>
</table>
</BODY>
<%conn.close  
end if  
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -